Hi

How can I fill a new email with content from an html file?

Thanks

Regards

Am Sat, 14 Jan 2006 23:04:22 -0000 schrieb John:

You need to read the file´s content first. Sample:

Public Function ReadFile(sPath As String) As String
On Error GoTo AUSGANG
Dim lFileNr As Long
Dim sText As String

lFileNr = FreeFile

Open sPath For Binary As #lFileNr
sText = Space$(LOF(lFileNr))
Get #lFileNr, , sText

AUSGANG:
If lFileNr Then Close #lFileNr
If Err.Number Then Err.Raise &H800A0000 Or Err.Number, _
Err.Source, Err.Description, Err.HelpFile, Err.HelpContext
ReadFile = sText
End Function

Simply add the content then to the mail´s HTMLBody property.

--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook



Hi

How can I fill a new email with content from an html file?

Thanks

Regards

John wrote:

How can I fill a new email with content from an html file?

See if this helps: http://www.slipstick.com/mail1/html.htm
--
Brian Tillman