Kode virker ikke efter skift af webhotel

Nedenstående kode virker ikke mere efter skift fra one.com til DanDomaine...


Set RS2 = myConn.Execute("Select * from Links WHERE Nr_a = '" & Request("v") & "' AND Link <> '0' order by Navn")

    If RS2.EOF Then

        Response.write "<font color=red size=3>Der er opstået en databasefejl - [FEJL #15b]</font>"

    Else

        Response.write "<Table border=0 width='100%'>"

        'så ryk til den første post i tabel

        RS2.movefirst

        ' kør en lykke til den har være igennem alle poster i tabel 

        DO UNTIL RS2.EOF

            If RS2("Link") <> "0" Then

           

           

                       

                Response.write "<TR><TD width='22%'><a href='http://" & RS2("Link") & "' target='_blank' rel='nofollow'><IMG SRC='grafik/link.gif' border=0><BR><font size=1><B>" & RS2("Navn") & "</B></font><BR>" & RS2("Link") & "</A></TD><TD width='78%'>"

           

               

                Response.Write "<i>" & RS2("Beskrivelse") & "</i></TD></TR><tr height='4'><td></td></tr><tr height='1' bgcolor=black><td colspan=2></td></tr><tr height='4'><td></td></tr>"

            End if


        'ryk en frem i tabel

        RS2.movenext

        'start lykke igen

        loop

        Response.write "</table>"

    End if



Den kommmer ikke med en fejl, den skriver blot følgende på hjemmesiden:

<TR><TD width='22%'><a href='http://' target='_blank' rel='nofollow'><IMG SRC='grafik/link.gif' border=0><BR><font size=1><B>NAVN</B></font><BR>www.link.dk</A></TD><TD width='78%'><i>NAVN2</i></TD></TR><tr height='4'><td></td></tr>


Dvs. korrekt men intet link i <a></a>... Hvorfor ikke? Den skriver det rigtig nok efterfølgende, meget mærkeligt...