lukke et program

smid det i et BAS module

sjh -> wow..., her har jeg ikke vært før ...
Jeg lavet det i .bas med name CloseProg
Jeg prøver at kalle den med:

Private Sub Command2_Click()
CloseProg.KillProc ("lillefile.exe")
End Sub

Men her skjær det intet, hva gjør jeg fejl?

Ja, lad mig sige med det samme.. hvis din "lillefile.exe" er et program som køre som service, så skal du ikke være sikker på du kan lukke det..

men som eksempel.. start notesblok.. og prøv at se om den ikke lukker når du køre den sådan..

Private Sub Command2_Click()
  Call KillProc("notepad.exe")
End Sub

sjh -> Jepp,... den virker fint med: KillProc("notepad.exe") så problemet ligge i min "lillefile.exe". Jeg får lukke den med:

Public Function EnumWindowsProc(ByVal hwnd As Long, ByVal lParam As Long) As Boolean
  AppActivate "lillefile" ' as App.Title
    SendKeys "%{F4}", True
End Function

Men..., knape Command2_Click() virke fint når "lillefile.exe" er åpne for første gang. -> Hvis jeg starte programme for andet gang eller åpne 2x, må jeg klike på Command2 3-4 gange for at få den til at virke.

Sjh, har du en ide for at kjøre Function EnumWindowsProc(... i modulen f.eks 10 gange?

Den går fint med:
Do While i < 10
Call KillProc("lillefile.exe")
MsgBox i 'her er det problem
i = i + 1
Loop

Men,... fjærner jeg MsgBox i blir den forkert.
Den trenger at stope litd her. Har du en idee for at sete in timer der?

Jeg har den, 8)
Lav et svar sjh, points on the way :)

nej tak.. lave selv et svar og tag dine point tilbage igen..

Ok et svar:
Jeg har ikke klart at kille "lillefile.exe" med VB Ninja Proces Killer(as et slag) så jeg måste slå den mange gange her as vente og slå ved hjælp av timer
-> /sjh/ har fått meg på korrekt bane her og jeg ville så gjærne si tusind tak to him ;)
Terra