Outlook でフォルダーを作成するために .vbs ファイルを作成しました。
スクリプトのほとんどをMSDNからコピーして取得しました
「予期されるステートメントの終了」エラー コード 800A0401
Option Explicit
Dim myNameSpace As Outlook.NameSpace
Dim myFolder As Outlook.Folder
Dim myNewFolder As Outlook.Folder
Set myNameSpace = Application.GetNamespace("MAPI")
Set myFolder = myNameSpace.GetDefaultFolder(olFolderInbox)
Set myNewFolder = myFolder.Folders.Add("Postini")
Wscript.Echo "Folder created"
Wscript.Quit
以前に .vbs スクリプトを作成したことがありません。
Windows 7 64 ビットおよび Outlook 2010。ローカル管理者として実行。