ASPemail enkelt script?

2 svar · 188 visningar · startad av Lukaspojken 6 juni 2001

LukaspojkenMedlem sedan maj 20011 312 inlägg

Trådstart6 juni 2001 12:55#1

Hur använder jag ASPemail...det ska vara installerat på hotellet. Jag försökte använda detta scriptet men det fungerar inte...

<% If Request.QueryString("alt") = "skicka" Then

	dim oCDO
	oCDO = Server.CreateObject("CDONTS.NewMail")
	oCDO.Body = "Hello."
	oCDO.Subject = "Email."
	oCDO.To = "lukas_@hotmail.com"
	oCDO.Send()

End if %>

LukaspojkenMedlem sedan maj 20011 312 inlägg

6 juni 2001 13:51#2

Jag testade det här scriptet från aspemail.com sidan men jag får ingen mail trots allt...???

<% Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "smtp.smtp-server.com" ' Specify a valid SMTP server
Mail.From = "lukas_@hotmail.com" ' Specify sender's address
Mail.FromName = "VeryHotCakes Sales" ' Specify sender's name

Mail.AddAddress "lukas_@hotmail.com", "Andrew Johnson, Jr."
Mail.AddAddress "lukas_@hotmail.com" ' Name is optional
Mail.AddReplyTo "lukas_@hotmail.com"

Mail.Subject = "Thanks for ordering our hot cakes!"
Mail.Body = "Dear Sir:" & Chr(13) & Chr(10) & _
     "Thank you for your business."

On Error Resume Next
Mail.Send
If Err <> 0 Then
   Response.Write "Error encountered: " & Err.Description
End If
%>

@ndersMedlem sedan juni 200032 967 inlägg

7 juni 2001 04:09#3

Mail.Host = "smtp.smtp-server.com" ' Specify a valid SMTP server

är smtp.smtp-server.com en giltig smt-server som du får använda?