w3 upload組件執行個體應用3

來源:互聯網
上載者:User
檔案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.
<br><br>
Your name <br>
<input type="text" size="25" name="name"><br>

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

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

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

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

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

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

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

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

Attachments<br>
<input type="file" name="attachment3">
<br>
<br>
<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>
<BR>
<BR>
<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 %><br>
<BR>
<BR>
<BR>

</font>

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



相關文章

E-Commerce Solutions

Leverage the same tools powering the Alibaba Ecosystem

Learn more >

Apsara Conference 2019

The Rise of Data Intelligence, September 25th - 27th, Hangzhou, China

Learn more >

Alibaba Cloud Free Trial

Learn and experience the power of Alibaba Cloud with a free trial worth $300-1200 USD

Learn more >

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。