Controlsend und Windows7 Explorer

dost0011

Hallo,

ihr müsst mir unbedingt helfen, ich komme einfach nicht weiter. Habe auch schon bei Autoitscript.com nachgefragt, aber niemand antwortet.

Entweder ist das so schwierig, oder es gibt irgendwelche Sprachprobleme. Deshalb probiere ich es jetzt hier:

Ich möchte bei Windows7 (64Bit HomePremium) den Explorer steuern und eine andere Adresse "eingeben".

Dies möchte ich mit dem Controlsend Befehl tun.

Klappt aber nicht - im Gegensatz zu WindowsXP.

Das Problem ist, dass ich nicht weiß, wie das Control heißt.

Wenn man mit der Maus über die Adresseingabezeile im Windows Explorer geht, dann bekommt man mit Au3Info angezeigt, dass dieses Control "ToolbarWindow32" heisst.

Wenn man aber reinklickt, um eine Adresse einzugeben, dann heißt dieses Teil plötzlich "Edit".

Ich habe schon beides ausprobiert - nichts klappt.

Könnt ihr mir sagen, wie man dieses Control ansprechen kann?

z.B.

Controlsend("Bibliotheken","",,"Edit1","C:\temp")

Vielen Dank!!!!

PrideRage

Hallo.
Das is ganz easy.

[autoit]

$oShell = ObjCreate("shell.application")
$oShell.Explore("C:\")

[/autoit]

Ersetz C:\ durch den Pfad den du öffnen willst.
MfG. PrideRage

**Schnitzel**

Shellexecute("C:\Temp") geht genauso

dost0011

Wow, vielen Dank. Sooo schnell.

Habs gerade ausprobiert - funktioniert mit der Einschränkung, dass immer ein neuer Explorer aufgemacht wird.

Lässt sich auch ein offener Explorer ändern? Das wäre für mich sehr wichtig, weil ich sonst immer einen Explorer schließen müsste und dann wieder einen neuen aufmachen müsste...

Vielen DAnk !

dost0011

Keine Idee?

Wie kann man denn nachschauen, ob es

statt

$oShell = ObjCreate("shell.application")
$oShell.Explore("C:\") <--- noch was anderes gibt, das nur die Adresse ändert???

Bitte helft mir !

Danke

**chip**

Der Eingabezeile ist doch die ID 1001 zugeordnet. Darfst nur den Pfad nicht mit ControlSend rein schreiben:

[autoit]

$oShell = ObjCreate("shell.application")
$oShell.Explore("C:\")
sleep(1000)
ControlClick("Lokaler Datenträger (C:)","",1001, "left", 1, 400)
sleep(1000)
Send("D:\")
sleep(1000)
Send("{Enter}")

[/autoit]

SEuBo

[autoit]

$hExplorer = ExplorerNavigate("Musik","C:\")
ExplorerNavigate($hExplorer,"D:\Musik")

[/autoit][autoit][/autoit][autoit]

Func ExplorerNavigate($hWnd,$sPath)
If Not IsHWnd($hWnd) Then $hWnd = WinGetHandle($hWnd)
If @error Then Return SetError(1,0,0)
$cHwnd = ControlGetHandle($hWnd, "", "[CLASS:Edit; INSTANCE:1]")
ControlSetText($hWnd, "", $cHwnd, $sPath)
ControlSend($hWnd,"",$cHwnd,"{ENTER}")
Return SetError(0,0,$hWnd)
EndFunc

[/autoit]

**chip**

Zitat von SEuBo

[autoit]
$hExplorer = ExplorerNavigate("Musik","C:\")
ExplorerNavigate($hExplorer,"D:\Musik")
[/autoit] [autoit][/autoit] [autoit]
Func ExplorerNavigate($hWnd,$sPath)
If Not IsHWnd($hWnd) Then $hWnd = WinGetHandle($hWnd)
If @error Then Return SetError(1,0,0)
$cHwnd = ControlGetHandle($hWnd, "", "[CLASS:Edit; INSTANCE:1]")
ControlSetText($hWnd, "", $cHwnd, $sPath)
ControlSend($hWnd,"",$cHwnd,"{ENTER}")
Return SetError(0,0,$hWnd)
EndFunc
[/autoit]
Alles anzeigen

Also unter Win 7 geht das mal nicht.

SEuBo

Zitat von chip

Also unter Win 7 geht das mal nicht.

Gleiches gilt für deine Lösung auf Windows Vista

**chip**

Oben steht aber WIn 7 und nicht Vista ;).

Zitat von dost0011

Ich möchte bei Windows7 (64Bit HomePremium) den Explorer steuern und eine andere Adresse "eingeben".

SEuBo

Spoiler anzeigen

[autoit]

$hExplorer = ExplorerNavigate("Musik","C:\")
ExplorerNavigate($hExplorer,"D:\Musik")

[/autoit] [autoit][/autoit] [autoit]

Func ExplorerNavigate($hWnd,$sPath)
If Not IsHWnd($hWnd) Then $hWnd = WinGetHandle($hWnd)
If @error Then Return SetError(1,0,0)
ConsoleWrite("hWnd" & @CRLF)
$cHwnd = ControlGetHandle($hWnd, "", "[CLASS:Edit; INSTANCE:1]")
If @error Then Return SetError(1,0,0)
ConsoleWrite("Control-hWnd" & @CRLF)
ControlSetText($hWnd, "", $cHwnd, $sPath)
ControlSend($hWnd,"",$cHwnd,"{ENTER}")
Return SetError(0,0,$hWnd)
EndFunc

[/autoit]

Bis zu welchem ConsoleWrite kommt er denn Chip?

**chip**

Bis zum ersten, kann auch wie gesagt daher nicht gehen da die Class erst nach einem Click in das Feld sich zu "Edit" ändert und davor "ToolbarWindow32" ist.