2

wysiwyg Editorを使用してNewsLetterを作成しています。これにより、画像パスをアップロードでき、画像パスはアップロードディレクトリに保存されます。Webサイトでその画像を取得すると、編集者の値はデータベースの例に保存されます。 <br>こんにちは

<img src="upload/acb.gif">

<br>

こんにちは

私はEメールを送信しています。このEメールの詳細はデータベースから受信され、この詳細は訪問者に送信されます

彼はすべてのテキスト値を取得していますが、画像を見ることができません

だから私に何をすべきか提案してください..？

4

5 に答える 5

3

CDOSYS.Message を使用して電子メールを送信する場合、Message.CreateMHTMLBody(url) メソッドを使用して、画像が埋め込まれた完全な Web ページを簡単に送信できます。

Dim Message
Set Message = CreateObject("CDOSYS.Message")

Message.From = "from@email.org"
Message.To = "to@email.org"
Message.CreateMTHMLBody "http://yourserver.org/email.html"
Message.Send()
于 2010-04-14T22:12:55.960 に答える
2

私は最近、これを行うために横たわっていたいくつかのコードをクリーンアップし、github の「Gist」としてオンラインで平手打ちしました。それがまだ誰かを助けることを願っています!

CDOSYS を使用した埋め込み画像の送信

このソリューションでは、CDO (CDOSYS / CDO.Message) と「AddAttachment」を使用し、添付ファイルのプロパティを手動で制御して、電子メール HTML 内から使用できるようにし、電子メール クライアントで個別にダウンロード可能な添付ファイルとして表示されるのを回避します。

使用方法は非常に簡単です。メッセージの HTML でローカル パス (コードが実行されているコンピューター上) で画像を参照するだけです。

Some Image: <img src="<EMBEDDEDIMAGE:C:\test.jpeg>" />

コードはファイル名を取得し、そのファイルを添付ファイルとしてメッセージに追加し、メッセージ HTML の関連部分をその添付ファイルへの内部参照に置き換えます。

于 2012-08-30T10:20:24.050 に答える
1

サイトの URL を img ソースに追加する必要があります

<img src="http://www.sitename.com/upload/acb.gif"> ユーザーが自分のメールボックスからサイトにアクセスしていないためです。

このために、「http://www.sitename.com/」を web.config のキーとして設定し、メールで使用できます。

これにより、問題が確実に解決されます。ハッピーコーディング!!!!!!!!!!!!

于 2010-04-07T10:19:58.630 に答える
0

AddRelatedBodyPart を使用します。

埋め込みの使用方法 配列を作成し、それを「SendMail」関数に渡します。メール本文でパラメータとして使用します。

Dim arrRelatedBodyPart(1)
arrRelatedBodyPart(0) = Server.MapPath(".") & "/images/barcode/bar_blk.gif"
arrRelatedBodyPart(1) = Server.MapPath(".") & "/images/barcode/bar_wht.gif"

例

For i = 0 To UBound(arrRelatedBodyPart)
    Dim strPathAndFileName: strPathAndFileName = arrRelatedBodyPart(i)
    Dim strFileName: strFileName = GetFileName(arrRelatedBodyPart(i), "/")
    '.AddRelatedBodyPart strPathAndFileName, strFileName, cdoRefTypeId

    Set objCDOBodyPart = .AddRelatedBodyPart(strPathAndFileName, strFileName, 1)
    objCDOBodyPart.Fields.Item("urn:schemas:mailheader:Content-ID") = "<" & strFileName & ">"
    objCDOBodyPart.Fields.Update
Next
于 2012-09-01T08:31:37.290 に答える
-1

電子メールの送信に何を使用していますか。過去に AspEmail を使用して成功しました: http://www.aspemail.com/

埋め込み画像の送信方法については、こちらで説明しています: http://www.apemail.com/manual_04.html

ただし、サーバーにインストールする必要があります。共有ホスティングを使用している場合、これは問題になる可能性があります。独自のサーバーを実行している場合は非常に簡単です。

于 2010-04-07T10:13:08.977 に答える