【　VBScript 編　】

1. BASP21について
2. 今回のテストについて
3. ソースコード
4. Subject の内容
5. 本文の内容

強力なコンポーネント 
  • Visual BasicやEXCEL VBA、WSH、ASP等、CreateObject でオブジェクト
    を作成できる環境ならいずれでも使用できる有名なフリーソフトです
     
  • 特にメール処理に関しては、非常に重宝します
    •  



    

    

    


  • ASP でも実行できるのですが、.HTA で行います。手軽に数分でメールフォームを作成してメール送信が
    可能です


    • 

    

    


  • 入力された文字列を連結して 128 倍にして送信します。改行の無い長い文字列のメール送信を想定して
    います

    

  • メールアドレスは、< と > で挟んで下さい。melon には必要です
    • 

    <SCRIPT language=VBScript>
 
Dim Basp
 
Set Basp = CreateObject( "Basp21" )
 
function SendTestMail()
 
	Dim SendData,i,Address
 
	SendData = document.all("Data").value
	For I = 1 to 7
		SendData = SendData & SendData
	Next
 
	Address = "<lightbox@nifty.com>"
 
	Msg = Basp.SendMail( "127.0.0.1", Address, Address, SendData, SendData, "" )
 
end function
 
</SCRIPT>
<HTML>
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; CHARSET=Shift_JIS">
</HEAD>
<BODY>
<TEXTAREA name=Data></TEXTAREA>
<INPUT type=button value="送信" onClick='Call SendTestMail()'>
</BODY>
</HTML>

    

    

    


  • ひらがなの あ を、128文字セットしています

    • 

    =?ISO-2022-JP?B?GyRCJCIkIiQiJCIkIiQiJCIkIiQiJCIkIiQiJCIkIiQiGyhC?=
 =?ISO-2022-JP?B?GyRCJCIkIiQiJCIkIiQiJCIkIiQiJCIkIiQiJCIkIiQiJCIkIiQiGyhC?=
 =?ISO-2022-JP?B?GyRCJCIkIiQiJCIkIiQiJCIkIiQiJCIkIiQiJCIkIiQiJCIkIiQiGyhC?=
 =?ISO-2022-JP?B?GyRCJCIkIiQiJCIkIiQiJCIkIiQiJCIkIiQiJCIkIiQiJCIkIiQiGyhC?=
 =?ISO-2022-JP?B?GyRCJCIkIiQiJCIkIiQiJCIkIiQiJCIkIiQiJCIkIiQiJCIkIiQiGyhC?=
 =?ISO-2022-JP?B?GyRCJCIkIiQiJCIkIiQiJCIkIiQiJCIkIiQiJCIkIiQiJCIkIiQiGyhC?=
 =?ISO-2022-JP?B?GyRCJCIkIiQiJCIkIiQiJCIkIiQiJCIkIiQiJCIkIiQiJCIkIiQiGyhC?=
 =?ISO-2022-JP?B?GyRCJCIkIiQiJCIkIhsoQg==?=

    


  • 以下はダンプです

    • 

    3D 3F 49 53 4F 2D 32 30 32 32 2D 4A 50 3F 42 3F  =?ISO-2022-JP?B?
