set vt = Server.CreateObject("ADODB.RecordSet")

kayıtsetini vt ile açmışsın, aşağıda rs ile döngüye sokmuşsun.
ikisi aynı değil, döngüyü vt yap yada kayıtsetini rs.

ufak tefek hatalar nası gıcık ediyo dimi, altı üstü bi isim hatası.
kolay gelsin.