> Jeg ønsker i et basic program at åbne en ny mail til en adresse.
> Sikkert enkelt, men hvordan?
' ShellExecute - Smides i et modul
Public Const SW_SHOWNOACTIVATE = 4
Public Const SW_SHOWNA = 8
Public Const SW_SHOWMINNOACTIVE = 7
Public Const SW_SHOWMINIMIZED = 2
Public Const SW_SHOWMAXIMIZED = 3
Public Const SW_SHOWDEFAULT = 10
Public Const SW_SHOW = 5
Public 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
'dette smides ind hvor du har brug for det !
Private Sub Command1_Click()
ShellExecute Me.hwnd, vbNullString, "mailto:xxx@yyy.com?subject=her
skrives subject", vbNullString, "C:\", SW_SHOWNORMAL
End Sub
om det er den eneste måde, eller den bedste måde at gøre det på ved jeg ikke
.... men det virker !
Held og lykke
Neo
|