|
-
Sep 21st, 2001, 06:05 AM
#1
Thread Starter
Junior Member
using the shell to popup default email client
Hi,
I have a button on my form that when clicked it pops-up the default email client with a few of it's field filled such as "Subject" and "body".
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
(ByVal hwnd As Long, ByVal lpszOp As String, _
ByVal lpszFile As String, ByVal lpszParams As String, _
ByVal LpszDir As String, ByVal FsShowCmd As Long) _
As Long
Private Const SW_SHOWNORMAL = 1
Private Sub Send_Click()
Dim l As Long
l = ShellExecute(Me.hwnd, "Open", "mailto:?Subject=Hello&Body=Thought you would like to download this ." + Chr(13) + "PC users here - download the file to your desktop and start using. ", "", "C:\", SW_SHOWNORMAL)
End Sub
The problem is that I would like to format the text in the body of the message but do not know what character to insert in order to get sentences on new lines in the body section. I tried using Chr(13) also "\n" and "\r" but none of them worked.
I am assuming that most of the users will have Outlook or Outlook Express as their email client and was wondering if anyone could help me find out how to do it.
Thank you
Why did I ever start learning VB?! I should have been happy with Java. 
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|