Basp21のメール送信機能を win10（64bit） Excel2019で使用する方法

よろしくお願いします。
今までWin7（32bit）のExcel2007にて、Basp21のメール送信機能を使用していたのですが、
PC買い替えにより、win10（64bit） Excel2019に変更しました。

すると、メール送信ボタンを押した際に、デバックで「クラスが登録されていません」
のエラーダイヤログが出、当該のコードを確認すると

Set bobj = CreateObject("basp21") でひっかかっているようでした。

そこで当方がしました処置として、
basp21のアンインストール、再インストール
IISマネージャにて、32ビットアプリケーションの有効化を「true」に変更しましたが、
結果は変わらず、エラーのままでした。

上記につきまして、解決方法をご教授いただけましたら幸いです。
以上、何卒よろしくお願いいたします。

質問者からの補足コメント

• VBAで利用しています

    補足日時：2019/09/27 11:38

• CDOで同等の処理ができるようになりました！
  ポートの箇所でだいぶん躓きましたが；
  
  情報を頂けなければ、今もBasp21をなんとか使えないかと、無駄な時間を過ごしていたと思います。
  明日にこの質問を締め切らさせていただきますが、取り急ぎの御礼まで。
  
  ありがとうございました！

  No.1の回答に寄せられた補足コメントです。 補足日時：2019/09/27 19:40

No.2 回答者： rabbit_9999 回答日時： 2019/09/27 19:48

No.1です。

ご報告ありがとうございます。
お役に立てたのなら、何よりです(^^)

この回答へのお礼

おはようございます。
おかげさまで今朝はすっきり起きることができました。

この度は誠にありがとうござました！

お礼日時：2019/09/28 06:50

No.1 ベストアンサー 回答者： rabbit_9999 回答日時： 2019/09/27 11:37

Excelも64bit版ですか？

Basp21（無料版）は64bit対応してないはずです。
有料版を購入するか、CDOでのメール送信に変更する必要があります。

CDOでメール送信
http://www.asahi-net.or.jp/~ef2o-inue/vba_o/sub0 …

もし、Excelは32bit版ということなら、「Bsmtp.dll」を「SysWOW64」フォルダに入れてみてください。

この回答へのお礼

ご回答、誠にありがとうございます。
2019のOfficeですので強制的に64bitです。。。

ttps://blog.goo.ne.jp/cestaff/e/9a080184a3e6008e54e49e958e87503d

上記の記事のように、64bitで動作した、とのことで期待していたのですが、
Excelが64bitでしたら内容が変わってくるのですね。

Basp21の有料版、あるなーと思いつつ、そのページから目をそらしていたのですが、見ると、とても高額ですね；
それでしたらOfficeの2016（32bit）を買いなおしたほうがよさげです。

使う機能はメール送信だけですので、CDO を試してみようかと思います。
情報を頂き誠にありがとうございました。

お礼日時：2019/09/27 12:03