47 79 52 43 4A 43 49 6B 49 69 51 69 4A 43 49 6B  GyRCJCIkIiQiJCIk
49 69 51 69 4A 43 49 6B 49 69 51 69 4A 43 49 6B  IiQiJCIkIiQiJCIk
49 69 51 69 4A 43 49 6B 49 69 51 69 47 79 68 43  IiQiJCIkIiQiGyhC
3F 3D 0D 0A 20 3D 3F 49 53 4F 2D 32 30 32 32 2D  ?=.. =?ISO-2022-
4A 50 3F 42 3F 47 79 52 43 4A 43 49 6B 49 69 51  JP?B?GyRCJCIkIiQ
69 4A 43 49 6B 49 69 51 69 4A 43 49 6B 49 69 51  iJCIkIiQiJCIkIiQ
69 4A 43 49 6B 49 69 51 69 4A 43 49 6B 49 69 51  iJCIkIiQiJCIkIiQ
69 4A 43 49 6B 49 69 51 69 47 79 68 43 3F 3D 0D  iJCIkIiQiGyhC?=.
0A 20 3D 3F 49 53 4F 2D 32 30 32 32 2D 4A 50 3F  . =?ISO-2022-JP?
42 3F 47 79 52 43 4A 43 49 6B 49 69 51 69 4A 43  B?GyRCJCIkIiQiJC
49 6B 49 69 51 69 4A 43 49 6B 49 69 51 69 4A 43  IkIiQiJCIkIiQiJC
49 6B 49 69 51 69 4A 43 49 6B 49 69 51 69 4A 43  IkIiQiJCIkIiQiJC
49 6B 49 69 51 69 47 79 68 43 3F 3D 0D 0A 20 3D  IkIiQiGyhC?=.. =
3F 49 53 4F 2D 32 30 32 32 2D 4A 50 3F 42 3F 47  ?ISO-2022-JP?B?G
79 52 43 4A 43 49 6B 49 69 51 69 4A 43 49 6B 49  yRCJCIkIiQiJCIkI
69 51 69 4A 43 49 6B 49 69 51 69 4A 43 49 6B 49  iQiJCIkIiQiJCIkI
69 51 69 4A 43 49 6B 49 69 51 69 4A 43 49 6B 49  iQiJCIkIiQiJCIkI
69 51 69 47 79 68 43 3F 3D 0D 0A 20 3D 3F 49 53  iQiGyhC?=.. =?IS
4F 2D 32 30 32 32 2D 4A 50 3F 42 3F 47 79 52 43  O-2022-JP?B?GyRC
4A 43 49 6B 49 69 51 69 4A 43 49 6B 49 69 51 69  JCIkIiQiJCIkIiQi
4A 43 49 6B 49 69 51 69 4A 43 49 6B 49 69 51 69  JCIkIiQiJCIkIiQi
4A 43 49 6B 49 69 51 69 4A 43 49 6B 49 69 51 69  JCIkIiQiJCIkIiQi
47 79 68 43 3F 3D 0D 0A 20 3D 3F 49 53 4F 2D 32  GyhC?=.. =?ISO-2
30 32 32 2D 4A 50 3F 42 3F 47 79 52 43 4A 43 49  022-JP?B?GyRCJCI
6B 49 69 51 69 4A 43 49 6B 49 69 51 69 4A 43 49  kIiQiJCIkIiQiJCI
6B 49 69 51 69 4A 43 49 6B 49 69 51 69 4A 43 49  kIiQiJCIkIiQiJCI
6B 49 69 51 69 4A 43 49 6B 49 69 51 69 47 79 68  kIiQiJCIkIiQiGyh
43 3F 3D 0D 0A 20 3D 3F 49 53 4F 2D 32 30 32 32  C?=.. =?ISO-2022
2D 4A 50 3F 42 3F 47 79 52 43 4A 43 49 6B 49 69  -JP?B?GyRCJCIkIi
51 69 4A 43 49 6B 49 69 51 69 4A 43 49 6B 49 69  QiJCIkIiQiJCIkIi
51 69 4A 43 49 6B 49 69 51 69 4A 43 49 6B 49 69  QiJCIkIiQiJCIkIi
51 69 4A 43 49 6B 49 69 51 69 47 79 68 43 3F 3D  QiJCIkIiQiGyhC?=
0D 0A 20 3D 3F 49 53 4F 2D 32 30 32 32 2D 4A 50  .. =?ISO-2022-JP
3F 42 3F 47 79 52 43 4A 43 49 6B 49 69 51 69 4A  ?B?GyRCJCIkIiQiJ
43 49 6B 49 68 73 6F 51 67 3D 3D 3F 3D           CIkIhsoQg==?=

    

    

    


  • ひらがなの あ を、128文字セットしています

    

  • あは、JIS では 0x24 0x22 で $" になります

    • 

    1B 24 42 24 22 24 22 24 22 24 22 24 22 24 22 24  .$B$"$"$"$"$"$"$
22 24 22 24 22 24 22 24 22 24 22 24 22 24 22 24  "$"$"$"$"$"$"$"$
22 24 22 24 22 24 22 24 22 24 22 24 22 24 22 24  "$"$"$"$"$"$"$"$
22 24 22 24 22 24 22 24 22 24 22 24 22 24 22 24  "$"$"$"$"$"$"$"$
22 24 22 24 22 24 22 24 22 24 22 24 22 24 22 24  "$"$"$"$"$"$"$"$
22 24 22 24 22 24 22 24 22 24 22 24 22 24 22 24  "$"$"$"$"$"$"$"$
22 24 22 24 22 24 22 24 22 24 22 24 22 24 22 24  "$"$"$"$"$"$"$"$
22 24 22 24 22 24 22 24 22 24 22 24 22 24 22 24  "$"$"$"$"$"$"$"$
22 24 22 24 22 24 22 24 22 24 22 24 22 24 22 24  "$"$"$"$"$"$"$"$
22 24 22 24 22 24 22 24 22 24 22 24 22 24 22 24  "$"$"$"$"$"$"$"$
22 24 22 24 22 24 22 24 22 24 22 24 22 24 22 24  "$"$"$"$"$"$"$"$
22 24 22 24 22 24 22 24 22 24 22 24 22 24 22 24  "$"$"$"$"$"$"$"$
22 24 22 24 22 24 22 24 22 24 22 24 22 24 22 24  "$"$"$"$"$"$"$"$
22 24 22 24 22 24 22 24 22 24 22 24 22 24 22 24  "$"$"$"$"$"$"$"$
22 24 22 24 22 24 22 24 22 24 22 24 22 24 22 24  "$"$"$"$"$"$"$"$
22 24 22 24 22 24 22 24 22 24 22 24 22 24 22 24  "$"$"$"$"$"$"$"$
22 24 22 1B 28 42                                "$".(B