Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

VB Findwindow findet Fenster nicht

Frage Entwicklung Basic

Mitglied: Blackangel

Blackangel (Level 1) - Jetzt verbinden

17.12.2007, aktualisiert 24.07.2008, 8355 Aufrufe, 1 Kommentar

Hallo,

ich bin am verzweifeln und zwar soll mein Programm(kann man das so sagen?) stoppen bevor nicht ein anderes Programm geschlossen wird!
Das ganze habe ich jetzt mit Findwindow probiert doch der arbeitet einfach weiter!
Test mit Windows Spiel Minesweeper war kein Problem.
Hier mal der Code:
01.
Option Explicit 
02.
 
03.
Private Declare Function FindWindow Lib "user32" Alias _ 
04.
      "FindWindowA" (ByVal lpClassName As Any, ByVal _ 
05.
      lpWindowName As Any) As Long 
06.
 
07.
Private Sub Form_Load() 
08.
  Shell Pathname:="D:\fleet\prog\navigator.exe", Windowstyle:=vbNormalFocus 
09.
Dim Pausenlänge, Start, Ende 
10.
        Pausenlänge = 5 ' 
11.
        Start = Timer ' 
12.
    Do While Timer < Start + Pausenlänge 
13.
  DoEvents 
14.
Loop 
15.
 
16.
  While FindWindow("Navigator", 0&) 
17.
    DoEvents 
18.
  Wend 
19.
 
20.
  MsgBox "Navigator wurde beendet.", vbInformation + vbOKOnly 
21.
End 
22.
End Sub
Ich habe eine Pause von 5 Sekunden mit eingebaut da das Programm 2-3 Sekunden braucht um zu starten(siehe Shell)

Laut Microsoft Spy++
Heißt die Windows Caption "Navigator"
und der Class Name "#32770 (Dialog)".

Habe ich irgendetwas nicht beachtet?
Ich muss dabei auch gleich sagen das ich noch nicht so fit in VB bin!
Mitglied: fishbone222
24.07.2008 um 15:49 Uhr
Dashier müsste gehn:
01.
While FindWindow(0&, "Navigator")
es heißt ja auch
01.
Private Declare Function FindWindow Lib "user32" Alias _  
02.
"FindWindowA" (ByVal lpClassName As Any, ByVal _  
03.
 lpWindowName As Any) As Long 
und nicht
01.
Private Declare Function FindWindow Lib "user32" Alias _  
02.
"FindWindowA" (ByVal _  
03.
 lpWindowName As Any, ByVal lpClassName As Any) As Long 
Bitte warten ..
Neuester Wissensbeitrag
Ähnliche Inhalte
Basic
gelöst Mit vb.net PDF in Word-Dok einfügen (10)

Frage von ahstax zum Thema Basic ...

VB for Applications
gelöst VB Skript Excel Datei (3)

Frage von Frager zum Thema VB for Applications ...

Entwicklung
gelöst CSharp 2tes Fenster im Vordergrund muss erst geschlossen werden (2)

Frage von H41mSh1C0R zum Thema Entwicklung ...

Heiß diskutierte Inhalte
Erkennung und -Abwehr
Virenschutz - Meinungen (28)

Frage von honeybee zum Thema Erkennung und -Abwehr ...

Windows 10
Welches OS für Firmengeräte? (18)

Frage von MarkusVH zum Thema Windows 10 ...

Netzwerke
Abisolierwerkzeug (18)

Frage von SarekHL zum Thema Netzwerke ...

Exchange Server
SBS2011: POP3-Connector 10 MB Grenze Email Benachrichtigung (17)

Frage von bogi1102 zum Thema Exchange Server ...