Trouble stopping a "Do Until" loop in Excel VBA -


so new issue cannot following code stop looping. seems though "do until element nothing" line may not accurate button attempting click not showing "nothing" value @ end of run. here code brief description of issue. 

sub searchbot()   dim objie internetexplorer dim y integer dim result string  set objie = new internetexplorer  objie.visible = true  objie.navigate "https://www.searchiqs.com/nyalb/login.aspx"  while objie.busy = true or objie.readystate <> 4: doevents: loop  objie.document.getelementbyid("btnguestlogin").click  while objie.busy = true or objie.readystate <> 4: doevents: loop  objie.document.getelementbyid("contentplaceholder1_txtfromdate").value = "07/11/2017"  objie.document.getelementbyid("contentplaceholder1_txtthrudate").value = "07/13/2017"  objie.document.getelementbyid("contentplaceholder1_cbodocgroup").value = "dba"  objie.document.getelementbyid("contentplaceholder1_cmdsearch").click  while objie.busy = true or objie.readystate <> 4: doevents: loop  y = 1  ' brings table of results. need click on view button , info page  objie.document.getelementbyid("contentplaceholder1_grdresults_btnview_0").click   while objie.busy = true or objie.readystate <> 4: doevents: loop  ' element id's hidden looking  result = trim(objie.document.getelementbyid("contentplaceholder1_lbldetails2").innertext)  sheets("sheet1").range("a" & y).value = result  'sheets("sheet1").range("c" & y).value = result  y = y + 1   ' love direct link next search result here link not change between pages click next button  objie.document.getelementbyid("contentplaceholder1_btnnext").click  while objie.busy = true or objie.readystate <> 4: doevents: loop  while objie.busy = true or objie.readystate <> 4: doevents: loop   ' believe issue occurs  until objie.document.getelementbyid("contentplaceholder1_btnnext") nothing  result = trim(objie.document.getelementbyid("contentplaceholder1_lbldetails2").innertext)  sheets("sheet1").range("a" & y).value = result  y = y + 1  ' when next page button visible, goes next page. when dimmed, code continues. doesn't stop unless manually stop it. takes final page , repeats process infinitely.   objie.document.getelementbyid("contentplaceholder1_btnnext").click  while objie.busy = true or objie.readystate <> 4: doevents: loop  loop   ' end few results in beginning , final result repeats until stop script.  end sub


this html reading when button visible

<input name="ctl00$contentplaceholder1$btnnext" title="next document" id="contentplaceholder1_btnnext" style="width: 35px;" onclick="savedoclistselected();" type="submit" value=">>">

this html reading when button dimmed 

<input name="ctl00$contentplaceholder1$btnnext" title="next document" disabled="disabled" class="aspnetdisabled" id="contentplaceholder1_btnnext" style="width: 35px;" type="submit" value=">>">

any appreciated.


Comments

Post a Comment

Popular posts from this blog

Is there a better way to structure post methods in Class Based Views -

i'm using class based views in django , never specify url in ajax calls , omit action parameter in form because know these requests go through post method of class based view. notice view - profile page make many requests depending on user updating on page - post method become convoluted , if/else mess example: def post(self, request, *args, **kwargs): # handle user changing available date if request.post.get('availabledate') != none: self.updateavailabledate(request) return jsonresponse({'result':'success'}) if request.post.get('newprojectname') != none: creative_user = creativeuserprofile.objects.get(id = request.user.id) project = project.create_project(creative_user, request.post['newprojectname']) project.save() return jsonresponse({'projectid': project.id }) if request.post.get('projectimage') != none , request.files['file']: proj...
Read more

performance - Why is XCHG reg, reg a 3 micro-op instruction on modern Intel architectures? -

i'm doing micro-optimization on performance critical part of code , came across sequence of instructions (in at&t syntax): add %rax, %rbx mov %rdx, %rax mov %rbx, %rdx i thought had use case xchg allow me shave instruction , write: add %rbx, %rax xchg %rax, %rdx however, dimay found agner fog's instruction tables , xchg 3 micro-op instruction 2 cycle latency on sandy bridge, ivy bridge, broadwell, haswell , skylake. 3 whole micro-ops , 2 cycles of latency! 3 micro-ops throws off 4-1-1-1 cadence , 2 cycle latency makes worse original in best case since last 2 instructions in original might execute in parallel. now... cpu might breaking instruction micro-ops equivalent to: mov %rax, %tmp mov %rdx, %rax mov %tmp, %rdx where tmp anonymous internal register , suppose last 2 micro-ops run in parallel latency 2 cycles. given register renaming occurs on these micro-architectures, though, doesn't make sense me done way. why wouldn't register renamer ...
Read more

c# - Asp.net web api : redirect unauthorized requst to forbidden page -

im trying redirect unauthorized request forbidden page instead i'm getting forbidden page in response body , how can fix ? here's startup class : app.createperowincontext(storecontext.create); app.createperowincontext<applicationusermanager>(applicationusermanager.create); app.createperowincontext<applicationsigninmanager>(applicationsigninmanager.create); app.usecookieauthentication(new cookieauthenticationoptions { authenticationtype = defaultauthenticationtypes.applicationcookie, expiretimespan = timespan.fromdays(30), }); app.useexternalsignincookie(defaultauthenticationtypes.externalcookie); app.usetwofactorsignincookie(defaultauthenticationtypes.twofactorcookie, timespan.fromminutes(5)); app.usetwofactorrememberbrowsercookie(defaultauthenticationtypes.twofactorrememberbrowsercookie); the method im trying reach : [httpget] [authorize(roles = "admin")] public string getcurrentusername() { return userman...
Read more