ACCESS 2010 ExecCmd (Shell Befehl) ausführung innerhalb Formular einbinden und anzeigen lassen

Ich habe da eine Frage an die Access Spezialisten.

Besteht die Möglichkeit ein Shellaufruf innerhalb eines Formular (active x oder ähnl) einzubinden.

Ich lasse div. Batch Dateien im moment wie folgt aufrufen

Public Sub ExecCmd(cmdline$)
     Dim proc As PROCESS_INFORMATION
     Dim Start As STARTUPINFO
     Dim ReturnValue As Integer
' Initialisiert die STARTUPINFO Struktur:  

     Start.cb = Len(Start)
' Startet die Shell-Anwendung:  

     ReturnValue = CreateProcessA(0&, cmdline$, 0&, 0&, 1&, _
     NORMAL_PRIORITY_CLASS, 0&, 0&, Start, proc)
' Wartet bis Shell-Anwendung geschlossen ist:  

     Do
       ReturnValue = WaitForSingleObject(proc.hProcess, 0)
       DoEvents
       Loop Until ReturnValue <> 258
ReturnValue = CloseHandle(proc.hProcess)

   End Sub

und per Button, dann ausführen

Sub xmlDatein_einlesen()

Dim fs As Object, ordner As Object
Set fs = CreateObject("Scripting.filesystemobject")  
   ExecCmd "C:\anpassung.bat"  
End Sub

Dieses im Moment als eigenen Task öffnende Fenster möchte ich gerne in einem Formular einbinden.

Please also mark the comments that contributed to the solution of the article

Content-Key: 206584

Url: https://administrator.de/contentid/206584

Printed on: April 16, 2024 at 14:04 o'clock

German Question Microsoft Office Microsoft