Access VBA Internet Explorer automation MS Edge object disappearing -


i"m working on scraping solution on windows 10 box using access 2010 32 bit. problem ie object somehow reset nothing during execution (error generated on line 17 of below snippet). when running code step step seems work. when visually inspecting explorer window looks expected. doing wrong here ? ideas / suggestions highly appreciated. 

public function politseikontroll(dokument string) string dim ie object dim element object dim filenum const url string = "https://www.politsei.ee/et/teenused/e-paringud/dokumendi-kehtivuse-kontroll/" const signature = module_name & "politseikontroll" on error goto err_  if len(trim(dokument)) = 0 or len(trim(dokument)) > 20    politseikontroll = "number on liiga pikk (20 max)"    exit function end if 1 set ie = createobject("internetexplorer.application") 2 ie.visible = true ' 2 prevents url being added history list ' 4 prevents browser reading page disk cache ' 8 prevents url being added disk cache 3 ie.navigate url, 2 + 4 + 8    ' prevent using page local cache 4 while ie.busy , ie.readystate <> 4 ' readystate_complete 5   doevents 6 wend 7 if ie.document nothing     ie.quit 8    set ie = nothing 9    politseikontroll = "serveri vastus puudub" 10 end if 11 set element = ie.document.getelementsbyname("docnumber") 12 if element.length <> 1 13        ie.quit 14     set ie = nothing 15     politseikontroll = "serveri vastuse formaat on vale" 16 end if 17 ie.document.getelementsbyname("docnumber")(0).value = dokument while ie.busy , ie.readystate <> 4 ' readystate_complete   doevents wend 18 set element = ie.document.getelementsbyname("subbutton") 19 if element.length <> 1 20    ie.quit 21    set ie = nothing 22    politseikontroll = "serveri vastuse formaat on vale" 23 end if 24 ie.document.getelementsbyname("subbutton")(0).click 25 while ie.busy , ie.readystate <> 4 26   doevents 27 wend 28    stop 29    ie.quit 30 set ie = nothing 31 doevents  exit_: 32    exit function err_: '    dim eclone new errclone '    eclone.init err, , erl     if not ie nothing         ie.quit         set ie = nothing         doevents     end if '    set eclone = errorhandler.reporterror(eclone, signature) '    if eclone.stopexecution         stop '    end if     resume exit_ end function

it quit ie, shouldn't use object later, so:

12 if element.length <> 1 13        ie.quit 14     set ie = nothing 15     politseikontroll = "serveri vastuse formaat on vale" 16 end if  if not ie nothing     ie.document.getelementsbyname("docnumber")(0).value = dokument     while ie.busy , ie.readystate <> 4 ' readystate_complete         doevents     wend <snip>

Comments

Post a Comment

Popular posts from this blog

ubuntu - PHP script to find files of certain extensions in a directory, returns populated array when run in browser, but empty array when run from terminal -

i running os ububtu 16.04. ultimate goal able run php script cron job every minute. here php script located @ /var/www/html/tests/test/index.php : <?php $directorypath = $_server['document_root']."/tests/test/data/"; echo "directorypath: $directorypath<br><br>";//check $imagefilepathsarray = glob($directorypath . "*.{png,gif}", glob_brace); echo "<br><br>imagefilepathsarray: "; print_r($imagefilepathsarray);//check ?> when open php script in browser visiting url my-ip-address/tests/test/index.php , get: directorypath: /var/www/html/tests/test/data/ imagefilepathsarray:array( [0] => /var/www/html/tests/test/data/pic.png [1] => /var/www/html/tests/test/data/pic.gif ) before writing cron job in crontab file, need check if can run anywhere using terminal . opened ubuntu terminal @ /home/ location, , executed in terminal: sudo php /var/www/html/tests/test/index.php i got following out...
Read more

php - How can i create a user dashboard -

today have questions you, want create user dashboard site, include (obviously), users data, example -email -username -and others stuff how can information, , print them in html page? if can, how can these information via php sessions? shuld use session? example, if user login, , start new session ( session_start() ), how can data print in dashboard? should use php "project"? in advice, have day , thank time!
Read more

javascript - How to detect toggling of the fullscreen-toolbar in jQuery Mobile? -

i have jquery mobile page fixed full-screen toolbar, data-tap-toggle enabled. straight under toolbar have positioned banner should slide upwards when toolbar hiding , slide downward when toolbar showing. jquery mobile toggles toolbar applying , removing ui-fixed-hidden class - sadly, can't find in documentation of toolbar widget toggle , hide or show event that. how can detect when toolbar toggled, reposition banner? .banner { position: fixed; background-color: darkseagreen; top: 46px; min-height: 48px; width: 100%; text-align: center; line-height: 48px; } <!doctype html> <html> <head> <meta charset="utf-8"> <meta name="viewport" content="width=device-width, initial-scale=1, user-scalable=no"> <link rel="stylesheet" href="https://code.jquery.com/mobile/1.4.5/jquery.mobile-1.4.5.css"> <script src="https://code.jquery.com/jquery-1....
Read more