SQLの窓 イラストAC フリー素材

2018年04月21日

Basp21 を使ってバッチ処理からメールを送る

Basp21 は古くからある動作のかなり信用できるメール処理アプリケーションで、インストール後、利用可能なプログラミング言語から呼び出します。一番簡単なのは、VBScript ですが、他にもいろいろあります。

ダウンロードは こちら からできますが、自分が使う時は最新では無くいつも『BASP21-2003-0211.exe (1.44MB)』を使用しています。実際問題これで特に問題は出ないので、それより新しいのは特殊な事情の方のみが使うものです。

それと、これは重要なのですが、このアプリケーションは 32ビットOS 用なので、64ビット環境でそのまま使えない事がほとんどです。この場合ですと、cscript は、%systemroot%\syswow64\cscript と書き換える必要があります。ある程度知識のある方ならば、以下のドキュメントも参考になると思います。
( Windows8 で動作を確認しました / syswow64 の cscript )

64 ビット バージョンの Windows でシステム レジストリを表示する方法

▼ 64ビット PC のバッチファイル
------------------------------------------------------------
@echo off
%systemroot%\syswow64\cscript.exe basp_mail.vbs "題 名" "本 文に\n送る\n内 容"
------------------------------------------------------------

▼ 32ビット PC のバッチファイル
------------------------------------------------------------
@echo off
cscript.exe basp_mail.vbs "題 名" "本 文に\n送る\n内 容"
------------------------------------------------------------

basp_mail.vbs

SMTP サーバーは、さくらインターネットを使用しています。
【さくらのメールボックス】基本仕様

Gmail は送信も受信もできませんでした
Yahoo! と さくらインターネットへは送信できました
strUser = "ユーザ@初期ドメイン"
strPass = "パスワード"

Set Basp21 = CreateObject( "Basp21" )

strServer = "初期ドメイン"
nPort = 587

SMTPServer = strServer & ":" & nPort
MailTo = "あなたです <送り先メールアドレス1>"
' CC
MailTo = MailTo & vbTab & "cc" & vbTab & "日本語宛先2 <送り先メールアドレス2>"
' BCC
MailTo = MailTo & vbTab & "bcc" & vbTab & "日本語宛先3 <送り先メールアドレス3>"

MailFrom = "私です <ユーザ@初期ドメイン>"
MailFrom = MailFrom & vbTab & strUser & ":" & strPass

strSubject = Wscript.Arguments(0)
strTextbody = Replace( Wscript.Arguments(1), "\n", vbCrLf )


ErrMessage = Basp21.SendMail( _
	SMTPServer, _
	MailTo, _
	MailFrom, _
	strSubject, _
	strTextbody, _
	"" _
)

if ErrMessage <> "" then
	Wscript.Echo ErrMessage
else
	Wscript.Echo "メール送信が終了しました。"
end if


関連する記事

あらためて、XAMPP に入ってる sendmail.exe をバッチファイルから動かして日本語のメールを送信する

Windows 標準の CDO.Message で簡単にバッチ処理からメールを送る




タグ:VBScript Basp21
【役に立つWindowsの最新記事】
posted by at 2018-04-21 20:26 | 役に立つWindows | このブログの読者になる | 更新情報をチェックする


Android SDK ポケットリファレンス
改訂版 Webデザイナーのための jQuery入門
今すぐ使えるかんたん ホームページ HTML&CSS入門
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX