Möchte aus einem Browser Texte in Datei kopieren Topic is solved

[nico75]

Ich möchte aus einem beliebigen Browser den aktuellen Text der Webseite mit einem Tastendruck kopieren
und beispielsweise in Notepad einfügen. Dann möchte ich die nächste Webseite per Mausklick öffnen und
mit dem gleichen Tastendruck dessen Text in das immer noch geöffnete Notepad kopieren und anfügen usw.

In Notepad funktioniert schon mal mit Win-a alles mit folgenden Code zu markieren.

#a::
IfWinActive ahk_class Notepad
{
send,^a
}
Return

Notepad darf aber nicht minimiert oder der gleichen sein, was ich später aber möchte. Und wenn ich
Firefox oder iexplorer statt Notepad einfüge, markiert Win-a nichts.

Könnt ihr mir bitte helfen?

[garry]

ein Beispiel
starte script,

markiere Text z.B. in Browser und benütze ctrl+c
notepad wird einmal gestartet und siehe markierten Text in Notepad
denn minimize Notepad und weiterfahren mit markieren und ctrl+c
( sendet immer zum gleichen Notepad, sonst siehe IfWinNotexist ... )

Script verlassen mit ESC , Notepad kann denn gespeichert werden

Code: Select all

pr=notepad.exe
sc=ahk_exe notepad.exe
$^c::
sendinput, ^c         ;- copy marked text
clipwait,2
IfWinNotExist,%sc%
 {
 Run, %pr%,,,pid1
 scx:= "ahk_pid " . PID1
 WinWait,%scx%
 }
IfWinNotActive ,%scx%,,WinActivate,%scx%
    WinWaitActive,%scx%
send,^v                      ;- send to notepad
sleep,200
sendinput,{Enter}
clipboard=
return
esc::exitapp    ; quit this script with escape

[nico75]

Danke für deine Mühe. Ich möchte mir aber noch den Schritt des
gesamten Inhalts des Browserfenster zu kopierne mit dem Script
auch noch sparen.
Also Browserfenster ist offen und Notepad auch. Wenn
ich eine interessante Seite sehe möchte ich mit einem Klick
den gesamten Text der Seite in das bereits offene Notepad
kopieren lassen, dann surfe ich weiter und wenn ich wieder
eine interresante Seite finde, möchte ich erneut mit dem
gleichen Tastendruck an den bereits zuvor einkopierten
Textes des noch immer offenen Notepads kopieren usw.

[garry]

Beispiel, kopiert mit F7 den ganzen Text zu Notepad

Code: Select all

pr=notepad.exe
sc=ahk_exe notepad.exe
$F7::
sendinput, ^a
sleep,500
sendinput, ^c         ;- copy marked text
clipwait,
IfWinNotExist,%sc%
 {
 Run, %pr%,,,pid1
 scx:= "ahk_pid " . PID1
 WinWait,%scx%
 }
IfWinNotActive ,%scx%,,WinActivate,%scx%
    WinWaitActive,%scx%
send,^v                      ;- send to notepad
sleep,200
sendinput,{Enter}
clipboard=
return
esc::exitapp    ; quit this script with escape

[nico75]

Funktioniert leider nicht. Er scheint in Firefox den Text zu markieren,
aber er fügt den markierten Text nicht in Notepad ein. Woran kann
das Liegen?

[nico75]

Super. Hat doch noch geklappt. Du wirst nicht glauben was für ein
Rind ich bin. Hab F5 statt F7 gedrückt. Keine Ahnung was mich da
geritten hat.

Ich danke dir tausend Mal, du weisst nicht wieviel Arbeit du mir
erspart hast.