w3 upload组件实例应用3

2022-07-15 80酷酷网 80kuku.com

　　文件1 - JMailUploadAutoForm.asp

这是个类似jmail自动发邮件的例子，也可以带附件。可以同时上传多个文件

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

Your name

<input type="text" size="25" name="name">

Your email

<input type="text" size="25" name="email">

Recipient email

<input type="text" size="25" name="recipient">

State your business

<select name="subject" size="1">
<option value="help">help
<option value="tips">tips
<option value="other">other
</select>

OS

<input type="text" size="25" name="os">

Browser

<input type="text" size="25" name="browser">

Enter your question

<textarea name="question" cols="40" rows="15" wrap="PHYSICAL"></textarea>

Attachments

<input type="file" name="attachment1">

Attachments

<input type="file" name="attachment2">

Attachments

<input type="file" name="attachment3">

<input type="submit" value=" Submit ">
</form>
</b></font>
</body>
</html>

文件2 - JmailUploadAutoFormProcess.asp
<%
Set upload = Server.CreateObject( "w3.Upload" )
Set JMail = Server.CreateObject("JMail.SMTPMail")

' 检查附件并加入邮件
' 所有其他的form元素被加到邮件里
for i = 0 to upload.form.count-1
if upload.form( i ).isFile then
set attachment = upload.Form( i )
JMail.AddCustomAttachment attachment.filename, attachment.item
else
JMail.appendtext( upload.form( i ).name & ": " & upload.form( i ).item & vbcrlf )
end if
next

'得到form变量，用上传组件
Name = upload.Form("name")
SenderEmail = upload.Form("email")
Subject = "Regarding " & upload.Form("subject")
Recipient = upload.Form("recipient")

'输入你的SMTP-server
JMail.ServerAddress = "mail.duplo.org"

JMail.Sender = Senderemail
JMail.Subject = Subject

JMail.AddRecipient Recipient

JMail.Priority = 3

JMail.Execute

%>
<html>

<head>
<title>Dimac</title>
</head>

<body>

<p align="center"><font face="Arial, geneva" size="5">
eMail sent</font></p>
<center>
<font face="Arial, geneva" size="3">
Your email has been sent to <%= Recipient %>

</font>

</center>
</body>
</html>