Thrilling wrote:Works like a charm. Allow me to express my gratitude towards your continuous and kind help, from myself and from my team (who admittedly are watching me progress with more of a slight skepticism, rather than an understanding of the comfort and speed using macros means for our future work
they'll know soon enough ).
Also: I don't think I'd have ever have thought of your line of solution. Amazing. Im still having a hard time wrapping my head around it, even after writing the code and understanding each individual step!
Code: Select all
VERSION BUILD=8970419 RECORDER=FX
TAB T=1
SET !DATASOURCE_DELIMITER ;
SET !DATASOURCE Russland.csv
SET !DATASOURCE_LINE 5
SET !VAR1 EVAL("var UserInput = \"{{!col10}}\"; UserInput")
ADD !Var1 1
SET !DATASOURCE_LINE {{!var1}}
SET !var2 EVAL("var Route = \"{{!col12}}\"; var x=Route.split(', '); var z=x.length; z;")
SET !var3 EVAL("var Route = \"{{!col12}}\"; var x=Route.split(', '); var z=x[0]; z;")
TAG POS=1 TYPE=INPUT:TEXT FORM=ID:aspnetForm ATTR=ID:ctl00_phBody_StepViewMVisitDetailsStep_Route_CityName1_TextBox CONTENT={{!var3}}
SET !var4 EVAL("var Route = \"{{!col12}}\"; var x=Route.split(', '); var z=x[1]; z;")
SET !var5 EVAL("var x = \"{{!var2}}\"; if(x>1){x=\"{{!var4}}\";} else{x=0;}; x;")
SET !var6 EVAL("var x = \"{{!var2}}\"; if(x>1){x=1;} else{x=0;}; x;")
SET !ERRORIGNORE YES
SET !TIMEOUT_STEP 0
TAG POS={{!var6}} TYPE=INPUT:BUTTON FORM=ID:aspnetForm ATTR=ID:ctl00_phBody_StepViewMVisitDetailsStep_Route_AddRowButton
SET !TIMEOUT_STEP 0
SET !var7 EVAL("var x = 1; x;")
ADD !var7 {{!var6}}
TAG POS={{!var6}} TYPE=INPUT:TEXT FORM=ID:aspnetForm ATTR=ID:ctl00_phBody_StepViewMVisitDetailsStep_Route_CityName{{!var7}}_TextBox CONTENT={{!var4}}
SET !var4 EVAL("var Route = \"{{!col12}}\"; var x=Route.split(', '); var z=x[2]; z;")
SET !var5 EVAL("var x = \"{{!var2}}\"; if(x>2){x=\"{{!var4}}\";} else{x=0;}; x;")
SET !var6 EVAL("var x = \"{{!var2}}\"; if(x>2){x=1;} else{x=0;}; x;")
SET !ERRORIGNORE YES
SET !TIMEOUT_STEP 0
TAG POS={{!var6}} TYPE=INPUT:BUTTON FORM=ID:aspnetForm ATTR=ID:ctl00_phBody_StepViewMVisitDetailsStep_Route_AddRowButton
SET !TIMEOUT_STEP 0
ADD !var7 {{!var6}}
TAG POS={{!var6}} TYPE=INPUT:TEXT FORM=ID:aspnetForm ATTR=ID:ctl00_phBody_StepViewMVisitDetailsStep_Route_CityName{{!var7}}_TextBox CONTENT={{!var4}}
SET !var4 EVAL("var Route = \"{{!col12}}\"; var x=Route.split(', '); var z=x[3]; z;")
SET !var5 EVAL("var x = \"{{!var2}}\"; if(x>3){x=\"{{!var4}}\";} else{x=0;}; x;")
SET !var6 EVAL("var x = \"{{!var2}}\"; if(x>3){x=1;} else{x=0;}; x;")
SET !ERRORIGNORE YES
SET !TIMEOUT_STEP 0
TAG POS={{!var6}} TYPE=INPUT:BUTTON FORM=ID:aspnetForm ATTR=ID:ctl00_phBody_StepViewMVisitDetailsStep_Route_AddRowButton
SET !TIMEOUT_STEP 0
ADD !var7 {{!var6}}
TAG POS={{!var6}} TYPE=INPUT:TEXT FORM=ID:aspnetForm ATTR=ID:ctl00_phBody_StepViewMVisitDetailsStep_Route_CityName{{!var7}}_TextBox CONTENT={{!var4}}
SET !var4 EVAL("var Route = \"{{!col12}}\"; var x=Route.split(', '); var z=x[4]; z;")
SET !var5 EVAL("var x = \"{{!var2}}\"; if(x>4){x=\"{{!var4}}\";} else{x=0;}; x;")
SET !var6 EVAL("var x = \"{{!var2}}\"; if(x>4){x=1;} else{x=0;}; x;")
SET !ERRORIGNORE YES
SET !TIMEOUT_STEP 0
TAG POS={{!var6}} TYPE=INPUT:BUTTON FORM=ID:aspnetForm ATTR=ID:ctl00_phBody_StepViewMVisitDetailsStep_Route_AddRowButton
SET !TIMEOUT_STEP 0
ADD !var7 {{!var6}}
TAG POS={{!var6}} TYPE=INPUT:TEXT FORM=ID:aspnetForm ATTR=ID:ctl00_phBody_StepViewMVisitDetailsStep_Route_CityName{{!var7}}_TextBox CONTENT={{!var4}}
SET !var4 EVAL("var Route = \"{{!col12}}\"; var x=Route.split(', '); var z=x[5]; z;")
SET !var5 EVAL("var x = \"{{!var2}}\"; if(x>5){x=\"{{!var4}}\";} else{x=0;}; x;")
SET !var6 EVAL("var x = \"{{!var2}}\"; if(x>5){x=1;} else{x=0;}; x;")
SET !ERRORIGNORE YES
SET !TIMEOUT_STEP 0
TAG POS={{!var6}} TYPE=INPUT:BUTTON FORM=ID:aspnetForm ATTR=ID:ctl00_phBody_StepViewMVisitDetailsStep_Route_AddRowButton
SET !TIMEOUT_STEP 0
ADD !var7 {{!var6}}
TAG POS={{!var6}} TYPE=INPUT:TEXT FORM=ID:aspnetForm ATTR=ID:ctl00_phBody_StepViewMVisitDetailsStep_Route_CityName{{!var7}}_TextBox CONTENT={{!var4}}
SET !var4 EVAL("var Route = \"{{!col12}}\"; var x=Route.split(', '); var z=x[6]; z;")
SET !var5 EVAL("var x = \"{{!var2}}\"; if(x>6){x=\"{{!var4}}\";} else{x=0;}; x;")
SET !var6 EVAL("var x = \"{{!var2}}\"; if(x>6){x=1;} else{x=0;}; x;")
SET !ERRORIGNORE YES
SET !TIMEOUT_STEP 0
TAG POS={{!var6}} TYPE=INPUT:BUTTON FORM=ID:aspnetForm ATTR=ID:ctl00_phBody_StepViewMVisitDetailsStep_Route_AddRowButton
SET !TIMEOUT_STEP 0
ADD !var7 {{!var6}}
TAG POS={{!var6}} TYPE=INPUT:TEXT FORM=ID:aspnetForm ATTR=ID:ctl00_phBody_StepViewMVisitDetailsStep_Route_CityName{{!var7}}_TextBox CONTENT={{!var4}}
SET !var4 EVAL("var Route = \"{{!col12}}\"; var x=Route.split(', '); var z=x[7]; z;")
SET !var5 EVAL("var x = \"{{!var2}}\"; if(x>7){x=\"{{!var4}}\";} else{x=0;}; x;")
SET !var6 EVAL("var x = \"{{!var2}}\"; if(x>7){x=1;} else{x=0;}; x;")
SET !ERRORIGNORE YES
SET !TIMEOUT_STEP 0
TAG POS={{!var6}} TYPE=INPUT:BUTTON FORM=ID:aspnetForm ATTR=ID:ctl00_phBody_StepViewMVisitDetailsStep_Route_AddRowButton
SET !TIMEOUT_STEP 0
ADD !var7 {{!var6}}
TAG POS={{!var6}} TYPE=INPUT:TEXT FORM=ID:aspnetForm ATTR=ID:ctl00_phBody_StepViewMVisitDetailsStep_Route_CityName{{!var7}}_TextBox CONTENT={{!var4}}
SET !var4 EVAL("var Route = \"{{!col12}}\"; var x=Route.split(', '); var z=x[8]; z;")
SET !var5 EVAL("var x = \"{{!var2}}\"; if(x>8){x=\"{{!var4}}\";} else{x=0;}; x;")
SET !var6 EVAL("var x = \"{{!var2}}\"; if(x>8){x=1;} else{x=0;}; x;")
SET !ERRORIGNORE YES
SET !TIMEOUT_STEP 0
TAG POS={{!var6}} TYPE=INPUT:BUTTON FORM=ID:aspnetForm ATTR=ID:ctl00_phBody_StepViewMVisitDetailsStep_Route_AddRowButton
SET !TIMEOUT_STEP 0
ADD !var7 {{!var6}}
TAG POS={{!var6}} TYPE=INPUT:TEXT FORM=ID:aspnetForm ATTR=ID:ctl00_phBody_StepViewMVisitDetailsStep_Route_CityName{{!var7}}_TextBox CONTENT={{!var4}}
SET !var4 EVAL("var Route = \"{{!col12}}\"; var x=Route.split(', '); var z=x[9]; z;")
SET !var5 EVAL("var x = \"{{!var2}}\"; if(x>9){x=\"{{!var4}}\";} else{x=0;}; x;")
SET !var6 EVAL("var x = \"{{!var2}}\"; if(x>9){x=1;} else{x=0;}; x;")
SET !ERRORIGNORE YES
SET !TIMEOUT_STEP 0
TAG POS={{!var6}} TYPE=INPUT:BUTTON FORM=ID:aspnetForm ATTR=ID:ctl00_phBody_StepViewMVisitDetailsStep_Route_AddRowButton
SET !TIMEOUT_STEP 0
ADD !var7 {{!var6}}
TAG POS={{!var6}} TYPE=INPUT:TEXT FORM=ID:aspnetForm ATTR=ID:ctl00_phBody_StepViewMVisitDetailsStep_Route_CityName{{!var7}}_TextBox CONTENT={{!var4}}
Yep, saw your Post before the WE but I think it was 17h30 for me (Amsterdam - NL) and I was a bit busy at that time preparing some DJ-Set (yep, I'm a DJ IRL, and WE's are usually a bit busy for me, ah-ah...!), and I think a few new Threads needed to be "moderated" at that time...
Woaw-woaw-woaw...!!, a wonderful BIG Compliment for your Script...!!
One Reply from me with some Guidelines and Ideas, and yep..., you manage to write the full working Script....!! Excellent...!
Good Learner, ah-ah...!
There are (of course) several "Things" that could be "improved" in your Script, but hum, you are such a quick Learner that I actually prefer not to say anything, you will discover the "Improvements" by yourself I would think, like I did myself, I never had anybody checking/improving my Scripts..., hum, because I never posted on the Forum for Advice/Pb I guess, or only once to report a REAL-BIG-BLOCKING-FUCKING Bug, reason why I joined the Forum (about 4 years ago), for which I only found a Workaround about 1 year ago...
=> And maybe post again in a few weeks your improved Version of your Script, as you discover "Things", and if you still keep working/improving (on) it...
But hum, I still have old Scripts that I made about 8 or 10 years ago (and that still work because I still use them once or twice a year), and I still love them, nearly mainly because of the "cute" Mistakes I made then, but if they still work...!?
And about "... my gratitude towards your continuous and kind help...", ah-ah!, glad to help of course, but sbd like you who is able to write a Full Script with just a few "Indications" is very-very Rewarding for me as well, Thanks for the Feedback...!
And don't worry, you'll laugh at our Colleagues very soon (when they come to you to ask you to help them for a Script), believe me, ah-ah...!
Funnily enough, some new User today on the Forum only registered to be able to "fustigate" me (hum, Spellchecker doesn't like it...?, is normal English I would think...!?) => Spellchecker prefers "fumigate" (?) me (OK, why not...!?
) for my "
Style for helping Users" on the Forum, ah-ah...! (I guess I can't please all the clever Souls in this World I'm afraid...!
)
- (F)CI(M) = (Full) Config Info (Missing): iMacros + Browser + OS (+ all 3 Versions + 'Free'/'PE'/'Trial').
- FCI not mentioned: I don't even read the Qt...! (or only to catch Spam!)
- Script & URL help a lot for more "educated" Help...