当前位置: 首页 > 图文教程 > 脚本技术 > VBScript > 用vbs实现定时运行web文件的方法

VBScript
一个最简单的vbs类实例代码
实用vbs提醒小程序
使用vbs下载文件的代码加强版
vbs病毒制作之一复制自身的vbs脚本
用vbs实现的exe2swf工具脚本代码
vbs更改3389远程桌面端口的脚本
用vbs实现的强制杀进程的脚本
用VBS脚本实现更换Windows Xp序列号的代码
vbs实现右键菜单中添加CMD HERE
用VBS脚本删除指定以外的文件或文件夹
用VBS记录客户机操作的代码
用vbs删除某些类型文件和磁盘空间报告的脚本
两个批量挂马vbs脚本代码
关于vbs WebBrowser导航问题
LCL.VBS 病毒源代码
用vbs实现向任何电子邮件发送邮件
用VBS检测Guest状态的脚本
用vbs实现的输入助手附使用方法
vbs base64 解密脚本代码
用vbs实现修改dns的网关脚本

VBScript 中的 用vbs实现定时运行web文件的方法


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-11   浏览: 78 ::
收藏到网摘: n/a

在一定的时候,要定时的运行某个ASP文件去执行一个任务,如一个工厂在早上9点钟要采集所有的电表的读数,当然这要通过IN SQL连接到各个电表中,我们现在就是用一个ASP文件把IN SQL中表的读数再集中到MS SQL中。
可能你看到的定时运行ASP文件的方法有多种,不过我现在要说的是一种简单的方法,利用计划任务就可简单的实现。
首先,你要写一个js或者vbs文件来调用你所有执行的ASP。下面是js和vbs文件的代码,你可以任选一个,执行效果是一样的。
----------vbs代码start---------------------
复制代码 代码如下:

'CODE BY 小荷 [email protected]
'Create an instance of IE
Dim IE
Set IE = CreateObject("InternetExplorer.Application")
'运行你的 URL
ie.navigate("http://www.knowsky.com/")
ie.visible=1
'Clean up...
Set IE = Nothing

--------vbs代码end------------------------
你可以取任何名称,但后缀名一定要是vbs,在这里我们取名do.vbs。
----------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-----------------------
你也可以取任何名称,但后缀名一定要是js,在这里我们取名do.js。
这里不对文件中的代码进行解说。
只要把上面文件中的所有 http://www.knowsky.com/ 换成你要执行的ASP文件的URL地址就可以了。这里是URL地址,而不是绝对地址。
然后打开 WINDOWS 的任务计划,就象选择任何可执行文件一样选择上面一个do.js或者do.vbs文件所在的位置,设定执行时间等,确定就可以了。
然后这个ASP文件就可以被任务计划定时的运行了,简单吧。
就如开头所说的,任务计划就可以在早上9点,执行这个ASP文件,把电表的读数收集到MS SQL中了。