.:: Death Killer ::.
hvordan lukker jeg et andet program i VB
PS
Det skal bruges til at lave en ny brugerflade i windows,
Det program jeg laver skal kunne lukke "windows (explore.exe)" som er brugerfladen i windows.
SKAL VIKER PÅ " WINDOWS XP ".
Prøv at kigge under tips og tricks eller i en tidligere tråd!
mener at have set samme spørgsmål!
mvh.
Thomas Christensen
[Redigeret d. 05/06-02 21:22:00 af Thomas Christensen]
JT
private Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
private sub command1_click ()
dim responce as long
responce = CloseProg("Mitprogram")
end sub
private Function CloseProg(STitle As String) As Long
Dim IhWnd As Long
Dim ihTask As Long
Dim iReturn As Long
Dim x As Integer
IhWnd = FindWindow(0&, STitle)
iReturn = PostMessage(IhWnd, WM_CLOSE, 0&, 0&)
End Function
' Husk det er titlen på vinduet og ikke filnavnet
' Sådan kan man lukke et program men i dit tilfælde vil det ikke virke, du er kommet på galt spor.
' hvis du skal lave en anden shell skal det gøres når Windows starter op i Win95-98-me rettede
' man en linje i System.ini. shell = explorer.exe til shell = mywindows.exe