09. december 2004 - 09:47Der er
17 kommentarer og 3 løsninger
e-mail med attachments
Jeg har følgerne kode til at sende en e-mail med attachments, og den virker helt fint. Men jeg vil gerne undgå at kunden skrive hver gang adressen (To/From)… og hvis jeg slette formen To og From og prøver skrive den i selv koden, for eksampel:
StrFileName = Request.Files["fileAttachment"].FileName; if(StrFileName != "") //IF A FILE IS ATTACHED { //EXTRACTING FILE NAME FROM FULL PATH StrFileName = StrFileName.Substring(StrFileName.LastIndexOf("\\")+1); //SAVING THE FILE TEMPORARILY Request.Files["fileAttachment"].SaveAs(Server.MapPath(StrFileName)); //ATTACHING THE FILE TO THE MAIL MailAttachment MyAttachment =new MailAttachment(Server.MapPath(StrFileName)); MyMail.Attachments.Add(MyAttachment); }
Public Sub SendMail(ByVal Til As String, ByVal Fra As String, ByVal subjecTekst As String, ByVal MailBodyTekst As String, ByVal Attach As String)
Dim Message As System.Web.Mail.MailMessage = New System.Web.Mail.MailMessage Message.From = Fra Message.To = Til Message.Subject = subjecTekst Message.Body = MailBodyTekst '*** Attach to mail If Not Attach = "" Then Dim myAttachment As New MailAttachment(Attach) Message.Attachments.Add(myAttachment) End If
'Run på lokal server 'SmtpMail.SmtpServer = "????" 'din lokal server 'Run på WWW SmtpMail.SmtpServer = "smtp.mail.dk" ' TDC SmtpMail.Send(Message)
Fejltype: Der opstod en Microsoft VBScript-kompileringsfejl (0x800A03EE) Tegnet ')' var ventet /Kunde/sendmail.asp, line 14, column 30 Public Sub SendMail(ByVal Til As String, ByVal Fra As String, ByVal subjecTekst As String, ByVal MailBodyTekst As String, ByVal Attach As String) -----------------------------^ :(((
Håber den vil vikre nu........følger mig så dummmmm
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.