----------vbs代码start--------------------- 复制代码 代码如下: 'CODE BY 小荷 aston314@sohu.com 'Create an instance of IE Dim IE Set IE = CreateObject("InternetExplorer.Application")
----------js代码start--------------------- 复制代码 代码如下: var html = ""; html += " html head title 运行窗口 /title /head body html += " font face=verdana /font html += " /body /html
// Create Internet Explorer Object ie = new ActiveXObject("InternetExplorer.Application");
// Define how the window should look ie.left = 50; ie.top = 50; ie.height = 510; ie.width = 470; ie.menubar = 0; ie.toolbar = 0;
// Set the browser to a blank page ie.navigate("http://www.knowsky.com/");
// Show the browser ie.visible=1;
// Open a stream and write data. //ie.document.open; //ie.document.write( html ); //ie.document.close; ---------js代码end-----------------------