' Create an instance of IE Dim IE Set IE =CreateObject("InternetExplorer.Application") 'Run your URL ie.navigate("http://spring.cnblogs.com/") ie.visible=1 'Clean up Set IE =Nothing
Run.js
// Create the HTML message to display. 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://spring.cnblogs.com/"); // Show the browser ie.visible=1; // Open a stream and write data. ie.document.open; ie.document.write( html ); ie.document.close;