Sorunu çözdüm arkadaşlar. Döngü yerini değiştirince sorunum çözüldü. Kodları paylaşıyorum başkasına lazım olur belki.

<% 
			set sepet=bag.execute("SELECT * FROM [SEPET] where [USERID] = "& USERID &" order by [ID]")
 						
 						SayfaSepet = "<table border='1' bordercolor='#cccccc' bgcolor='#ffffff' cellpadding='3' cellspacing='1' width='100%'>"
			
			do while not sepet.eof
			st = st + 1
			
						set urun = bag.execute("SELECT * FROM [SAYFALAR] where [ID] = "& sepet("URUNID"))
						SayfaSepet = SayfaSepet & "<tr>"
						SayfaSepet = SayfaSepet & "<td style='width:28px; text-align:center'>"& st &"</td>"
						SayfaSepet = SayfaSepet & "<td style='text-align:left;'>"& urun("SAYFAADI") &"</td>"
						
 			sepet.movenext:loop:sepet.Close:Set sepet= Nothing
			
						SayfaSepet = SayfaSepet & "</tr></table>"
 						SayfaSepet = SayfaSepet
						SayfaSepet = SayfaSepet & "<br /><b>İletişim bilgileri</b>"
						SayfaSepet = SayfaSepet & "<table border='1' bordercolor='#cccccc' bgcolor='#ffffff' cellpadding='3' cellspacing='1' width='100%'>"
						SayfaSepet = SayfaSepet & "<tr>"
						SayfaSepet = SayfaSepet & "<td style='width:150px; text-align:left;'>Adınız Soyadınız</td>"
						SayfaSepet = SayfaSepet & "<td style='text-align:left; background-color:#f0f0f0;'>"& ADISOYADI &"</td>"
						SayfaSepet = SayfaSepet & "</tr>"
						SayfaSepet = SayfaSepet & "<tr>"
						SayfaSepet = SayfaSepet & "<td style='width:150px; text-align:left;'>Mail Adresiniz</td>"
						SayfaSepet = SayfaSepet & "<td style='text-align:left; background-color:#f0f0f0;'>"& EMAIL &"</td>"
						SayfaSepet = SayfaSepet & "</tr>"
						SayfaSepet = SayfaSepet & "<tr>"
						SayfaSepet = SayfaSepet & "<td style='width:150px; text-align:left;'>Telefon Numaranız</td>"
						SayfaSepet = SayfaSepet & "<td style='text-align:left; background-color:#f0f0f0;'>"& TEL &"</td>"
						SayfaSepet = SayfaSepet & "</tr>"
						SayfaSepet = SayfaSepet & "</table>"	
				urun.Close
				Set urun= Nothing	 

'---------------PERSITS MAIL-----------------------------
					Set MAIL = Server.CreateObject("Persits.MailSender")
					MAIL.Host = "mail.xxxxxxx.com.tr"
					MAIL.From = "xxx@xxxxxxx.com.tr" 'bizden aldığınız e-mail olmalı
					MAIL.Username = "xxx@xxxxxxx.com.tr" ' gönderen e-mail ile aynı olmalı
					MAIL.Password = "xxxxxx" ' e-mailinizin şifresini giriniz
					MAIL.FromName = ADISOYADI ' e-mailin gönderen adı, istediğinizi yazabilirsiniz.
					MAIL.AddAddress "xxx@xxxxxxx.com.tr" ' mail göndermek istediğiniz e-mail adresi
					MAIL.Charset = "ISO-8859-9"
					MAIL.Subject = KONU
					MAIL.AddReplyTo EMAIL
					MAIL.IsHTML = True
					MAIL.Body = SayfaSepet
					MAIL.Send 
					set MAIL = nothing
					
 				set rs=bag.execute("delete FROM [SEPET] where USERID=" & USERID) 
				msj = "İşlem tamamlanmıştır. En kısa sürede size bilgi verilecektir."
				Response.Redirect("index.asp?islem=sepet&msg="&msj)
 %>