Can't find the information you are looking for here? Then leave a message over on our WinBatch Tech Support Forum.
Keywords: Using MSIE from a WinBatch front end.wbt
; first build a blank html file... gosub BlankWindow ; start MSIE via OLE Browser = ObjectOpen("InternetExplorer.Application") browser.visible = @true url = hfile browser.navigate(url) ; wait for page to load while browser.readystate <> 4 timedelay(0.5) endwhile ; basic HTML vars, .write method doesn't like strings... hbr = "<br>" htab= " " ; setup the document reference... BrowserDoc = Browser.Document ; make the output window black on gold... BrowserDoc.write(strcat("<body bgcolor=black text=gold>", hbr)) ; get a list of wbt files... wbtfiles = fileitemize("c:\z\*.wbt") ; write the number, file to the output window... for x = 1 to 10 BrowserDoc.write(strcat(x, htab, itemextract(x, wbtfiles, @tab), hbr)) next ; write out a basic form... ; note the test.wbt just displays a message("Debug", "Test Message from Form") ; BrowserDoc.write(strcat("<form name=TestForm method=GET action='c:\z\test.wbt'>", hbr)) BrowserDoc.write(strcat("<input type=submit name=submit value='Press for WBT'></form>")) timedelay(15) gosub BlankWindow browser.navigate(url) exit :BlankWindow hfile = "c:\z\junk.html" oh = fileopen(hfile, "write") filewrite(oh, "<html></html>") fileclose(oh) return
Article ID: W15661
File Created: 2003:05:13:11:29:24
Last Updated: 2003:05:13:11:29:24