用vbs实现的输入助手附使用方法

//把要ECHO的脚本,拖到此脚本上...根据提示操作即可 


代码如下:

On Error Resume Next 
Set Arg=Wscript.arguments 
If Arg.count=0 then Wscript.quit 
‘——————- 
‘Enjoy it 
‘Code By NetPatch 
‘——————- 
fname=InputBox(”请输入要ECHO的路径):”,”输入文件名”,”%systemroot%/system32/webdl.vbs”)

Set Fso=CreateObject(”Scripting.FileSystemObject”) 
Set WshShell=Wscript.CreateObject(”Wscript.Shell”) 
Set File=Fso.OpenTextFile(Arg(0),1,False,-2)

Wscript.echo “点确定后5秒开始” 
WshShell.AppActivate “命令提示符” 
Wscript.Sleep 5000 
WshShell.AppActivate “命令提示符”

Do While File.AtEndOfStream <> True 
Data=File.readline 
If Data=”" then Data=”.” 
Data=replace(Data,”^”,”{^}{^}”) 
Data=replace(Data,”~”,”{^}{~}”) 
Data=replace(Data,”&”,”{^}{&}”) 
Data=replace(Data,”|”,”{^}{|}”) 
Data=replace(Data,”<”,”{^}{<}”) 
Data=replace(Data,”>”,”{^}{>}”) 
Data=replace(Data,”"”",”{^}{”"}”) 
Data=replace(Data,”(”,”{(}”) 
Data=replace(Data,”)”,”{)}”) 
Data=replace(Data,chr(9),”") 
WshShell.SendKeys “echo “&Data&”>>”&fname 
Wscript.Sleep 300 
WshShell.SendKeys “{ENTER}” 
Wscript.Sleep 1000 
Loop 
File.close 
Set Fso=nothing

赞 (0)

相关推荐

  • 用vbs实现的输入助手附使用方法

    //把要ECHO的脚本,拖到此脚本上...根据提示操作即可  复制代码 代码如下: On Error Resume Next  Set Arg=Wscript.arguments  If Arg.count=0 then Wscript.quit  '-------  'Enjoy it  'Code By NetPatch  '-------  fname=InputBox("请输入要ECHO的路径):","输入文件名","%systemroot%/sy

  • VBS利用SendKeys输入中文字符的方法

    首先我们看一个输入字母的例子: 复制代码 代码如下: set s = WScript.CreateObject("WScript.Shell") app=s.Run ("C:\windows\notepad.exe") code="biweilun" WScript.Sleep 1000 s.AppActivate app s.SendKeys code Wscript.quit 这段vbs会SendKeys方法的朋友就知道,作用是打开一个记事本

  • 用VBS读写二进制文件的另一种方法分享

    之前写的那篇给出的方法虽然不错,但是当文件过大时(其实很小,也就几M),对应的数组也会很大,然后会出现运行时错误,提示内存耗尽,为此我郁闷了好久. 最近在博客的流量记录中发现百度关键字"一些很恶作剧的vbs程序"(看来现在的年轻人很喜欢玩这口),于是打开久违的百度搜索了一下,发现出现在第三.出现在第二的是百度HI,上面也是一个恶作剧程序,而且还是加密的.我尝试着解密,却发现这个加密似乎比前几天解密的那个病毒更变态,未果. 虽然我没有把那个程序解密出来(如果哪位真正的高手会,麻烦指点一下

  • javascript简单判断输入内容是否合法的方法

    本文实例讲述了javascript简单判断输入内容是否合法的方法.分享给大家供大家参考,具体如下: 关于检测用户输入的内容是否有非法的字符检测实现思路 1.定义合法的字符串(源字符串) 2.获取用户输入的内容 3.循环的取出用户输入的每一个字符,去源字符串中查找   1).查找到了,返回字符串查找的位置   2).没有找到返回-1,我们正好利用-1检测用户输入的内容是否合法 <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0Transitional//

  • JS简单限制textarea内输入字符数量的方法

    本文实例讲述了JS简单限制textarea内输入字符数量的方法.分享给大家供大家参考.具体如下: 这里演示JS限制一个area内的字符不能超过255,多余则截取. 代码如下: <script> function getStringUTFLength(str) { var value = str.replace(/[\u4e00-\u9fa5]/g," "); //将汉字替换为两个空格 return value.length; } function leftUTFString

  • 基于JS实现导航条之调用网页助手小精灵的方法

    1.概述 在网站中加入网页助手小精灵,当用户访问网站时,向用户问好,或是传递一些网站的重要信息,不仅可以帮助用户快速了解网站,而且可以让用户对该网站留下深刻的印象.本实例将介绍通过JavaScript调用网页助手小精灵的方法. 2.技术要点 本实例主要通过Microsoft的ActiveX组件Microsoft Agent实现.Microsoft Agent提供了很多控制Agent角色的方法,下面进行详细介绍. a. Load()方法:用于读入要使用的角色,该方法包括两个参数,一个用于指定角色的

  • PhpStorm terminal无法输入命令的解决方法

    PhpStorm terminal无法输入命令的解决方法

    在使用PhpStorm时,点击下面的terminal时,发现怎么输入都不显示,于是一查才发现是phpstorm与win10系统不兼容的问题,只要设置一下控制台(使用老版本就ok了) 步骤非常简单: win+r打开控制器,鼠标右键标题栏,点击属性,选择选项标签,勾选使用旧版控制台(需要重新启动),然后重启phpstorm,重新打开terminal就可以正常输入使用了, 如图: 以上就是小编为大家带来的PhpStorm terminal无法输入命令的解决方法全部内容了,希望大家多多支持我们~

  • Javascript控制input输入时间格式的方法

    本文实例讲述了Javascript控制input输入时间格式的方法.分享给大家供大家参考.具体分析如下: 之前做了一个Javascript控制时间格式的输入,主要用到了keydown和keyup两个事件,但感觉写的很复杂而且还有bug. 今日了解了一下keypress事件与keydown和keyup的区别.大致如下(目前只了解这么多): keydown:按键按下的时候触发,通过event可以获取到keyCode,可以获取到文本框输入之前的值: keyup:按键弹出(松开)时触发,通过event可

  • Android EditText限制输入字符类型的方法总结

    Android EditText限制输入字符类型的方法总结 前言: 最近的项目上需要限制EditText输入字符的类型,就把可以实现这个功能的方法整理了一下: 1.第一种方式是通过EditText的inputType来实现,可以通过xml或者Java文件来设置.假如我要设置为显示密码的形式,可以像下面这样设置: 在xml中 Android:inputType="textPassword" 在java文件中,可以用 myEditText.setInputType(InputType.TY

  • jQuery实现统计输入文字个数的方法

    本文实例讲述了jQuery实现统计输入文字个数的方法.分享给大家供大家参考.具体如下: jQuery统计输入文字个数可以使用在统计回复字数,标题字数长度提示,增加友好度提高用户体验.代码如下: 复制代码 代码如下: <html xmlns="http://www.w3.org/1999/xhtml"> <head> <meta http-equiv="Content-Type" content="text/html; char

随机推荐