初めまして。
只今VB6でBasp21を使用してメール送信ソフトを開発しております。
それでメール送信自体は完成しておりますが
デコメとしてメール送信を行いたいと思っておりますが
うまく送信できません・・・
特にデコメ用の画像を貼り付けるのがどうやればいいのか不明でして・・・
一応下記にソースを記載しておきます。
どなたかご教授頂ければ幸いです。
宜しくお願い致します。
Set bobj = CreateObject("basp21")
mailto = ">Content-Type: text/html; charset=iso-2022-jp" & vbTab & "xxx@unko.com"
mailfrom = "text@text.com"
subj = "subject"
body = "<HTML><BODY bgcolor=#008284><H1>こんにちは</H1> さようなら</BODY></HTML>"
msg = bobj.SendMail(svname,mailto,mailfrom,subj,body,files)
If msg <> "" Then
msgbox msg
End If
Set bobj = Nothing
携帯電話のデコメはtext/plainとtext/htmlのマルチパートメールです。
このコードだとtext/htmlのメールだけなのでデコメとしては機能しない
ようです。
参考01(docomoのデコメール説明)
http://www.nttdocomo.co.jp/service/imode/make/content/deco_mail/
参考02(BASP21のメール送信)
http://www.atmarkit.co.jp/bbs/phpBB/viewtopic.php?topic=48088&forum=7
画像を貼付けるには
<img src="cid:コンテンツID">というコードをはめ込めば良いみたいです。
URL指定が出来ないので添付ファイルのパートからコンテンツIDを抜き
出して使うんだと思います。
こんな回答しか出来なくて申し訳ないです。
みけ 様
ご教授誠に有り難う御座います。
参考URL自分も別で見つけて見ましたが
それでもうまくいかず・・・
なかなか難しいですね・・・
何とか自力でやってみます。
本当に有り難う御座いました。
また何かお気づきになられましたらご教授頂ければ幸いです。
今後とも、宜しくお願い致します。
マイルド様
いえいえ、少しでもお役に立てて良かったです。
ちなみにVB6の範疇ではなくなりますが、VB.NET系で
あればメール送信に関してはマルチパートメールを比較的
簡単に作れるようです。
http://dobon.net/vb/dotnet/internet/htmlmail.html
当の私は最近はC#か.NETのVBでコードを書いていたりするので
BASP21ではなくnMailという別の送受信ライブラリで作っています。