SendKeys clip.exe 发送中文的代码
更新时间:2008年12月09日 16:09:47 作者:
'让SendKeys可以发送中文,clip.exe在windows2003里有
复制代码 代码如下:
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
相关文章
vbs+hta中实现在单个 onClick 参数中包括多个子例程的代码
vbs+hta中实现在单个 onClick 参数中包括多个子例程的代码...2007-04-04
VBS教程:VBScript 语句-Property Let 语句
VBS教程:VBScript 语句-Property Let 语句...2006-11-11


最新评论