ソース掲示板




すべてから検索

キーワード   条件 表示 現行ログ 過去ログ トピックス 名前 本文
メール送信スクリプト ( 雛型 )
日時: 2018/02/04 19:28
名前: lightbox



Windows で特別なインストール無しに実行できます

拡張子:
<JOB>
<SCRIPT
	language="VBScript"
	src="http://lightbox.in.coocan.jp/laylaClass.vbs">
</SCRIPT>

<SCRIPT language=VBScript>
' ***********************************************************
' 処理開始
' ***********************************************************
Call laylaFunctionTarget( "http://lightbox.in.coocan.jp/" )
Call laylaLoadFunction( "baseFunction.vbs" )
Call laylaLoadFunction( "toolFunction.vbs" )

Server = "サーバー:587"
Mailfrom = "ユーザーメールアドレス" & vbTab & "ユーザーアカウント:パスワード"
Subject = "テスト"
Body = GetInline("Mail_Body")
Files = ""

list = ""
list = list & "送り先メールアドレス1" 
list = list & ";"
list = list & "送り先メールアドレス2" 
list = list & ";"
list = list & "送り先メールアドレス3" 

Mailto = list

ret = CDOSendMail( _
		Server, _
		Mailto, _
		Mailfrom, _
		Subject, _
		Body, _
		Files _
	)

if ret  <> "" then
	Wscript.Echo ret
else
	Wscript.Echo "メール処理は正常終了しました"
end if

</SCRIPT>

<RESOURCE id="Mail_Body">
システムからのお知らせ

本日リリースされます

lightbox
</RESOURCE>

</JOB>
※ 但し、パスワードは暗号化されません
メンテナンス


日時: 2018/02/04 19:28
名前: lightbox