launch the url "mailto:[email protected]?subject=yoursubject&body=body" with in the program ?
Here is the code to launch the default mail program..
' Browser call routine
#If Win32 Then
Private Declare Function ShellExecute Lib _
"shell32.dll" Alias "ShellExecuteA" _
(ByVal hwnd As Long, _
ByVal lpOperation As String, _
ByVal lpFile As String, _
ByVal lpParameters As String, _
ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As Long
#Else
Private Declare Function ShellExecute Lib "shell.dll" (ByVal hwnd As Integer, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Integer) As Integer
#End If
Private Const SW_SHOWNORMAL = 1
Private Sub Link1_Click()
Dim iret As Long
iret = ShellExecute(Me.hwnd, vbNullString, "mailto:[email protected]?subject=yoursubject&body=body", vbNullString, "c:\", SW_SHOWNORMAL)
End Sub
See form below ....
It is the mark of an instructed mind to rest satisfied with the degree of precision which the nature of the subject admits, and not to seek exactness when only an approximation of the truth is possible.
-Aristotle As quoted in Rapid Development, chapter 8, page 167.