1. ホーム
  2. Web プログラミング
  3. プログラミング10000問

コンポーネントでメールを自動化する方法とは?

2022-01-17 16:42:59

コンポーネントでメールを自動化する方法とは?

JMailUploadAutoForm.asp
<スパン <html>
<body>
<font face="verdana, arial" size="2"><b>
<form method="post" action="JmailUploadAutoFormProcess.asp" ENCTYPE="multipart/form-data">
<p> 雪を噴き上げる動きのある雲を揺らす メール送信 <スパン </p> <スパン <未定義

<スパン フォームに必要事項を入力してください <スパン , <スパン クリックで送信 <スパン !

<スパン <br><br>
<スパン お名前 <スパン <br>
<input type="text" size="25" name="name"><br>
電子メールアドレス <スパン <br>
<input type="text" size="25" name="email"><br>
受信用メールアドレス <br>
<input type="text" size="25" name="recipient" ><br>
<スパン をしたいですか? ... <br>
<select name="subject" size="1">
<option value="help">
<スパン お問い合わせ <スパン
<option value="こんにちは"> ごあいさつ
<option value="その他">
その他
</select>
<br>
<スパン トピックス <スパン <br>
<input type="text" size="25" name="tipic"><br>
<スパン 概要 <スパン <br>
<input type="text" size="25" name="resume"><br>
<スパン コンテンツを入力してください <br>
<textarea name="QUESTION" cols="40" rows="15" wrap="PHYSICAL"></textarea>
<br>
<br>
<br>
<スパン 添付資料 1<br>
<input type="file" name="attachment1">
<br>
<br>
<スパン 添付資料 2<br>
<input type="file" name="attachment2">
<br>
<br>
<スパン 添付資料 3<br>
<input type="file" name="attachment3">
<br>
<br>
<input type="submit" value="
<スパン 送信 ">
</form>
</b>
ダンシング・ウィズ・ザ・ウィンド」をご覧いただき、ありがとうございます。 <スパン !
</font>
</body></html>
JmailUploadAutoFormProcess.asp。
<%.
Set upload = Server.CreateObject( "w3.Upload" )
セット JMail = Server.CreateObject("JMail.SMTPMail")
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。

' 添付ファイルを確認し、メールに追加する . その他 フォーム 要素がメールに追加されます .
その他
JMail.appendtext( upload.form( i ).name & ": " & upload.form( i ).item & vbcrlf ) を実行します。
終了する場合

名前 = upload.Form("名前")
送信者メールアドレス = upload.Form("email")
件名 = "件名について" & upload.Form("subject")
受信者 = アップロード.フォーム("受信者")

' <スパン 取得 フォーム 変数 , アップロードコンポーネントを使用する .
JMail.ServerAddress = "mail.intels.net".JMail.ServerAddress = "mail.intels.net"
'
<スパン を入力してください。 SMTP-server。
JMail.Sender=Senderemail。
JMail.Subject=件名
JMail.AddRecipient 受信者
JMail.Priority(優先度) = 3
JMail.Executeを実行します。
%>
<html>
<body>
<BR>
<BR>
<p align="center"><font face="Arial, geneva" size="5">.XXX.XXX.XXX.XXX.XXX.XXX.XXX.XXX.XXX.XXX.XXX.XXX.XXX.XXX.XXX;
メール送信成功 !</font></p>
<center>
<font face="Arial, geneva" size="3">
<スパン あなたのメールが送信されました <%= 受信者 %><br>
<BR>
</font>
</center>
</body></html>

[1]