was heisst dernn "zugreifen" Was willstn machen???
Zum fenster schliessen zum beipsiel das hier:
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 Private Sub Command1_Click() Dim wHandle As Long Dim R As Long wHandle = FindWindow(vbNullString, "Rechner") If wHandle <> 0 Then R = PostMessage(wHandle, &H10, 0&, 0& If R = 0 Then MsgBox "Fehler !" Else MsgBox "Der Rechner ist nicht offen !" End If End Sub
Schliesst den Rechner von windows!
zum tasten drücken gibtzs n befehl sendkey!!!! dazu musst du das Hwnd vom anderen fenster kennen ums zuerst in den vordergrund zu setzen! den syntax von senkey kenn ich aber so auswendig nciht.
All Hail the Crimson King!
Beiträge gesamt: 6351 | Durchschnitt: 1 Postings pro Tag Registrierung: Mai 2001 | Dabei seit: 8627 Tagen | Erstellt: 17:43 am 11. Jan. 2002
das klingt doch schon mal super langsam werden die grauen gehirnzellen gestartet... mit "zugreifen" meinte ich halt: ein offenes Programm in den vordergrundsetzen und dann befehle senden
sendkeys hatte ich auch gefunden... tHx
Beiträge gesamt: 10047 | Durchschnitt: 1 Postings pro Tag Registrierung: Mai 2001 | Dabei seit: 8617 Tagen | Erstellt: 18:25 am 11. Jan. 2002
Copyright 1999 - 2024 by www.ocinside.de - All rights reserved.
Unser PC Forum verwendet Cookies für einen optimalen Service. Durch die Nutzung dieser Webseite erklären Sie sich damit einverstanden, dass wir personenbezogene Daten wie z.B. die IP-Adresse speichern und wir zusammen mit Drittanbietern Cookies verwenden, um personalisierte Anzeigen zur interessengerechten Werbung und weitere externe Inhalte anzuzeigen. Einverstanden? Ja / Nein ImpressumDatenschutzEinstellungen