精华内容
下载资源
问答
  • Author:Trajon.BWL今天在网上随便闲逛,逛到一个帖子,这位迷茫的朋友想知道该怎么使用SendKeysvbs方法来输入中文字符
  • 在vbscript中我们可以object.SendKeys模拟键盘操作,将一个或多个按键指令发送到指定Windows窗口来控制应用程序运行,,需要的朋友可以参考下
  • VBS + SendKeys 方法

    千次阅读 2019-05-28 10:24:17
    object.SendKeys(string) 参数 object WshShell 对象。 string 表示要发送的键击(一个或多个)的字符串值。 说明 使用 SendKeys 方法可以将键击发送到无自动化界面的应用程序中。多数键盘字符都可用一个键击...

    将一个或多个键击发送到活动窗口(仿佛是在键盘上击键一样)。

    object.SendKeys(string)

    参数

    object

    WshShell 对象。

    string

    表示要发送的键击(一个或多个)的字符串值。

    说明

    使用 SendKeys 方法可以将键击发送到无自动化界面的应用程序中。多数键盘字符都可用一个键击表示。某些键盘字符由多个键击组合而成(例如,CTRL+SHIFT+HOME)。要发送单个键盘字符,请将字符本身作为 string 参数发送。例如,要发送字母 x,则请发送 string 参数 "x"。

    注意   要发送空格,则请发送字符串 " "。

    可使用 SendKeys 同时发送多个键击。为此,可将每个键击按顺序排列在一起,以此来创建表示一系列键击的复合字符串参数。例如,要发送键击 a、b 和 c,则需要发送字符串参数 "abc"。SendKeys 方法将某些字符用作字符的修饰符(而不使用其本身的含义)。这组特殊的字符可包括圆括号、中括号、大括号,以及:

    • 加号       "+"、
    • 插入记号             "^"、
    • 百分号 "%"、
    • 和“非”符号       "~"。

    用大括号 "{}" 括起这些字符可以发送它们。例如,要发送加号,请使用字符串参数 "{+}"。SendKeys中使用的中括号 "[ ]" 无任何特殊含义,但是必须把它们括在大括号中,以便容纳确实要赋予其特殊含义的应用程序(例如,对于动态数据交换 (DDE) 就是这样)。

    • 要发送左中括号字符,请发送字符串参数 "{[]";要发送右中括号字符,请发送字符串参数 "{]}"。
    • 要发送左大括号字符,请发送字符串参数 "{{}";要发送右大括号字符,请发送字符串参数 "{}}"。

    某些键击不生成字符(如 ENTER 和 TAB)。某些键击表示操作(如 BACKSPACE 和 BREAK)。要发送这些类型的键击,请发送下表中列出的参数:

    参数
    退格键{BACKSPACE}、{BS} 或 {BKSP}
    BREAK{BREAK}
    CAPS LOCK{CAPSLOCK}
    DEL 或 DELETE{DELETE} 或 {DEL}
    向下键{DOWN}
    END{END}
    ENTER{ENTER} 或 ~
    ESC{ESC}
    HELP{HELP}
    HOME{HOME}
    INS 或 INSERT{INSERT} 或 {INS}
    向左键{LEFT}
    NUM LOCK{NUMLOCK}
    PAGE DOWN{PGDN}
    PAGE UP{PGUP}
    PRINT SCREEN{PRTSC}
    向右键{RIGHT}
    SCROLL LOCK{SCROLLLOCK}
    TAB{TAB}
    向上键{UP}
    F1{F1}
    F2{F2}
    F3{F3}
    F4{F4}
    F5{F5}
    F6{F6}
    F7{F7}
    F8{F8}
    F9{F9}
    F10{F10}
    F11{F11}
    F12{F12}
    F13{F13}
    F14{F14}
    F15{F15}
    F16{F16}

    要发送由常规键击和 SHIFT、CTRL 或 ALT 组合而成的键盘字符,请创建表示该键击组合的复合字符串参数。可通过在常规键击之前添加一个或多个以下特殊字符来完成上述操作:

    特殊字符
    SHIFT+
    CTRL^
    ALT%
    注意   这样使用时,不用大括号括起这些特殊字符。

    要指定在按下多个其他键时,按下 SHIFT、CTRL 和 ALT 的组合,请创建复合字符串参数,用括号括起其中的组合键。例如,要发送的组合键指定:

    • 如果在按 e 和 c 的同时按 SHIFT 键,则发送字符串参数 "+(ec)"。
    • 如果在按 e 时只按 c(而不按 SHIFT),则发送字符串参数 "+ec"。

    可使用 SendKeys 方法发送一种在一行内重复按键的键击。为此,要创建复合字符串参数,以指定要重复的键击,并在其后指定重复次数。可使用 {键击 数字} 形式的复合字符串参数来完成上述操作。例如,如果要发送 10 次 "x",则需要发送字符串参数 "{x 10}"。请确保在键击和数字之间有一个空格。

    注意   只可以发送重复按一个键的键击。例如,可以发送 10 次 "x",但不可发送 10 次 "Ctrl+x"。
    注意   不能向应用程序发送 PRINT SCREEN 键 {PRTSC}。

    示例

    下面的示例演示如何将一个 .wsf 文件用于以不同脚本语言(VBScript 和 Jscript)写成的两个作业。每个作业都运行 Windows 计算器并将它发送给键击以执行简单的计算。

    <package>
       <job id="vbs">
          <script language="VBScript">
             set WshShell = WScript.CreateObject("WScript.Shell")
             WshShell.Run "calc"
             WScript.Sleep 100
             WshShell.AppActivate "Calculator"
             WScript.Sleep 100
             WshShell.SendKeys "1{+}"
             WScript.Sleep 500
             WshShell.SendKeys "2"
             WScript.Sleep 500
             WshShell.SendKeys "~"
             WScript.Sleep 500
             WshShell.SendKeys "*3"
             WScript.Sleep 500
             WshShell.SendKeys "~"
             WScript.Sleep 2500
          </script>
       </job>
    
       <job id="js">
          <script language="JScript">
             var WshShell = WScript.CreateObject("WScript.Shell");
             WshShell.Run("calc");
             WScript.Sleep(100);
             WshShell.AppActivate("Calculator");
             WScript.Sleep(100);
             WshShell.SendKeys ("1{+}");
             WScript.Sleep(500);
             WshShell.SendKeys("2");
             WScript.Sleep(500);
             WshShell.SendKeys("~");
             WScript.Sleep(500);
             WshShell.SendKeys("*3");
             WScript.Sleep(500);
             WshShell.SendKeys("~");
             WScript.Sleep(2500);
          </script>
       </job>
    </package>
    展开全文
  • VbssendKeys

    千次阅读 2018-06-25 00:49:14
    基本键 一般来说,SendKeys 要发送的按键指令都可以直接用该按键字符本身来表示,例如要发送字母“x”,使用“WshShell.SendKeys "x"”即可。当然,也可直接发送多个按键指令,只需要将按键字符按顺序排列...

    https://blog.csdn.net/airweilai/article/details/2602923  转自此处


    1.基本键 一般来说,SendKeys 要发送的按键指令都可以直接用该按键字符本身来表示,例如要发送字母“x”,使用“WshShell.SendKeys "x"”即可。当然,也可直接发送多个按键指令,只需要将按键字符按顺序排列在一起即可,例如,要发送按键“happy”,可以使用“WshShell.SendKeys "happy"”。 模拟键盘操作,将一个或多个按键指令发送到指定Windows窗口来控制应用程序运行, 其使用格式为:object.SendKeys string “object”:表示WshShell对象 “string”:表示要发送的按键指令字符串,需要放在英文双引号中。 2.特殊功能键   对于需要与Shift、Ctrl、Alt三个控制键组合的按键,SendKeys使用特殊字符来表示: Shift---------WshShell.SendKeys "+" Ctrl---------WshShell.SendKeys "^" Alt---------WshShell.SendKeys "%" 由于“+”、“^”这些字符用来表示特殊的控制按键了,如何表示这些按键呢? 只要用大括号括住这些字符即可。例如: 要发送加号“+”,可使用“WshShell.SendKeys "{+}"” 另外对于一些不会生成字符的控制功能按键,也同样需要使用大括号括起来按键的名称,例如要发送回车键,需要用“WshShell.SendKeys "{ENTER}"”表示,发送向下的方向键用“WshShell.SendKeys "{DOWN}"”表示。 Space---------WshShell.SendKeys " " Enter---------WshShell.SendKeys "{ENTER}" ←---------WshShell.SendKeys "{RIGHT}" ↑---------WshShell.SendKeys "{UP}" F1---------WshShell.SendKeys "{F1}" Tips:如果需要发送多个重复的单字母按键,不必重复输入该字母,SendKeys允许使用简化格式进行描述,使用格式为“{按键 数字}”。例如要发送10个字母“x”,则输入“WshShell.SendKeys "{x 10}"”即可。 实例: ---------------------------------------------------- 按下F5刷新桌面 Dim WshShell,Path,i Set WshShell = WScript.CreateObject("WScript.Shell") WshShell.SendKeys "{F5}" ---------------------------------------------------- 电脑的自动重启 set WshShell = CreateObject("WScript.Shell") WshShell.SendKeys "^{ESC}u" WshShell.SendKeys "R" ---------------------------------------------------- 启动任务管理器 set WshShell = CreateObject("WScript.Shell") WshShell.SendKeys "^+{ESC}" ---------------------------------------------------- QQ消息群发 Dim WshShell Set WshShell= WScript.createObject("WScript.Shell") WshShell.AppActivate "bomb" for i=1 to 60 WScript.Sleep 800 WshShell.SendKeys "Number0" WshShell.SendKeys i WshShell.SendKeys "%s" next ---------------------------------------------------- 自动到百度搜索歌曲:white flag Dim WshShell,Path,i Set WshShell = WScript.CreateObject("WScript.Shell") WshShell.Run("IEXPLORE.EXE") WScript.Sleep 2000 WshShell.AppActivate "about:blank-Microsoft Internet Explorer" WshShell.SendKeys "+{TAB}" WshShell.SendKeys "http://mp3.baidu.com" WScript.Sleep 800 WshShell.SendKeys "{ENTER}" WScript.Sleep 3000 WshShell.SendKeys "white flag" WScript.Sleep 800 WshShell.SendKeys "{ENTER}" ---------------------------------------------------- 在记事本中输入Happy Birthday!并保存为birth.txt Dim WshShell Set WshShell=WScript.CreateObject("WScript.Shell") WshShell.Run "notepad" WScript.Sleep 1500 WshShell.AppActivate "无标题 - 记事本" WshShell.SendKeys "H" WScript.Sleep 500 WshShell.SendKeys "a" WScript.Sleep 500 WshShell.SendKeys "p" WScript.Sleep 500 WshShell.SendKeys "p" WScript.Sleep 500 WshShell.SendKeys "y" WScript.Sleep 500 WshShell.SendKeys " " WScript.Sleep 500 WshShell.SendKeys "B" WScript.Sleep 500 WshShell.SendKeys "i" WScript.Sleep 500 WshShell.SendKeys "r" WScript.Sleep 500 WshShell.SendKeys "t" WScript.Sleep 500 WshShell.SendKeys "h" WScript.Sleep 500 WshShell.SendKeys "d" WScript.Sleep 500 WshShell.SendKeys "a" WScript.Sleep 500 WshShell.SendKeys "y" WScript.Sleep 500 WshShell.SendKeys "!" WScript.Sleep 500 WshShell.SendKeys "%FS" WScript.Sleep 500 WshShell.SendKeys "b" WScript.Sleep 500 WshShell.SendKeys "i" WScript.Sleep 500 WshShell.SendKeys "r" WScript.Sleep 500 WshShell.SendKeys "t" WScript.Sleep 500 WshShell.SendKeys "h" WScript.Sleep 500 WshShell.SendKeys "%S" WScript.Sleep 500 WshShell.SendKeys "%FX" ---------------------------------------------------- 制作能自动定时存盘的记事本 '第一部分:定义变量和对象 Dim WshShell, AutoSaveTime, TXTFileName AutoSaveTime=300000 Set WshShell=WScript.CreateObject("WScript.Shell") TXTFileName=InputBox("请输入你要创建的文件名(不能用中文和纯数字):") '第二部分:打开并激活记事本 WshShell.Run "notepad" WScript.Sleep 200 WshShell.AppActivate "无标题 - 记事本" '第三部分:用输入的文件名存盘 WshShell.SendKeys "^s" WScript.Sleep 300 WshShell.SendKeys TXTFileName WScript.Sleep 300 WshShell.SendKeys "%s" WScript.Sleep AutoSaveTime '第四部分:自动定时存盘 While WshShell.AppActivate (TXTFileName)=True WshShell.SendKeys "^s" WScript.Sleep AutoSaveTime Wend WScript.Quit ---------------------------------------------------- 死机的,嘿嘿! DIM WSHSHELL SET WSHSHELL=WSCRIPT.CREATEOBJECT("WSCRIPT.SHELL") 'WSHSHELL.RUN " " 'WSCRIPT.SLEEP 1000 WSHSHELL.SENDKEYS "{ENTER}" 'WSCRIPT.SLEEP 1000 WSHSHELL.SENDKEYS "{ENTER}" 'WSCRIPT.SLEEP 1000 WSHSHELL.SENDKEYS "{ENTER}" 'WSCRIPT.SLEEP 1000 WSHSHELL.SENDKEYS "{ENTER}" 'WSCRIPT.SLEEP 1000 WSHSHELL.SENDKEYS "{ENTER}" ---------------------------------------------------- 定时关机的 Dim WshShell Set WshShell=WScript.CreateObject("WScript.Shell") WScript.Sleep 2000 WshShell.Run "shutdown -r -t 120" wscript.sleep 6000 WshShell.Run "shutdown -a

    展开全文
  • 看到demon.tw的文章,发现的sendkeys 16进制的效果,非常的不错,喜欢的朋友可以参考下。
  • 今天有人问我如何向APPlication 发送双引号,分号等,我在这里做一个总结,方便你使用参考
  • VBScript - SendKeys 方法

    千次阅读 2018-07-11 14:54:24
    SendKeys方法用于将击键发送到当前活动窗口,就好像它们是从键盘输入的一样。 object.SendKeys Keystrokes 单个字母数字击键可以简单地通过字符串表示所需的字符来指定。例如,要发送字母S,命令将是object.Send...

    简述

    SendKeys方法用于将击键发送到当前活动窗口,就好像它们是从键盘输入的一样。

    object.SendKeys Keystrokes

    单个字母数字击键可以简单地通过字符串表示所需的字符来指定。例如,要发送字母S,命令将是object.SendKeys"S"

    将多个字符合并到一个字符串中。例如,发送A、B和C命令将是object.SendKeys "ABC"

    加号“+”,脱字符(caret)“^”,百分号“%”,波浪号“~”和括号“()”都有特殊的含义,必须用花括号“{}”括起来。方括号“[]”也必须用花括号“{}”括起来,尽管它们没有特殊的含义。要指定花括号字符本身,用“{{}”和“{}}”。

    字符表

    下面是一个字符表,不能用键盘字符直接表示,可以使用其中的一个,指定适当的代码。

    Key         |   Code
    -------------------------------------------
    Backspace       {BACKSPACE}, {BKSP} or {BS}
    Break           {BREAK}
    Caps Lock       {CAPSLOCK}
    Delete          {DELETE} or {DEL}
    Down Arrow      {DOWN}
    End             {END}
    Enter           {ENTER} or ~
    Escape          {ESC}
    Help            {HELP}
    Home            {HOME}
    Insert          {INSERT} or {INS}
    Left Arrow      {LEFT}
    Num Lock        {NUMLOCK}
    Page Down       {PGDN}
    Page Up         {PGUP}
    Print Screen    {PRTSC}
    Right Arrow     {RIGHT}
    Scroll Lock     {SCROLLLOCK}
    Tab             {TAB}
    Up Arrow        {UP}
    F1              {F1}
    F2              {F2}
    F3              {F3}
    F4              {F4}
    F5              {F5}
    F6              {F6}
    F7              {F7}
    F8              {F8}
    F9              {F9}
    F10             {F10}
    F11             {F11}
    F12             {F12}
    F13             {F13}
    F14             {F14}
    F15             {F15}
    F16             {F16}
    
    要指定字符组合使用下列代码:
    
    Key        |    Code
    ---------------------------
    Alt              %
    Ctrl             ^
    Shift Lock       + 
    
    例如,要指定CTRL和C,代码是`object.SendKeys "^C"`。
    SHIFT F5 代码是`object.SendKeys "+{F5}"`。
    若要指定多个组合集,如ALT A Z,则使用圆括号(),代码是`object.SendKeys "%(AZ)"`。

    Example

    'VBScript Example
    Set WshShell = WScript.CreateObject("WScript.Shell")
    
    WshShell.Run "%windir%\notepad.exe"
    WshShell.AppActivate "Notepad"
    
    WshShell.SendKeys "Hello World!"
    WshShell.SendKeys "{ENTER}"
    WshShell.SendKeys "abc"
    WshShell.SendKeys "{CAPSLOCK}"
    WshShell.SendKeys "def"
    
    ' Open notepad 
    Set WshShell = WScript.CreateObject("WScript.Shell")
    WshShell.Run "notepad.exe", 9
    
    ' Give Notepad time to load
    WScript.Sleep 500 
    
    ' Type in Hello World
    WshShell.SendKeys "Hello World!"
    WshShell.SendKeys "{ENTER}"
    
    ' Add the date
    WshShell.SendKeys "{F5}"

    参考:
    VBScript - SendKeys Method
    https://ss64.com/vb/sendkeys.html
    VBS 控制按键
    Vbs 脚本编程简明教程之-—妙用 SendKeys 简化重复操作

    展开全文
  • SendKeys 模拟键盘操作,将一个或多个按键指令发送到指定Windows窗口来控制应用程序运行,下面有很多的vbs结合sendkyes的实例代码,方便大家学习
  • 下表显示了十六进制符号常量名,,由系统所使用的虚拟键码和鼠标或键盘等值。这些代码数字顺序列出。
  • VBS语言,一个发送键盘的VBS语言。好东东。如:wshshell.sendkeys "{F5}" 'F5按钮
  • VBS运用之妙用SendKeys

    2012-01-19 13:29:26
    VBS运用之妙用SendKeys 2010年11月12日  每次开机的时候,你想自动登陆你的QQ或者博客吗?巧妙使用VBS中的SendKeys命令(这个命令的作用就是模拟键盘操作,将一个或多个按键指令发送到指定Windows窗口来控制应用...
    VBS运用之妙用SendKeys 
    
    2010年11月12日
      每次开机的时候,你想自动登陆你的QQ或者博客吗?巧妙使用VBS中的SendKeys命令(这个命令的作用就是模拟键盘操作,将一个或多个按键指令发送到指定Windows窗口来控制应用程序运行),可以极大的方便我们的常用操作。其使用格式为:
      Object.SendKeys string其中:
      Object:为WshShell对象,即脚本的第一行为:
      Set WshShell=WScript.CreateObject("WScript.Shell")
      将Object替换为WshShell
      “string”:表示要发送的按键指令字符串,需要放在英文双引号中。它包含如下内容:
      1.基本键:一般来说,要发送的按键指令都可以直接用该按键字符本身来表示,例如要发送字母“x”,使用“WshShell.SendKeys
      "x"”即可。当然,也可直接发送多个按键指令,只需要将按键字符按顺序排列在一起即可,例如,要发送按键“cfan”,可以使用
      “WshShell.SendKeys "cfan"”。
      2.特殊功能键:对于需要与Shift、Ctrl、Alt三个控制键组合的按键,SendKeys使用特殊字符来表示:Shift ― +;Ctrl ― ^;Alt ― %
      如要发送的组合按键是同时按下Ctrl+E,需要用WshShell.SendKeys
      "^e"”表示,如果要发送的组合按键是按住Ctrl键的同时按下E与C两个键,这时应使用小括号把字母键括起来,书写格式为“WshShell.SendKeys
      "^(ec)"”,这里要注意它与“WshShell.SendKeys
      "^ec"”的区别,后者表示组合按键是同时按住Ctrl和E键,然后松开Ctrl键,单独按下“C”字母键。
      由于“+”、“^”这些字符用来表示特殊的控制按键了,如何表示这些按键呢?只要用大括号括住这些字符即可。例如,要发送加号“+”,可使用“WshShell.SendKeys
      "{+}"”。另外对于一些不会生成字符的控制功能按键,也同样需要使用大括号括起来按键的名称,例如要发送回车键,需要用“WshShell.SendKeys
      "{ENTER}"”表示,发送向下的方向键用
      “WshShell.SendKeys "{DOWN}"”表示。
      如果需要发送多个重复的单字母按键,不必重复输入该字母,SendKeys允许使用简化格式进行描述,使用格式为“{按键
      数字}”。例如要发送10个字母“x”,则输入“WshShell.SendKeys "{x 10}"”即可。
      例一:WshShell.SendKeys "^{ESC}u"
      代码的含义为:按下Ctrl+Esc组合键(相当于按Win键)打开“开始”菜单,接着按U键打开“关机”菜单。
      例二:让VBS脚本自动在记事本中输入一行文字“hello, welcome to cfan”。
      Dim WshShell
      Set WshShell=WScript.CreateObject("WScript.Shell")
      WshShell.Run "notepad"
      WScript.Sleep 2000
      //本行的含义为是脚本暂停2秒,给notepad一个打开的时间,有时时间太短可能导致后面的字符无法进入编辑区
      WshShell.AppActivate "无标题 - 记事本
      "//AppActivate为寻找可执行程序的标题框,”无标题-记事本”内容你的自己打开看一下
      WshShell.SendKeys "hello, welcome to cfan"
      作业1:让脚本自动输入下面两段小短句
      This is the most wonderful day of my life
      because I'm here with you now
      作业2:让脚本在输入短句后自动关闭记事本,并保存文件名为“test”,注意关闭记事本可以直接使用组合按键Alt+F4来实现。
      例三:制作能自动定时存盘的记事本
      我们最常用的记事本没有Word、WPS那样的自动定时存盘功能,其实利用VBS脚本再加上SendKeys命令,就能弥补这个遗憾。打开记事本,输入以下内容(为容易描述和分析,把代码分为四个部分):
      '第一部分:定义变量和对象
      Dim WshShell, AutoSaveTime, TXTFileName
      AutoSaveTime=300000
      Set WshShell=WScript.CreateObject("WScript.Shell")
      TXTFileName=InputBox("请输入你要创建的文件名(不能用中文和纯数字):")
      '第二部分:打开并激活记事本
      WshShell.Run "notepad"
      WScript.Sleep 200
      WshShell.AppActivate "无标题 - 记事本"
      '第三部分:用输入的文件名存盘
      WshShell.SendKeys "^s"
      WScript.Sleep 300
      WshShell.SendKeys TXTFileName
      WScript.Sleep 300
      WshShell.SendKeys "%s"
      WScript.Sleep AutoSaveTime
      '第四部分:自动定时存盘
      While WshShell.AppActivate (TXTFileName)=True
      WshShell.SendKeys "^s"
      WScript.Sleep AutoSaveTime
      Wend
      WScript.Quit
      将其保存为记事本.vbs,以后要使用记事本时,都通过双击这个脚本文件来打开。
      程序说明:这个脚本的基本思路是定时向记事本发送Ctrl+S这个存盘组合键。
      第一部分:定义了脚本中需要用到的变量和对象。“AutoSaveTime”变量用来设置自动存盘间隔,单位为毫秒,这里设置为5分钟。“TXTFileName”变量通过输入框取得你要创建的文本文件名称。
      第二部分:运行记事本,对于Windows本身提供的程序,比如计算器等,可直接在“WshShell.Run”后输入程序名称,如"calc",对于非系统程序,则可输入完全路径,但要注意使用8.3格式输入,比如“"D:\Progra~1\Tencent\QQ.exe"”。
      第三部分:这里用SendKeys命令执行了这样的操作流程(请注意每个操作之间延时命令的使用):在记事本中按Ctrl+S组合键→弹出保存文件的窗口→输入文件名→按Alt+S组合键进行保存(默认保存在“我的文档”目录)。
      第四部分:定时存盘的关键,通过“While……Wend”这个当条件为“真”时循环命令,实现自动存盘代码“WshShell.SendKeys
      "^s"”和定时代码“WScript.Sleep
      AutoSaveTime”的重复执行。因为不能让这个定时存盘循环一直执行,退出记事本后,必须自动退出脚本并结束循环,所以设计了一个循环判断条件“WshShell.AppActivate
      TXTFileName=True”,当记事本运行中时,可以激活记事本窗口,这个条件运行结果为“True”,定时存盘循环一直执行,退出记事本后,脚本无法激活记事本窗口,就会跳出循环,执行“Wend”后面的“WScript.Quit”退出脚本。
      例四:关机菜单立刻显身
      打开记事本,输入以下命令,并将其保存为1.vbs:
      set WshShell = CreateObject("WScript.Shell")
      WshShell.SendKeys "^{ESC}u"
      双击运行它,你会发现关机菜单立刻出现了。
      将“WshShell.SendKeys "^{ESC}u"”改为“WshShell.SendKeys "^+{ESC}"”,运行一下看看是否打开了任务管理器。
      让我们举个例子利用SendKeys自动上网并登陆博客
      将下面的脚本复制到一个文本文件中,并将其文件名命名为:自动登陆.vbs,然后将拨号软件及本脚本一起复制到程序――启动项中,就可以实现自动拨号上网,并登陆到博客上。
      代码如下:
      Set wshshell=CreateObject("wscript.shell")
      wshshell.AppActivate "连接 MAE-301U 拨号连接"
      wscript.Sleep 20000
      wshshell.SendKeys "{enter}"
      wshshell.Run "iexplore"
      WScript.Sleep 2000
      wshshell.AppActivate "hao123网址之家---实用网址,搜索大全,尽在www.hao123.com - Microsoft
      Internet Explorer" '引号中的内容修改为你的浏览器打开后标题栏中的内容
      wshshell.SendKeys "%d"
      wshshell.SendKeys "http://passport.baidu.com/?login"
      wshshell.SendKeys "{enter}"
      WScript.Sleep 2000
      wshshell.SendKeys "此处修改为博客帐号"
      wshshell.SendKeys "{tab}"
      wshshell.SendKeys "此处修改为博客密码"
      wshshell.SendKeys "{enter}"
      wshshell.SendKeys "%d"
      VBS中Sendkey键盘对应的码表
      Key Code
      ------------------------------
      Shift +
      Ctrl ^
      Alt %
      BACKSPACE {BACKSPACE}, {BS}, or {BKSP}
      BREAK {BREAK}
      CAPS LOCK {CAPSLOCK}
      DEL or DELETE {DELETE} or {DEL}
      DOWN ARROW {DOWN}
      END {END}
      ENTER {ENTER}or ~
      ESC {ESC}
      HELP {HELP}
      HOME {HOME}
      INS or INSERT {INSERT} or {INS}
      LEFT ARROW {LEFT}
      NUM LOCK {NUMLOCK}
      PAGE DOWN {PGDN}
      PAGE UP {PGUP}
      PRINT SCREEN {PRTSC}
      RIGHT ARROW {RIGHT}
      SCROLL LOCK {SCROLLLOCK}
      TAB {TAB}
      UP ARROW {UP}
      F1 {F1}
      F2 {F2}
      F3 {F3}
      F4 {F4}
      F5 {F5}
      F6 {F6}
      F7 {F7}
      F8 {F8}
      F9 {F9}
      F10 {F10}
      F11 {F11}
      F12 {F12}
      F13 {F13}
      F14 {F14}
      F15 {F15}
      F16 {F16}
    展开全文
  • VBScript中SendKeys与项目结合的妙用

    千次阅读 2016-02-29 21:09:58
    VBScript中的SendKeys命令模拟键盘操作,将一个或多个按键指令发送到指定Windows窗口来控制应用程序运行,其使用格式为:object.SendKeys string。其中,“object”表示WshShell对象;“string”:表示要发送的按键...
  • vbs经典回顾之[键盘输入方法]wshShell.SendKeys [键盘输入方法]wshShell.SendKeys 方法探析(2010-09-30 14:35:11)   模拟键盘操作,将一个或多个按键指令发送到指定Windows窗口来控制应用程序运行,  其...
  • VBSSendKeys 发送空格键

    千次阅读 2011-01-12 22:28:00
    设置的的始终interval的值就可以控制时间发放空格键了 Private Sub Timer1_Timer() SendKeys "{ }" End Sub
  • QTP利用VBSSendKeys模拟键盘操作
  • 这里巧用了一种传送ctrl+v的方法,sendkeys “^v” 这样子就能够把复制好的字符串给打印出来了代码我用的是QQ窗口传送字符,程序的功能是把复制好的字符串打印在记事本里面on error resume next dim wsh,ye set wsh ...
  • SendKeys中特殊字符的键代码

    千次阅读 2018-09-07 13:57:52
    BACKSPACE {BACKSPACE}、{BS} 或 {BKSP} BREAK {BREAK} CAPS LOCK {CAPSLOCK} DEL 或 DELETE {DELETE} 或 {DEL} DOWN ARROW(下箭头) {DOWN} END {END} ENTER {ENTER} 或 ~ ESC {ESC} ...
  • 其使用格式为:object.SendKeys(string) object:表示WshShell对象  string:表示要发送的按键指令字符串,需要放在英文双引号中 基本键 每个按键由一个或多个字符表示。 为了指定单一键盘字符,必须按字符...
  • VBScript-----妙用SendKeys简化重复操作

    千次阅读 2015-07-28 13:41:44
    巧妙使用VBS中的SendKeys命令(这个命令的作用就是模拟键盘操作,将一个或多个按键指令发送到指定Windows窗口来控制应用程序运行),可以极大的方便我们的常用操作。其使用格式为: Set Objectl=WScript....
  • SendKeys.Send("^+{TAB}"); 使用SendKeys将键击和组合键击发送到活动应用程序。此类无法实例化。若要发送一个键击给某个类并立即继续程序流,请使用Send。若要等待键击启动的任何进程,请使用SendWait。每个键都...
  • vbsQQ登录脚本 WshShell.AppActivate WshShell.SendKeys
  • 听说抖音上流行一种用代码做程序表白的东西,其实很多vbs爱好者喜欢玩的东西,这里为大家分享一下,需要的朋友可以参考下
  • VBScript中SendKeys的妙用

    千次阅读 2011-05-26 15:29:00
    其不编译成二进制文件, 而是直接由宿主(host)解释源代码并执行, 简单点说就是你写的程序不需要编译成.exe, 而是直接给用户发送.vbs 的源程序, 用户就能执行了.SendKeys 方法模拟键盘操作,将一个或多个按键指令发送...
  • 简单说,这个命令就是模拟键盘操作,将一个或多个按键指令发送到指定Windows窗口来控制应用程序运行,其使用格式为:object.SendKeys string"object":表示WshShell对象"string":表示要发送的按键指令字符串,需要放在英文...

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 1,533
精华内容 613
关键字:

sendkeyvbs