Not quite.
I'm looking for the Word "Eligibility" on the Internet Screen. Which is a Legend, Under that legend is what the Patient is Eligible for. Right now I have the script Printing Every one that comes up with "Eligibility" I want to NOT print the ones like the attachment. "Eligibility" with "MediKan" Which is contained in that Legend, but still print all others that have "Eligibility" without MediKan This help. I can send Screen shots if you want to see? Bruce Broaddus 785-354-5485 [email protected] From: [email protected] [mailto:[email protected]] Sent: Tuesday, October 20, 2009 11:20 AM To: [email protected] Cc: Support Subject: [talkbws] RE: Internet Script, VB help! Greetings, CC'ing Support here - they probably will want to see this if I'm off track here. Wasn't quite following want you need to do, do you want to only print a particular part of the screen - or "delete" from the print the information you do not want. What you're doing now is printing <everything> - which is a one-liner like you have. Now it is possible to actually remove data from the connected to webpage prior to printing it. Note the below is for example only and only deletes the text and the numbering for the cells probably isn't right But it illustrates the concept If Web1.Find("Eligibility<LEGEND>@Beneficiary Eligibility Verification") Then i = 1 Do Until IsNull(Web1.table(i, 1)) If Web1.table(i, 1) = "What I don't want to print" Then Web1.Find Web1.table(i, 1) & "<TD>@Beneficiary Eligibility Verification") 'This actually "deletes" the text from the page. Web1.Selected.innerText = "" End If i = i + 1 Loop When you're connected to a web page, you actually have complete control over the page, including setting / removing content. Regards, Thom Regards, Thom Thom C. Blackwell Product Manager Boston Software Systems (866) 653-5105 ex 807 www.bossoft.com <http://www.bossoft.com/> Sign up for my weekly webinar! <http://www.bostonworkstation.com/customer_center/special_events.aspx> LEGAL NOTICE Unless expressly stated otherwise, this message is confidential and may be privileged. It is intended for the addressee(s) only. Access to this E-mail by anyone else is unauthorized. If you are not an addressee, any disclosure or copying of the contents of this E-mail or any action taken (or not taken) in reliance on it is unauthorized and may be unlawful. If you are not an addressee, please inform the sender immediately, then delete this message and empty from your trash. From: [email protected] [mailto:[email protected]] Sent: Tuesday, October 20, 2009 10:28 AM To: Talk Subject: [talkbws] Internet Script, VB help! I have not been working with VB very long and I get confused with this, so can you geniuses help me out. I have an internet script, that connects to a web page and checks Eligibility Verification. This is what my script looks like Looking for "Eligibility" on the page. Script... WaitForPage If Web1.Find("Eligibility<LEGEND>@Beneficiary Eligibility Verification") Then D("RESULT") = Web1.table(1, 2) ' Eligible Web1.WB.ExecWB OLECMDID_PRINT, OLECMDEXECOPT_DONTPROMPTUSER WaitForPage End If D.Next_ End of Script Section. This works great printing the page if it says "Eligibility" This is what the screen looks like. I would like to exclude 1 eligibility. (If it looks like above) Something like this. If Web1.find("MediKan<TD>@Beneficiary Eligibility Verification") Then D.Next So, I want to look for "Eligibility" but if you find "Eligibility" & "MediKan" Then D.Next, if you only see "Eligibility" then D("result")= etc... Thanks, Bruce Broaddus Revenue Cycle Application Analyst Stormont-Vail Health Care [email protected] --- 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 --- 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 Stormont-Vail HealthCare is proud to be in the top 5 percent of hospitals in the country honored by the American Nurses Credentialing Center's Magnet Recognition Program. ________________________________ The information transmitted in this e-mail and in any replies and forwards are for the sole use of the above individual(s) or entities and may contain proprietary, privileged and/or highly confidential information. Any unauthorized dissemination, review, distribution or copying of these communications is strictly prohibited. If this e-mail has been transmitted to you in error, please notify and return the original message to the sender immediately at the above listed address. Thank you for your cooperation. ________________________________ --- 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 --- 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 --- 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 --- 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 Stormont-Vail HealthCare is proud to be in the top 5 percent of hospitals in the country honored by the American Nurses Credentialing Center's Magnet Recognition Program. ****************************************************************************************************************** The information transmitted in this e-mail and in any replies and forwards are for the sole use of the above individual(s) or entities and may contain proprietary, privileged and/or highly confidential information. Any unauthorized dissemination, review, distribution or copying of these communications is strictly prohibited. If this e-mail has been transmitted to you in error, please notify and return the original message to the sender immediately at the above listed address. Thank you for your cooperation. ******************************************************************************************************************
<<image001.png>>
