Hi,
Does anyone know how to read data from a web page and get it into Alpha 5 or can it even be done?
Recently I figured out how to read the data from a record to do post office zip code and address validation. Of course that happened with John Kukuda and Lenny's help. Thanks!
The code to read form data and open the post office web site to validate data is looks like this: (this code is attached to a button event - on push
Now I would to be able to read the response from the post office and put it back into Alpha with having to retype. Never satisfied :)
thanks,
mike
Does anyone know how to read data from a web page and get it into Alpha 5 or can it even be done?
Recently I figured out how to read the data from a record to do post office zip code and address validation. Of course that happened with John Kukuda and Lenny's help. Thanks!
The code to read form data and open the post office web site to validate data is looks like this: (this code is attached to a button event - on push
Code:
'Get 'Value' property of multiple objects in Form 'Community_master' . DIM SHARED vstate AS c vstate = topparent:State.value DIM SHARED vcity AS c vcity = topparent:City.value DIM SHARED vaddr1 AS c vaddr1 = topparent:Address.value 'Open a URL: '="http://zip4.usps.com/zip4/welcome.jsp?&address2="+var->vaddr1+"&city="+var->vcity+"&state="+var->vstate+"&zipcode"'. 'URL is an expression. Need to evaluate the expression in the context of the current form. form_name = topparent.name()+".this" URL_var = eval("\"http://zip4.usps.com/zip4/welcome.jsp?&address2=\"+var->vaddr1+\"&city=\"+var->vcity+\"&state=\"+var->vstate+\"&zipcode\"",form_name) If at("://",URL_var) = 0 then URL_var = "http://"+URL_var End if sys_open(URL_var)
thanks,
mike
Comment