title image


Smiley Re: email über Hyperlink
Hallo Renate,Versuchs mit Shellexecute:'DeklarationenPrivate 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 LongFunction StartDoc(ByVal DocName As String)On Error GoTo StartDoc_ErrorStartDoc = Shellexecute(Application.hWndAccessApp, "Open", DocName, _"", Left(DocName, 3), 3)Exit FunctionStartDoc_Error:MsgBox Err.Description & ", " & Err.NumberExit FunctionEnd FunctionPrivate Sub Befehl6_Click()StartDoc ("mailto:adresse@provider")End SubGrußWalter Griesser

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: