chiudere un'applicazione [VB]

[magnus]

Ammettiamo abbia aperto più di un'applicazione con il comando shell:

shell "C:\ciao.exe"
shell "C:\prova.exe"

Come posso chiudere l'applicazione "ciao.exe" tramite un comando?

Es:

Kill "c:\ciao.exe"

Esiste un comando per fare ciò ( ovviamente in VB )?

Grazie mille!!!!!!

[chipdb]

Veramente esiste, anche se però viene riconosciuta potenzialmente dannosa dagli antivirus (l'AVP la riconosce come virus proprio perchè in grado di chiudere applicazioni esterne!!).

Quello che ti basta sapere é la caption della finestra che devi chiudere.

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Const WM_CLOSE = &H10

Private Sub Form_Load()
    Dim winHwnd As Long
    Dim RetVal As Long
    
    winHwnd = FindWindow(vbNullString, "Calcolatrice")
    If winHwnd <> 0 Then
        PostMessage winHwnd, WM_CLOSE, 0&, 0&
    Else
        MsgBox "La calcolatrice non é aperta."
    End If
End Sub

Ciao

[magnus]

ok, proverò anche così...

Ma l'altra istruzione a cui facevi riferimento,qual'è?

Grazie,
Ciao.

[chipdb]

Non facevo riferimento ad altre soluzioni! Forse ho detto male qualcosa.

Il codice che ti ho dato chiede aiuto ad un'API, la quale é direttamente collegata con lo user32, un file dall'alto potenziale in Windows. Dicevo semplicemente che alcuni antivirus lo riconoscono come codice dannoso proprio per il fatto che riesce a chiudere applicazioni esterne al programma (quindi in teoria riuscire a chiudere anche l'antivirus nel caso si tratti proprio di virus!).

Ciao

[magnus]

ok, grazie

[chipdb]

Di niente. Bye