Post by garry » 25 Oct 2018, 10:00
falls download noch fehlt ... Code:Select all < drücken und denn alt+F8 , kopiert script zu desktop
( kopiert auch den link des scripts bei Firefox )
Code: Select all
;----------- ALT+F8 --------------------------------------
*~$!F8::
Formattime,TS,,longdate
Formattime,TT,T12,time
F1=%A_Desktop%\%A_NOW%.ahk
url :=""
text :=""
Clipboard:=""
sleep,200
sendinput, ^c
clipwait,2
Text:=clipboard
clipboard:=""
sleep,200
sendinput,!s ;- copy link ( Firefox )
sleep,200
sendinput, ^c
clipwait,2
URL:=clipboard
;----- remove empty lines from text -----------------
Loop
{
StringReplace,text,text, `r`n`r`n, `r`n, UseErrorLevel
if ErrorLevel = 0 ;- No more replacements needed.
break
}
;msgbox, 262208,You copied : ,URL=%url%`nText=`n%text%
;- part-2 save to desktop
FileAppend,`;-------- saved at %TS% %TT% --------------`r`n`;-------- %url% ---`r`n%text%`r`n,%F1%,UTF-8
Filegetsize,size1,%F1%
Splashimage,,b w600 h150 x100 Y400 CWsilver m9 b fs10 zh0,Size=%size1%`n%url%`n%text%
sleep,990
Splashimage, off
url :=""
text :=""
Clipboard:=""
return
;=========================================================
falls download noch fehlt ... Code:Select all < drücken und denn alt+F8 , kopiert script zu desktop
( kopiert auch den link des scripts bei Firefox )
[code];----------- ALT+F8 --------------------------------------
*~$!F8::
Formattime,TS,,longdate
Formattime,TT,T12,time
F1=%A_Desktop%\%A_NOW%.ahk
url :=""
text :=""
Clipboard:=""
sleep,200
sendinput, ^c
clipwait,2
Text:=clipboard
clipboard:=""
sleep,200
sendinput,!s ;- copy link ( Firefox )
sleep,200
sendinput, ^c
clipwait,2
URL:=clipboard
;----- remove empty lines from text -----------------
Loop
{
StringReplace,text,text, `r`n`r`n, `r`n, UseErrorLevel
if ErrorLevel = 0 ;- No more replacements needed.
break
}
;msgbox, 262208,You copied : ,URL=%url%`nText=`n%text%
;- part-2 save to desktop
FileAppend,`;-------- saved at %TS% %TT% --------------`r`n`;-------- %url% ---`r`n%text%`r`n,%F1%,UTF-8
Filegetsize,size1,%F1%
Splashimage,,b w600 h150 x100 Y400 CWsilver m9 b fs10 zh0,Size=%size1%`n%url%`n%text%
sleep,990
Splashimage, off
url :=""
text :=""
Clipboard:=""
return
;=========================================================
[/code]