call shell

• call shell von axel vom 28.11.2003 16:52:29
  • AW: call shell - von Nepumuk am 28.11.2003 17:32:58
    • AW: call shell - von axel am 30.11.2003 20:06:29
      • AW: call shell - von Nepumuk am 01.12.2003 18:42:41

Betrifft: call shell
von: axel
Geschrieben am: 28.11.2003 16:52:29
hallo,

wie kann ich eine applikation, die ich mit "call shell" geöffnet habe wieder in VBA schließen?

Betrifft: AW: call shell
von: Nepumuk
Geschrieben am: 28.11.2003 17:32:58
Hallo Axel,
was ist das für eine Application und auf welcher Windowsversion soll dein Programm laufen?
Gruß
Nepumuk

Betrifft: AW: call shell
von: axel
Geschrieben am: 30.11.2003 20:06:29
hallo,

es ist win2000 und die Applikation ist sqlplus!

Betrifft: AW: call shell
von: Nepumuk
Geschrieben am: 01.12.2003 18:42:41
Hallo Axel,
ich habe dich fast vergessen. Das geht so:

Option Explicit
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal Hwnd As Long, ByVal wMsg As Long, ByVal wParam As Integer, ByVal lParam As Long) As Long
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Public Sub CloseWindow()
SendMessage FindWindow(vbNullString, "Test.txt - Editor"), &H10, 0, 0
End Sub

Code eingefügt mit: Excel Code Jeanie

Das Beispiel ist für eine Textdadei. Den Namen den du einsetzen musst, findes du im Taskmanager - Anwendungen, wenn du das Programm sqlplus gestartet hast.
Gruß
Nepumuk