17 svar · 259 visningar · startad av medialabs
Hej!
jag har en bit mail kod som jag skulle vilja ha till AspsmartMail.
<%
Dim objCDO
Set objCDO = Server.CreateObject("CDONTS.NewMail")
objCDO.From = Request.Form("EMAIL")
objCDO.To = Request.Form("POSTER_EMAIL")
objCDO.cc = Request.Form("EMAIL")
objCDO.Subject = Request.Form("SUBJECT")
objCDO.Body = Request.Form("MESSAGE")
objCDO.Send()
Set objCDO = Nothing
%>
Har redan besökt den men jag vågar itne ändra själv. sist jag gjorde det tog det en vecka innan jag fick den att funka, så jag skulle uppskatta om nån skulle ta sig ett par minuter och "översätta" det till aspsmartrMail
Solbulle!
Hoppas att du vet vad som e fel!?
Jag fattar inte så mycket om AspsmartMail och jag försökte i alla fall. Men det blir ett fel.
Microsoft VBScript compilation error '800a0401'
Expected end of statement
/marknad/adReplied.asp, line 9
mySmartMail.SenderName = "Request.From("EMAIL")"
----------------------------------------^
<%
Dim mySmartMail
Set mySmartMail = Server.CreateObject("aspSmartMail.SmartMail")
mySmartMail.Server = "mail.medialabs.nu"
mySmartMail.SenderName = "Request.From("EMAIL")"
mySmartMail.Recipients.Add = "Request.From("POSTER_EMAIL")"
mySmartMail.Subject = "Request.From("SUBJECT")"
mySmartMail.Body = "Request.From("MESSAGE")"
mySmartMail.SendMail
set mySmartMail = nothing
%>
Request.Form("EMAIL")
Hur ska jag göra detta? Request.form funkar väl inte i aspsmartmail eller?
Jag vet inte, jag reagerade bara på att du skrivit "From" istället för "Form", men det kanske ska vara så. Jag har aldrig prövat komponenten så jag vet inte.
Nu ser jag. Du har citationstecken runt dina Request.Form. Ta bort dem.
Byt alltså:
"Request.From("EMAIL")"
... mot:
Request.From("EMAIL")
jag gjorde som du sa och plockade bort dom och nu kommer ett snyggt felmess upp :birp
Microsoft VBScript runtime error '800a01c2'
Wrong number of arguments or invalid property assignment: 'Recipients.Add'
/marknad/adReplied.asp, line 10
mySmartMail.Recipients.Add = Request.Form("POSTER_EMAIL")
Jag är nog inte rätt person att hjälpa dig eftersom jag inte har någon erfarenhet av AspSmartMail, men det låter som om du inte får med dig något värde från formuläret. Kontrollera att Request.Form("POSTER_EMAIL") innehåller någonting.
Jo, Dom innehåller det dom ska ha ;)
Jag kollade lite på exempelkoden som solbulle postade och det verkar som om Recipients.Add måste ha två argument; email-adress samt namn. Så pröva att bara lägga till en tom sträng om du inte har något namn.
mySmartMail.Recipients.Add = Request.Form("POSTER_EMAIL"), ""
Nej, nej, nej! Nu ser jag, igen. :e Det ska inte vara något likhetstecken emellan. Add är en metod och den rätta koden ska då troligtvis vara:
mySmartMail.Recipients.Add Request.Form("POSTER_EMAIL")
:birp