VB6で作成したメールソフトでメッセージボックスが表示されないようにする方法

このQ&Aのポイント
  • VB6で作成したメールソフトで、メール送信時に表示される「メッセージを送信しますか」というメッセージボックスを非表示にする方法について教えてください。
  • 具体的には、MAPI コンポーネントを使用してメール送信をする際、MAPIMessages1.Send False のコードを実行すると、メッセージボックスが表示されます。このメッセージボックスを出さずにメールを送信する方法が知りたいです。
  • 解決策をご存知の方がいらっしゃいましたら、教えていただけると幸いです。
回答を見る
  • ベストアンサー

MAPI コンポーネントを使ったメールソフト

VB6で、MAPI コンポーネントを使ったメールソフトを作ったのですが、メール送信時に「メッセージを送信しますか」とのメッセージボックスが開きますが、このメッセージボックスが出ないようにするにはどうしたら良いでしょうか? 具体的には、 MAPIMessages1.AttachmentIndex = 0 MAPIMessages1.AttachmentPathName = attcbin MAPIMessages1.AttachmentName = attcsb MAPIMessages1.AttachmentPosition = 0 MAPIMessages1.AttachmentType = 0 MAPIMessages1.MsgNoteText = mailmsg MAPIMessages1.Send False←ここでメッセージボックスが出ます。 MAPIMessages1.SignOff ご存知の方がいらっしゃいましたら教えてください。 よろしくお願いいたします。

質問者が選んだベストアンサー

  • ベストアンサー
回答No.1

VB側の問題ではなくて メールクライアント側の問題。 OE6なら オプション ↓ セキュリティー ウィルス防止 ↓ ほかのアプリケーションが私の名前でメールを送信しようとしたら警告する。 のチェックを外す。 個人的にはVBにメール機能を付けるならMAPIを使わずに BASP21などのメール機能があるDLLを使った方が いいと思います。

dagu922
質問者

お礼

ありがとうございました。 とりあえず、問題点をクリアーすることが出来ました。 BASP21はまだ試していませんが、ぜひ試してみたいと思います。

