Ciao a tutti mi presento sono un neofita di vb6 e sto cercando di imparare ho trovato il seguente codice ma funziona su windows VISTA mentre su Win XP Professional SP2 mi genera il seguente errore il controllo activex non puo creare l'oggetto potete spiegarmi qual'č l'errore e come risolverlo il codice dovrebbe chiudere tutte le istanze aperte di notepad grazie in anticipo per l'aiuto
Private Sub Command2_Click()
Dim obj As Object
For Each obj In GetObject("winmgmts:").ExecQuery("SELECT * FROM Win32_Process WHERE Name='notepad.exe'")
obj.Terminate
Next
End Sub
|