WSH実践講座---講座3 メールの作成
著者:Eve Cole
更新時間:2009-05-30 19:53:45
メールボックスを作成するときは、異なる電子メール サーバーを使用する可能性があるため、状況は複雑になります。電子メール情報をテキスト ファイルに保存するもの、レジストリに情報を保存するもの、ADSI インターフェイスを提供するものなど、特定の状況によって異なります。
テキスト ファイル内のユーザーの電子メール情報については、テキスト ファイルを直接操作できます。テキスト ファイルを記述するコード例を次に示します。
f
wxya
Set fs = WScript.CreateObject("Scripting.FileSystemObject")
Set fw = fs.CreateTextFile("c:users.dat")
fw.WriteLine "user1,[email protected],,,"
レジストリに配置されるユーザー情報については、WSH を使用してレジストリを直接操作して、メールボックスの作成を完了できます。たとえば、IMAIL のユーザー情報はレジストリに配置されます。
HKEY_localmacineSoftWareIPswitchdomain の下にあります。メールボックスの初期パスワードに関する唯一の問題は、その暗号化アルゴリズムがわからないことです。したがって、最初にメールボックスを手動で作成し、それを暗号化した後に固定パスワードを使用して、他のメールボックスを作成するときにもそのパスワードを使用することしかできません。問題は、今後パスワードを変更する必要があることをユーザーに伝えなければならないことです。そうしないと安全ではありません。
Exchange Server は、メールボックスの作成を容易にする ADSI インターフェイスを提供します。また、彼のメールボックスは NT ドメイン ユーザーと同期できます。サンプルコードは次のとおりです。
objContainer = GetObject("LDAP://SERVERNAME/o=OrgName/ou=SiteName/cn=Recipients")
objUser = objContainer.Create("リモートアドレス", "cn=CustRecip")
objUser.cn = "CustRecip"
objUser.Put "ターゲット アドレス"、"SMTP:[email protected]"
objUser.Put "インターネット エンコーディング"、1310720objUser.UID = "CustRecip"
objUser.textEncodedORaddress = "c=US;a= ;p=DOIT;o=CDO;s=CustRecip;"
objUser.Mail = "[email protected]"
objUser.Put "otherMailbox"、"MS:OrgName/SiteName/CustRecip"
objUser.Put "レプリケーションの感度", 20
objUser.Put "MAPI-Recipient"、False
objUser.SetInfo
WScript.Echo objUser.cn
i = 1ToobjUser.PropertyCount の場合
vProp = objUser.Next を設定します。
WScript.Echo vProp.Name
次
注: 現在、実験用の Exchange Server を持っていないため、上記のコードはテストされていません。質問がある場合は、元のソースにアクセスして解決策を確認してください。
このスクリプトは、少し変更を加えれば ASP でも使用できます。