ASP knold vil maile
Jeg har min hjemmeside how www.abusiness.dk og de har komponenterne til AspEmail 4.4 Premiumhttp://www.abusiness.dk/instructions.asp?subject=5&instruction=8
Et eksempel på den kode, der skal bruges ved mail:
http://www.aspemail.com/codesample.html
Fra en tilfældig side kalder jeg med to parametre Email.asp?file=filnavn.zip&path=StiTilFilen
Siden der kaldes har et felt og en knap. I feltet skal brugeren skrive sin email adresse og tryk på send.
<form method=\"post\" action=\"????????????\">
<input type=\"text\" name=\"strEMail\">
<input type=\"submit\" value=\"Send\">
</form>
Email adressen skal valideres med en funktion, som jeg har fundet.
EmailCheck(\"fd@win-consult.com\",0)
->hvis OK - så skal den sendes med ASPemail, men en vedhæftet fil.
<%
Set Mail = Server.CreateObject(\"Persits.MailSender\")
Mail.Host = \"smtp.smtp-server.com\" \' Specify a valid SMTP server
Mail.From = \"sales@veryhotcakes.com\" \' Specify sender\'s address
Mail.FromName = \"VeryHotCakes Sales\" \' Specify sender\'s name
Mail.AddAddress \"andy@andrewscompany.net\", \"Andrew Johnson, Jr.\"
Mail.AddAddress \"paul@paulscompany.com\" \' Name is optional
Mail.AddReplyTo \"info@veryhotcakes.com\"
Mail.AddAttachment \"c:\\images\\cakes.gif\"
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
%>
Sikken omgang - jeg har brug for noget hjælp til at stykke dette sammen.
Jeg ved ikke, om det er point nok - men det finder vi vel ud af.
