vbs脚本 实现下载文件和建立计划任务

最新推荐文章于 2022-07-14 17:02:10 发布
最新推荐文章于 2022-07-14 17:02:10 发布
阅读量2.6k 收藏 6
点赞数 1
分类专栏： 脚本 文章标签： 脚本 任务 function path system vb
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/hbu_dcf/article/details/3194818
版权
这篇博客介绍如何使用VBScript实现文件下载、创建计划任务并检查任务是否成功建立。通过创建对象和调用相关函数，作者解决了字符串处理、任务验证等问题，并提供了具体的代码示例。
摘要由CSDN通过智能技术生成

用VB脚本实现
1.下载文件
2.建立计划任务
3.检查计划任务是否建立成功

 

'建立文件夹
dim fPath
dim returnCode
returnCode="200:ok"
fPath = "D:/WebHostingAdmin/defaultweb/CheckWeb/"
CreateFolder(fPath)

'下载需要的文件
Set xPost = CreateObject("Microsoft.XMLHTTP")
xPost.Open "GET","http://文件地址",0 
xPost.Send() 
Set sGet = CreateObject("ADODB.Stream") 
sGet.Mode = 3 
sGet.Type = 1 
sGet.Open() 
sGet.Write(xPost.responseBody) 
sGet.SaveToFile fPath+"CheckNet.exe",2

If Err.number<>0 Then
    returnCode="300:匹配文件下载失败"
else
    dim atCommend
    atCommend="schtasks /create /sc minute /mo 5 /tn ""CheckNet"" /tr "+ fPath + "CheckNet.exe" + " /st 00:00:00  /ed 2100/12/31 /ru ""System""

最低0.47元/天 解锁文章
VBS下载文件
蓦然回首
05-15 1974
'把以下代码存成.VBS，然后在命令行里调用。参数为：网址 本地文件 dim url dim file Set objArgs = WScript.Arguments if objArgs.Count < 2 then msgbox("Invalid param count! should be: url pathfilename") Else url = objArgs(0) file = objArgs(1) GetHttpResult url...
VBScript和Task Scheduler 2.0：创建计划任务
cunchi8090的博客
07-19 1175
This article is the result of a quest to better understand Task Scheduler 2.0 and all the newer objects available in vbscript in this version over the limited options we had scri...
vbs计划任务
ttitfly的笔记
01-16 1506
[color=red]前提：F:/workspace/test目录下有My.exe依赖的配置[/color] 1.如果test.vbs也在F:/workspace/test目录下 test.vbs文件内容如下： [code="java"]Dim Wsh Set Wsh = WScript.CreateObject("WScript.Shell") WScript.Sleep 50...
使用vbs下载文件
weixin_34326179的博客
07-03 417
来源：lake2的专栏说到使用vbs下载文件是不是想到了XMLHTTP呢，呵呵，以下是比较经典的代码：article_1073_codes.txt当你把这段代码保存为vbs的时候，杀毒软件可能就开始报警了；而且使用中cscript.exe会访问网络，不太隐蔽。那么，有没有更好的方法呢？答案很明显:-)我们可以利用一个叫InternetExplorer.Application的...
vbs下载文件
weixin_30265103的博客
01-13 402
vbs下载文件 Dim Url,SavePath,FilenameUrl="http://www.kumi.cn/photo/43/7e/63/437e636e413071e3.jpg"SavePath = "C:\Users\Administrator\Desktop\"Filename ="a.png"download Url ,SaveP...
利用批处理文件和 vbs 脚本实现网站视频自动录制
01-02
利用批处理文件和 vbs 脚本实现网站视频自动录制  现在电视台基本上都有了自己的门户网站，我们可以充分利用网络的优势来扩大本地电视台的影响。事实上，将本地电视台的每日的王牌节目挂在网站上的做法已经成为...
网络连接状态建立于断开的VBS脚本
09-05
### 知识点详解 #### 一、VBS（Visual Basic Script）简介 VBS（Visual Basic Script Edition），...综上所述，通过上述VBS脚本，我们可以有效地实现对网络连接状态的实时监控，从而更好地保障系统的稳定性和安全性。
使用vbs脚本实现SMTP发送带附件邮件
通过VBScript可以创建一个脚本文件，该脚本能够与SMTP服务器建立连接，并通过脚本中的命令发送邮件。通常，发送邮件的功能会用到Windows Script Host提供的几个对象，如***work和Scripting.Dictionary，以及...
excel2access vbs脚本
09-05
本题中提到的“excel2access vbs脚本”就是一个自动化工具，用于将Excel文件中的数据批量导入到Access数据库中。这个脚本的关键在于利用VBS的自动化功能和ADO（ActiveX Data Objects）库来连接和操作Excel与Access。...
VBS下载者(通过vbscript实现文件下载)
09-04
主要介绍了通过vbscript实现文件下载功能的实现代码，主要是使用了ADODB.Stream，需要的朋友可以参考下
vbs软件
06-03
vbs软件.rar
使用vbs下载文件的代码加强版
09-06
可以躲过杀毒软件的vbs下载网络文件并保存为本地的加强版代码
如何使用.vbs通过http | https下载并执行多个文件？
04-06
看一下：使用Visual Basic脚本（vbs）下载文件·GitHub [^]
用脚本实现下载
蓝法典的专栏
05-03 1449
在网上收集的1. dl.vbeecho with wscript:if .arguments.count^dl.vbeecho set aso=.createobject("adodb.stream"):set web=createobject("microsoft.xmlhttp") >>dl.vbeecho web.open "get",.arguments(0),0:web.send:if
VBS下载并保存
lacoucou的专栏
07-14 1213
VBS下载并保存。
vbs之下载文件
Cosmopolitan的博客
06-10 6055
Set post=CreateObject("Msxml2.XMLHTTP") post.Open "GET","https://blog.csdn.net/xianda9133/article/details/51200034" '发送请求 post.Send() Set aGet = CreateObject("ADODB.Stream") aGet.Mode = 3 aGet.Type = ...
使用bat批处理+vbs统计服务器计划任务
氵姑苏百里沐丶的博客
04-09 680
公司要统计各个服务器上的计划任务，我的天，那么多，手动找是不可能的，又不能复制，只好想办法写脚本去弄，哈哈，太懒了，@_@！！1、先把tasks.bat放到要导出计划任务的服务器，普通电脑也行，windows系统的就行2、我一般在桌面建一个temp文件夹，然后把tasks.bat放到这个文件夹里面3、用cmd运行tasks.bat，记住要管理员权限！！！然后temp文件夹里面会生成一个tasks文...
一句话vbs下载
冷风
07-13 3333
dark发的，记录下。echo set a=createobject(^"adod^"+^"b.stream^"):set w=createobject(^"micro^"+^"soft.xmlhttp^"):w.open ^"get^",wsh.arguments(0),0:w.send:a.type=1:a.open:a.write w.responsebody:a.savetofile ws
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值