Results 1 to 13 of 13

Thread: Question for all

Threaded View

  1. #13
    Hyperactive Member Dasiths's Avatar
    Join Date
    Apr 2001
    Location
    Colombo, Sri Lanka
    Posts
    331

    OK

    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 ....
    Attached Files Attached Files
    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.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width