Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- <body bgcolor="#ffffff" leftmargin="0" topmargin="0" background bgProperties="fixed" onload="javascript:printform();" >
- <Script Language='JavaScript'>
- function printform()
- {
- print();
- }
- </script>
- Private ie As InternetExplorer
- Private doc As HTMLDocument
- Private pBarcodeStandard As String
- Private Sub IE_Wait()
- Do While ie.Busy Or ie.readyState = READYSTATE_LOADING: DoEvents: Loop
- End Sub
- Public Sub Import_TES_Data()
- Set ie = New InternetExplorer
- ie.Visible = False
- ie.navigate "https://company.intranet.page.here/"
- IE_Wait
- Set doc = ie.document
- doc.getElementsByName("itemNum")(0).value = pBarcodeStandard
- doc.forms(0).submit
- 'After submitting the form (at this point) the webpage loads with the onLoad command
- End Sub
Add Comment
Please, Sign In to add comment