Notifikationer

Markér alle som læst Log ud

Slettet bruger

23. juni 2003 - 12:43 Der er 13 kommentarer og
1 løsning

Formmail med attachment

Jeg er på udkig efter en formmail med attachment, men jeg kan bare ikke finde en nogle steder, hvis du kan finde/lave en til mig som virker så er pointene dine :-|

Synes godt om

cool_casper Nybegynder

23. juni 2003 - 12:45 #1

Det kommer meget an på hvilken komponent du bruger?

Synes godt om

Slettet bruger

23. juni 2003 - 12:46 #2

komponent, hvad tænker du på fx?

Synes godt om

cool_casper Nybegynder

23. juni 2003 - 12:47 #3

Hvis du bruger JMail kan du bruge dette eks fra producenten Dimac...

JMailUpload.asp
-----------------
<html>
<head>
<title>emailform</title>
</head>
<body>
<font face="verdana, arial" size="2"><b>
<form method="post" action="JmailUploadProcess.asp" ENCTYPE="multipart/form-data">
Complete this form and click the submit-button. We will answer your
questions as soon as possible.
<br><br>
Your name <br>
<input type="text" size="25" name="name"><br>

Your email <br>
<input type="text" size= "25" name= "email"><br>< /FONT>

Recipient email <br>
<input type= "text" size= "25" name= "recipient"><br>< /FONT>

State your business <br>
<select name="subject" size="1">
<option value="help">help
<option value="tips">tips
<option value="other">other
</select>
<br>

Enter your question <br>
<textarea name="body" cols="40" rows="15" wrap="PHYSICAL"></textarea>
<br>

Attachments <br>
<input type="file" name="attachment">
<br>
<br>
<input type="submit" value=" Submit ">
</form>
</b></font>
</body>
</html>

JMailUploadProcess.asp
--------------------------
<%@LANGUAGE="VBSCRIPT" %>
<HTML>
<BODY>
<%
' Create the JMail message Object
set msg = Server.CreateOBject( "JMail.Message" )
Set upload = Server.CreateObject( "w3.Upload" )

' Check for attachments and add them to the email
set attachment = upload.Form( "attachment" )
if attachment.IsFile then
msg.AddCustomAttachment attachment.filename, attachment.item, false
end if

' Set logging to true to ease any potential debugging
' And set silent to true as we wish to handle our errors ourself
msg.Logging = true
msg.silent = true

' Get the form variables, using the upload object
Name = upload.Form("name")
SenderEmail = upload.Form("email")
Subject = "Regarding " & upload.Form ("subject")
Recipient = upload.Form("recipient")
Body = upload.Form("body")

' And apply them to the message
msg.From = SenderEmail
msg.FromName = Name

msg.AddRecipient Recipient
msg.Subject = Subject

msg.Body = Body

' To capture any errors which might occur, we wrap the call in an IF statement
if not msg.Send( "mail.myDomain.net" ) then
Response.write "<pre>" & msg.log & "</pre>"
else
Response.write "Message sent succesfully!"
end if

' And we're done! the message has been sent.
%>
</BODY>
</HTML>

Synes godt om

cool_casper Nybegynder

23. juni 2003 - 12:49 #4

Argh, havde løst spørgsmålet helt forkert. Undskyld, tror du selv brugte en komonent til at sende din mail.

Og så fald ved jeg ikke om dette findes... Det er nok nemmere at få fat i komponent og så bruge eks. ovenfor til at lave noget!

Synes godt om

Slettet bruger

23. juni 2003 - 12:51 #5

okay, og den komponent er det en som jeg skal ud og tilmelde mig et eller andet sted+

Synes godt om

cool_casper Nybegynder

23. juni 2003 - 12:51 #6

løst = læst!

Synes godt om

cool_casper Nybegynder

23. juni 2003 - 12:53 #7

Kommer an på om du har din egen server. Hvis du har det kan du selv hente den på www.dimac.net, hvis du har en webhost skal du finde ud af om de har komponenten. Hvis ikke de har så er der ikke så forfærdelig meget at gøre ved det! :)

Synes godt om

Slettet bruger

23. juni 2003 - 13:09 #8

okay jeg ser lige engang

Synes godt om

Slettet bruger

23. juni 2003 - 13:14 #9

Undskyld men hvor er det lige jeg bestemmer hvilken mail den skal sendes til?

Synes godt om

cool_casper Nybegynder

23. juni 2003 - 13:21 #10

Det gør du i linien:
msg.AddRecipient Recipient

Synes godt om

Slettet bruger

23. juni 2003 - 13:43 #11

Jeg har siddet og redigeret i filene så den skulle passe til mit, men jeg syntes ikke helt det virker, hvad ahr jeg gjort forkert?

JMailUploadProcess.asp
-----------------

<%@@LANGUAGE="VBSCRIPT" %>
<HTML>
<BODY>
<%
' Create the JMail message Object
set msg = Server.CreateOBject( "JMail.Message" )
Set upload = Server.CreateObject( "w3.Upload" )

' Check for attachments and add them to the email
set attachment = upload.Form( "attachment" )
if attachment.IsFile then
msg.AddCustomAttachment attachment.filename, attachment.item, false
end if

' Set logging to true to ease any potential debugging
' And set silent to true as we wish to handle our errors ourself
msg.Logging = true
msg.silent = true

' Get the form variables, using the upload object
Name = upload.Form("name")
SenderEmail = upload.Form("email")
Subject = "Regarding " & upload.Form ("subject")
Recipient = upload.Form("recipient")
Body = upload.Form("body")

' And apply them to the message
msg.From = SenderEmail
msg.FromName = Name

msg.AddRecipient jesper_christophersen@hotmail.com
msg.Subject = Subject

msg.Body = Body

' To capture any errors which might occur, we wrap the call in an IF statement
if not msg.Send( "smtp1.b-one.nu" ) then
Response.write "<pre>" & msg.log & "</pre>"
else
Response.write "Message sent succesfully!"
end if

' And we're done! the message has been sent.
%>
</BODY>
</HTML>

Synes godt om

Slettet bruger

23. juni 2003 - 13:43 #12

har*

Synes godt om

Slettet bruger

26. juni 2003 - 13:00 #13

Lukker

Synes godt om

Slettet bruger

26. juni 2003 - 13:00 #14

Hov

Synes godt om

Ny bruger Nybegynder

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.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP	10	25/06/202622:20	04/09/202602:30
Tjek alle checkbox i form Af bsn i ASP	4	18/05/202601:57	19/05/202613:33
Lost focus Af bsn i ASP	1	07/11/202415:34	01/01/202514:58
ASP classic Af bsn i ASP	8	28/10/202423:11	30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP	5	23/05/202409:56	24/05/202400:02

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS