Hjälp!!|Programmering / Grafisk formgivning|Forum|Nordichardware

Jag skulle vilja ha hjälp med att göra om ett script från joakimweb.com(bannerexchangescriptet för att vara mer exakt)
Det använder sig av JMail för att skicka använderens uppgifter, men jag tror inte mitt webbhotellstödjer JMail, så jag behöver hjälp med att göra om det till CDONTS/SMTP.

 

	[...] 

	

	SQL = "SELECT * FROM anvandare WHERE hadress = '" & hemsida & "'" 

	Set RecSet = Connect.Execute(SQL) 

	Do until RecSet.EOF 

	

	Set mailmsg = Server.CreateObject("CDONTS.NewMail") 

	

	mailmsg.To RecSet("epost"), RecSet("epost") 

	mailmsg.From = email 

	mailmsg.Subject = "Dina uppgifter" 

	body = "<font face=verdana size=1>" 

	body = body & "Hej " & RecSet("namn") & "!

	

	" 

	body = body & "Välkommen som medlem i " & bex & ". Jag hoppas att du kommer " 

	body = body & "att få många besökare genom denna BannerExchange. Det ända som du behöver " 

	body = body & "göra är att lägga in en liten kodsnutt på din hemsida, då kommer automatiskt " 

	body = body & "en slumpad banner visas på din sida. För varje visning får du en halv kredit " 

	body = body & "och för varje hel kredit visas din banner en gång på någon annans hemsida. " 

	body = body & "Du får dessutom hela 10 krediter varje gång någon klickar på en banner från " 

	body = body & "din hemsida.

	

	" 

	body = body & "------------------------

	" 

	body = body & "Dina Uppgifter

	" 

	body = body & "Anv.namn: " & RecSet("anvnamn") & "

	" 

	body = body & "Lösenord: " & RecSet("losenord") & "

	" 

	body = body & "------------------------

	" 

	body = body & "Din kodsnutt

	" 

	kod = "<script language="javascript" src="" & sokvag & "visa.asp?user=" 

	kod = kod & RecSet("id") & ""></script>" 

	body = body & kod 

	body = body & "

	------------------------

	

	" 

	mailmsg.appendHTML body 

	mailmsg.Send("mail.joakimweb.com") 

	

	RecSet.MoveNext 

	Loop 

	RecSet.Close 

	Connect.Close 

	Set Connect = nothing 

	Session("fel") = "

	Du är nu registrerad och uppgifterna har mailats till dig." 

	Response.Redirect "regga.asp?do=fel2" 

	%>

http://epsab.com/support/asp_05.html kanske kan vara till hjälp?

Väldigt tacksam för hjälp!!