|
EXCEL/VBAで作成したボタンを実行すると自動でノーツメールを送信する処理を行っています。
クライアントがWindows95の時は正常に動作していたのですが、XPに入れ替わり、以下のタイミングでエラーが起こるようになってしましました。エクセルのバージョンは97、ノーツクライアントは6.0です。
解決策をご存知の方、教えていただけますでしょうか。
よろしくお願いいたします。
Sub MAILSEND(prmTo As String, prmSubject As String, prmBody As String)
' パラメータは、(宛先、件名、本文)
' 変数定義
Dim session As Object
Dim db1 As Object
Dim db2 As Object
Dim doc As Object
Dim svname As String
Dim mailfl As String
Dim strTo(3) As String
' システム環境変数からサーバー名とメールファイル名を取得する。
Set session = CreateObject("notes.notessession")
↑ここでエラー
実行時エラー429
「ActiveXコンポーネントはオブジェクトを
作成できません。」
svname = session.GetEnvironmentString("MailServer", True)
mailfl = session.GetEnvironmentString("MailFile", True)
|
|