関連するQ&A

  • MAPIコントロールでファイル添付してメール送信

    VB6.0SP5で、MAPIセッション/MAPIメッセージコントロールを使用して、ファイルを添付したメールを作成し、送信を行っています。 ところが、受信者には添付ファイルの無いメールが届いたり、attach3というファイルが添付されていて(内容は見れない)届いたりとうまくいきません。 何かご存知のかたいらっしゃいましたら、教えてください。よろしくお願いします。

  • メール自動送信について(MAPI)

    5~6年前にメールを自動送信するプログラムを作りました。 VBのMAPIを使い数百人にメールで添付ファイルを送信するプログラムを作りました。一時期使っていたのですが、しばらく使っていませんでした。 新システムまでのつなぎとして、給与明細をメールで送信する必要が生じました。過去のプログラムを引っ張り出した実行しますとメッセージボックスがあて先ごとにでて送信ボタンを1あて先ごとに押さなければなりません。Outlook Expressでスパムメール対策でもはじめたのでしょうか?これを自動化(メッセージボックスを出さないように・応答要求がこないように)出来ないものでしょうか? ご指導のほど宜しくお願いいたします。 メッセージの内容 警告マーク   プログラムがユーザの代わりに次の電子メールメッセージを送ろうとしています。 あて先:XXXXXXXXXX 件名:給与明細 メッセージを送信しますか?  送信   送信しない   <-ボタン

  • MAPIを有効にするには?

    お世話になります。 電子メールソフトウェアのMAPIを有効にするには どのようにすれば良いのでしょうか? VAIOにプリインストールされている「フォトコレクション」で 画像をメールに添付して送信したいのですが、 画像の変換設定まではできるのですが、 メールソフト(OutlookExpress)が起動しません。 どうぞよろしくお願いいたします。

  • 販売ソフトでメールを送る時にMAPIの設定がされていないと表示される

    弥生シリーズの販売ソフトからメールを送るときに、これまではメールボタンを押すとoutlookの新規メールが立ち上がり、そのまま送信できたのですが急にメールボタンを押しても「メールを送るアプリケーションがMAPIに対応していないか、MAPIの設定がされていません」とエラー表示が出てきます。 メールソフトはoutlook Express 6.0 また、「このメールソフトは規定のメールハンドラです」となっています。 意味が良く分からないのですが、一体どういった意味でしょうか?

  • VBでメール送信ソフトを作成

    こんにちわ。 タイトルの通りなんですが、VBで簡易的なメール送信 ソフトを作ろうと考えています。 (テキストボックスに入力された文字を送信) VBでメールの送信(受信)を行うには、Winsockを使用 すればいいというのは分かりましたが、具体的な使用 方法がわかりません。 まだ入門書片手にVBの勉強をしている者なので、細か く解説してくれる方、また詳細な説明のあるサイト を知っている方がいらっしゃいましたらご回答ください。 よろしくお願いします。

  • VBで添付ファイル付きのメールを送信したい

    こんにちは。いつもお世話になっております。 現在、VB6.0でメーラーを起動し、そこへ添付ファイルを付けて送信を行うと言う作業を行っております。 ユーザー側で、実行ボタンを押したときに送信まで行ってしまうか、送信はせず、新規メールの起動だけで終るかを選択できるようになっています。 自分なりに色々と調べて、MAPIを使用したプログラムでの操作はできたのですが、テストメーラーをOutlook ExpressからMicrosoft Outlookに変更したら、送信部分が上手く動作しませんでした。 どのメーラーでも上手く動くように設定したいのですが、何か方法はありませんでしょうか? また、送信時に出てしまう確認メッセージを出さずに自動送信する方法はありますか?MAPIを使用せずに添付ファイル付きのメールを送信する方法でも構いません。 宜しくお願い致します。 MAPISession1.SignOn MAPIMessages1.SessionID = MAPISession1.SessionID MAPIMessages1.Compose MAPIMessages1.RecipType = mapToList 'あて先欄に表示させたい文字 MAPIMessages1.RecipDisplayName = "テストさん" 'あて先のメールアドレス MAPIMessages1.RecipAddress = "SMTP:メールアドレス" MAPIMessages1.MsgSubject = "納品明細" MAPIMessages1.MsgNoteText = "本文内容" & vbCrLf MAPIMessages1.AttachmentPathName = App.Path & "\納品明細.xls" 'チェック有りの場合は自動送信 If chkAuto.Value = 0 Then  'Falseにすると自動送信になります  MAPIMessages1.Send True Else  MAPIMessages1.Send False End If MAPISession1.SignOff

  • グッドなコンポーネント

    現在、WindosNT上でVB6.0でタッチモニタ用の画面を作成しています。 その際、コンボボックスの下向きの三角の部分が指でタッチするには 少し小さいので、大きいものを探しています。 このようなコンポーネントを買いたいのですが、何か良い製品を ご存知の方は教えて下さい。

  • メール送信 MAPIMessages.Send (False)での確認画面を出さない方法。

    こんにちは。 VBでのメール送信について伺います。 MAPISessionコントロールと MAPIMessagesコントロールを 利用して複数件のメールを送信しています。 MAPIMessages1.Send (False)にて メール送信を実行していますが、 送信可否の確認ウインドウが出てしまいます。 複数件のメールのため、これを取り除こうと いろいろと試行錯誤していますが、 上手く行きません。 表示しない方法をご存知の方 宜しくお願い致します。

  • アドレス帳からのメール作成・送信

    WinXP SP3です。 Outlook Express のアドレス帳で、アドレス帳の任意アドレスを選択、アクションなどから「メールの送信」で作成・送信していたのですが、下記のようなメッセージが出で送信できません。どういう事なのか、見当がつかなくて(;^-^;)ご存じの方ご教示下さい。 「簡易MAPIプロトコルを使用して実行できる電子メールクライアントが見つかりませんでした。 アドレス帳は簡易MAPIプロトコルを使用して、メールを送信します。使用中の電子メールクライアントが簡易MAPIの通話をサポートしている場合は、このオプションをオンにしてからやり直してください。」

  • VISTA での net send について

    VB2005 の初心者です。 Windows XPなどで、Messengerサービスが動作していれば、net send コマンドで別端末にメッセージを送信することができますが、Windows VISTA には、net send コマンドがなく、同様のことができずに悩んでいます。 Windows VISTA では別端末にメッセージを送信することはできないのでしょうか。Eメールアドレスにメールを送信することはできたのですが、できれば、net send コマンドのようにメッセージボックス(?)を表示させる形でメッセージを送信したいと思っています。 何かヒントになるようなことでも良いので、皆様の知恵をお借りできれば幸いです。 よろしくお願い致します。

専門家に質問してみよう