Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


9455 / 13644 ツリー ←次へ | 前へ→

【19249】ActiveXコンポーネントはオブジェクトを作成できません EMK 04/10/26(火) 14:54 質問[未読]
【27220】Re:ActiveXコンポーネントはオブジェクトを作成できま... 通りすがり 05/8/2(火) 17:29 回答[未読]

【19249】ActiveXコンポーネントはオブジェクトを作成できま...
質問  EMK  - 04/10/26(火) 14:54 -

引用なし
パスワード
   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)

【27220】Re:ActiveXコンポーネントはオブジェクトを作成でき...
回答  通りすがり  - 05/8/2(火) 17:29 -

引用なし
パスワード
   "regsvr32 nlsxbe.dll"
をコマンドプロンプトから実行してみて下さい。
regsvr32には多分PATHは通っていると思いますので、
Notesのシステムのディレクトリーから実行されると良いかと思います。

9455 / 13644 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free