This script works great with Loop Read File but when I switch to Loop Parse Clipboard, no luck. For One Key Testing I programmed the Right Ctrl key to save, reload and launch script :-) I'm also using DebugView instead of Msgbox. Just get it, launch it, and it will scroll any OutputDebug comment in your script :-) <!-- m -->http://technet.micro... ... 96647.aspx<!-- m -->
Here is the substantive part of the Loop Read Version:
F1= C:\temp\urls\url_input.txt F2= C:\temp\urls\url_output.txt Filedelete,%F2% A=http:// T= Loop,Read, %F1%
The Loop Parse Clipboard Version is the same except it uses the clipboard and Loop Parse. Why is Loop, Parse, Clipboard, not passing data to the loop in the same way as Loop, Read, does? Thank you!
;††† Open All Urls †††
;For FireFox users who need to free up Memory ;by closing
;and restarting Firefox. Use "Copy All Urls" Firefox Plugin
;to copy all tabs to clipboard. Restart FireFox.
;Hit WindowsKey-U and all URLs on clipboard will open in tabs
;#u::
RCtrl:: ;;; For Quick Testing right control saves, reloads and launches this script
send ^s
sleep 300
Reload
gosub proceedplease
proceedplease:
clipboard =
(
http://en.wikipedia.org/wiki/Democratic_peace_theory
http://en.wikipedia.org/wiki/Never_at_War
Never at War - Wikipedia, the free encyclopedia
http://en.wikipedia.org/wiki/Category:Lists_of_massacres_by_country
Category:Lists of massacres by country - Wikipedia, the free encyclopedia
http://en.wikipedia.org/wiki/Persecution_of_Hindus
Armenian Genocide
http://en.wikipedia.org/wiki/Armenian_Genocide
The Armenian Genocide[4] (
The Young Turks' Crime Against Humanity:
The Armenian Genocide and Ethnic Cleansing in the Ottoman Empire
http://press.princeton.edu/titles/9678.html
http://en.wikiquote.org/wiki/Greek_genocide
Greek Genocide
)
;Outputdebug, clipboard is %clipboard%
;msgbox clipboard is %clipboard%
;links = %Clipboard%
;Outputdebug, links are %links%
;msgbox, links are %links%
clipwait 1
A=http://
T=
Loop, Parse, Clipboard ;;; (changed from ****** Loop,Read, FileName ****** to use clipboard instead)
{
OutputDebug, is this empty? %A_LoopReadLine%
T=%A_LoopReadLine%
;OutputDebug, T is %T%
StringReplace t,T,.%A_Space%,`,,All
StringRight r,t,1
IfEqual r,., StringTrimRight t,t,1
Loop Parse,t,`,` `"`>`=`;?`!
{
StringLeft r,A_LoopField,7
If r=%A%
;OutputDebug, %A_LoopField%
;OutPutDebug, hello there
run,%A_LoopField%
}
}
return
^esc::exitapp ;;;; Emergency Stop
return




