Hi Thom,

Thank you for getting back to me. The script is already connected to the 
webpage as follows. I'll try the script you have provided. Again, thank you 
very much.

Private Sub ConnectToWebPage()
    Shell_ """https://promise.dpw.state.pa.us/default.asp""";
    Activate "PROMISe(tm) Internet Portal", True
    Connect "PROMISe(tm) Internet Portal", stWeb1
End Sub

Thanks,
Alice


Alice Li
Report Administrator
Data Analysis and Reporting
Healthcare Receivable Specialists, Inc.
400 Market Street, 5th Floor
Philadelphia, PA 19106
215.928.0303 ext 3018
[email protected]<BLOCKED::mailto:[email protected]>






From: [email protected] [mailto:[email protected]]
Sent: Tuesday, May 22, 2012 10:02 AM
To: [email protected]
Subject: RE: [talkbws] How to save a webpage as html to local drive

Here goes!

You really can simplify the command if you are connected to the webpage already 
in in the script and the website is not a framed page. The example shows a 
complex scenario where you have to specify a particular document to save.



The below should work.



F("FilePath")="C:\My Little File Location\"

F("UserName")="Alice"

F("FileName")=F("UserName") & "_" & d("Account") & ".html" ' Of course 
"Account" I just made up, you'd use whatever your field name is

t=f("FilePath") & F("FileName") ' Here just assembling it all together
Web1.SavePage t,,True

Thom C. Blackwell  VP, Technical Services
Boston Software Systems, Inc.
Phone: 866.653.5105 x807
Mobile: 508.423.8463
Fax: 508.319.3015
www.bostonsoftwaresystems.com<http://www.bostonsoftwaresystems.com/>


The information contained in this message may be confidential and legally 
protected under applicable law. The message is intended solely for the 
addressee(s). If you are not the intended recipient, you are hereby notified 
that any use, forwarding, dissemination, or reproduction of this message is 
strictly prohibited and may be unlawful. If you are not the intended recipient, 
please contact the sender by return e-mail and destroy all copies of the 
original message.

From: [email protected]<mailto:[email protected]> 
[mailto:[email protected]]<mailto:[mailto:[email protected]]>
Sent: Tuesday, May 22, 2012 9:33 AM
To: Talk
Subject: [talkbws] How to save a webpage as html to local drive

Hello everybody,

Our company uses BWS to inquire patient medical information on PROMISe 
(Pennsylvania's claims processing & management information system). My script 
posts patient data from an Excel spreadsheet to the website, which in turn 
posts search results and inserts the results into the spreadsheet. The script 
has been working perfectly fine grabbing the search results. But, now I would 
like to grab the entire results web page and save it as html file in a 
specified folder on local drive. There're actually 2 parts to my question:


1.       How do I go about to save a web page as html file in a specified 
folder on local drive?

*         So far, I have tried using the code example provided in the BWS help 
menu (see below). But, I keep on getting an compile error saying "Expected: =" 
when using the web1.SavePage

*         Dim p as object
A
Web1.SavePage("C:\Testfile.html",p,True,1)
Set p = nothing



2.       The name of the file will be based on the current patient account 
number from the spreadsheet. For instance, the user data is "alice_1234", then 
the html file name will be alice_1234.html.


Hope somebody can shed some light on this,
Alice



Alice Li
Report Administrator
Data Analysis and Reporting
Healthcare Receivable Specialists, Inc.
400 Market Street, 5th Floor
Philadelphia, PA 19106
215.928.0303 ext 3018
[email protected]<BLOCKED::mailto:[email protected]>









---  To post a message to this list, send mail to: 
[email protected]<mailto:[email protected]>    You are currently subscribed as: 
[email protected]<mailto:[email protected]>    Unsubscribe in 
the customer center on our website: 
http://www.bostonworkstation.com/customer_center/virtual_user_group_talk.aspx

---  To post a message to this list, send mail to: 
[email protected]<mailto:[email protected]>    You are currently subscribed as: 
[email protected]<mailto:[email protected]>    Unsubscribe in the customer center on 
our website: 
http://www.bostonworkstation.com/customer_center/virtual_user_group_talk.aspx

---  To post a message to this list, send mail to: [email protected]    You are 
currently subscribed as: [email protected]    Unsubscribe in the 
customer center on our website: 
http://www.bostonworkstation.com/customer_center/virtual_user_group_talk.aspx   

Reply via email to