Hello.
I am trying to embed an image in a email, but it doesn't work.
This is my code:
Where
Parte1.txt =
Parte2.txt =
vrTextoLink = http://www.edintel.com/campanas/bms-energia1.jpg
The log result is
But the image is not displayed in the email client (yes, I pulsed the "Show Remote Content" button)
Any idea?
Thanks a lot
I am trying to embed an image in a email, but it doesn't work.
This is my code:
B4X:
If chkHTML.Checked=True Then
Dim vrTextoLink As String
Dim vrParte1 As String
Dim vrParte2 As String
vrTextoLink=vrSMTP.Body
vrParte1=File.ReadString(File.DirAssets,"Parte1.txt")
vrParte2=File.ReadString(File.DirAssets,"Parte2.txt")
vrSMTP.Body=vrParte1 & vrTextoLink & vrParte2
Log(vrSMTP.Body)
End If
Where
Parte1.txt =
<html>
<body>
<p>
This is a paragraph displayed before the picture.
</p>
<img src="
Parte2.txt =
"
width="250"
height="95"
border="0"
alt="my picture">
<br>
This is a caption for the picture.
<p>
This is a paragraph displayed after the picture.
</p>
</body>
</html>
vrTextoLink = http://www.edintel.com/campanas/bms-energia1.jpg
The log result is
<html>
<body>
<p>
This is a paragraph displayed before the picture.
</p>
<img src="http://www.edintel.com/campanas/bms-energia1.jpg"
width="250"
height="95"
border="0"
alt="my picture">
<br>
This is a caption for the picture.
<p>
This is a paragraph displayed after the picture.
</p>
</body>
</html>
But the image is not displayed in the email client (yes, I pulsed the "Show Remote Content" button)
Any idea?
Thanks a lot