当前位置: 首页 > 图文教程 > 脚本技术 > VBScript > SendKeys clip.exe 发送中文的代码

VBScript
VBS 生成不重复随机数代码[0-10]
vbs 百度小助手
字符ANSI代码查询工具vbs版
VBS MD5加密算法代码
用VBS实现一个小键盘动作CTRL+V粘贴操作与思路分析
VBS 偏移量解密工具[算法解密]
自动复制U盘文件的VBS脚本
vbs 自动复制U盘的内容
reg2vbs.vbs 将Reg文件转换为VBS文件保存 脚本之家修正版本

VBScript 中的 SendKeys clip.exe 发送中文的代码


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

复制代码 代码如下:

Set WshShell=CreateObject("WScript.Shell")
code="让SendKeys可以发送中文"
WshShell.Run "cmd.exe /c echo " & code & "| clip.exe", vbHide
app=WshShell.Run ("notepad")
WScript.Sleep 1000
WshShell.AppActivate app
WshShell.SendKeys "^v{BS}"
Wscript.Quit