title image


Smiley Access-MDB per Button aus Formular einer Access-MDB heraus starten
Hallo,



mit ShellExecute funktioniert es prima. Habe dabei in ein Modul mit dem Namen Globales die Public Function abgelegt, die sieht dann so aus:Option Compare Database

Option Explicit



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



Public Const SW_HIDE = 0 ' Versteckt öffnen

Public Const SW_MAXIMIZE = 3 ' Maximiert öffnen

Public Const SW_MINIMIZE = 6 ' Minimiert öffnen

Public Const SW_NORMAL = 1

Public Const SW_RESTORE = 9

Public Const SW_SHOWMAXIMIZED = 3

Public Const SW_SHOWMINIMIZED = 2

Public Const SW_SHOWMINNOACTIVE = 7

Public Const SW_SHOWNOACTIVATE = 4Der Aufruf der entsprechenden Datenbank erfolgt dann über einen Button auf einem Formular mit z.B. folgender Prozedur:Private Sub Termine_Click()

Call ShellExecute(Me.hWnd, "open", _

"E:\Termine\Termine.mdb", _

"", _

"", SW_MAXIMIZE)

End SubGanz herzlichen Dank für Eure Hilfe.



Ergänzend auch Dank in Richtung DBwiki und dem dort abgelegten Tip



http://www.dbwiki.de/wiki.php?title=VBA_Tipp:_Anwendung_mit_ShellExecute_starten



Gruß

Marie

Es gibt keine dummen Fragen, aber dumme Antworten.


geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: