externes Programm starten und Position festlegen

Hi,
ich schon wieder Also die obigen Beispiele habe ich probiert, aber die Funktion:

Function GetWinHandle(hInstance As Long) As Long
Dim tempHwnd As Long

' Grab the first window handle that Windows finds:
tempHwnd = FindWindow(vbNullString, vbNullString)

' Loop until you find a match or there are no more window handles:
Do Until tempHwnd = 0
' Check if no parent for this window
If GetParent(tempHwnd) = 0 Then
' Check for PID match
If hInstance = ProcIDFromWnd(tempHwnd) Then
' Return found handle
GetWinHandle = tempHwnd
' Exit search loop
Exit Do
End If
End If

' Get the next window handle
tempHwnd = GetWindow(tempHwnd, GW_HWNDNEXT)
Loop
End Function

läuft in einer Endlosschleife wenn ich es aufrufe weil tempHwnd bei jedem Durchlauf den gleichen Wert hat. Die PID stimmt, dass konnte ich im Taskmanager kontrollieren..
Jemand ne Idee?
Gruß Haegar

Genau, akkurat 2... Was könnte sonst noch schiefgehen?

Die Getwindow-Funktion treibt mich in den Wahnsinn. Sämtliche Beispiele im Netz sind genauso aufgebaut, aber bei mir klappts nicht.. Habe als Alternative die Enum Windows-Funktion gefunden, blicke das aber nicht so richtig.. Hat die schon jemand benuzt?
Gruß Haegar