个人中心
文章发布
退出
作者热门文章
- ubuntu12.04环境下使用kvm ioctl接口实现最简单的虚拟机
- Ubuntu 通过无线网络安装Ubuntu Server启动系统后连接无线网络的方法
- 在Ubuntu上搭建网桥的方法
- ubuntu 虚拟机上网方式及相关配置详解
25
4
CFSDN坚持开源创造价值，我们致力于搭建一个资源共享平台，让每一个IT人在这里找到属于你的精彩世界.
这篇CFSDN的博客文章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方法的朋友就知道，作用是打开一个记事本，然后把"biweilun"这串字符输入进去，当然，你可以把code参数换成chr(97)，那么你会发现自动输入到记事本里面的是一个"a"字符。那么，你把code参数的值换成一个chr(一个汉字的ASCII码)行不行呢？可以肯定的告诉你，不行。 我们通过调用一个IE的对象，这样可以使用其内置的剪贴板元素，将"毕伟伦"这个字符串放进了剪贴板，然后通过Wsh对象来SendKey "^v"粘贴剪贴板内容，这样就能实现vbs自动输入中文字符了。 但是呢，这个方法有个缺憾，就是它会打开一个IE的窗口，不够完美，虽然不影响输入字符。所以我在探索一种完美的方案，得知一个对象“htmlfile”，很可惜的是该对象只能读取剪贴板，却不能写剪贴板。我们来看一段代码，怎么弹出你的剪贴板内容，你要先复制一段字符： Set biweilun=CreateObject("htmlfile").parentWindow.clipboardData WScript.Echo biweilun.GetData("text") 运行这个代码，你会发现你剪贴板的东西弹出来了。在IE对象里，有SetData函数来写剪贴板，GetData函数来读剪贴板，在htmlfile对象里呢，也有这两个函数的。你会想到是不是可以用htmlfile对象的SetData先来向剪贴板中写入中文字符，然后再SendKeys呢？这样岂不是很完美，既解决了中文输入问题，又没有网页弹出。呵呵，想法是好的，我也这么想过，可是不行！！ htmlfile对象在使用中只能GetData来获取剪贴板，对于SetData函数系统却不给它写的权限！呵呵，郁闷吧？但是htmlfile对象中的SetData函数确实是存在的，只是无法使用而已。不信的话读者可以自己尝试如下代码，脚本不会报错的，如果没有这个函数的话，Wscript会报错的： 。
复制代码 代码如下
Set biweilun=CreateObject("htmlfile").parentWindow.clipboardData biweilun.SetData "text","毕伟伦" WScript.Echo biweilun.GetData("text") 。
在vbs牛人UMU的空间上看到，据他讲有这么一条DOS命令，可以来写字符串到剪贴板中： echo biweilun| clip.exe 就是用DOS命令把biweilun这串字符写入剪贴板了。经本人测试，该命令不成立，UMU的思路是这样来默默地后台写剪贴板： objWSH.Run "cmd.exe /c echo " & szBuf & "| clip.exe", vbHide 如果这个DOS命令能真的实现就好了，那么SendKeys中文字符就太完美了。我到网上翻了很久，没有找到任何关于他所谓的clip.exe的资料和参数等等东东。 Vbs利用SendKeys输入中文字符，还是有那么一点遗憾~~~ 7月28日补充内容如下： 经过UMU大哥的提点，原来上文提到的clip.exe只在Win2003下才有，WinXP是没有的，那怪我不能实现后台Windows写剪贴板的DOS命令 现将Win2003中的Clip.exe上传上来，请大家首先下载clip.rar 下载后解压缩，把得到的clip.exe复制到 %systemroot%\system32文件夹下面即可。现在vbs用SendKeys输入中文字符的问题得以完美解决了，前提是有clip.exe的支撑。 代码如下:
复制代码 代码如下
Set wshobj=WScript.CreateObject("WScript.Shell") code="你想输入的中文" wshobj.Run "cmd.exe /c echo " & code & "| clip.exe", vbHide app=wshobj.Run ("C:\windows\notepad2.exe") WScript.Sleep 1000 wshobj.AppActivate app wshobj.SendKeys "^v" Wscript.Quit 。
以上代码经本人测试完美有效，结贴~~~ 。
最后此篇关于VBS利用SendKeys输入中文字符的方法的文章就讲到这里了,如果你想了解更多关于VBS利用SendKeys输入中文字符的方法的内容请搜索CFSDN的文章或继续浏览相关文章，希望大家以后支持我的博客！ 。
25
4
0
我有一个测试即将进行，我想澄清两个有关参数的问题。 在我的笔记中指出，将参数传递给函数的推荐方法是使用“按引用传递” const type& x; // for "in" parameters
当我通过 OMG 2.5(Beta)推广的 UML 规范阅读以下概念时: in: Indicates that Parameter values are passed in by the caller
我试图在用户按下 Enter 时触发一个函数。我将此输入设置为只读的原因是限制用户在填充值后修改输入中的值。 该值来自将在点击属性中触发的弹出窗口。问题是 keyup.enter 没有触发该输入。 代
我在jQuery中使用模式弹出窗口控件，该弹出窗口具有由jQuery Tokenize输入插件提供动力的输入文本。问题是，当我在模式弹出文本框中键入内容时， token 化插件的搜索结果显示为隐藏在弹
我有一个问题。当我选中复选框时，系统工作正常，总值发生变化，但一旦我修改文本输入，它就会变为 0。我需要将此文本框输入排除在更改值之外。 这是 html: $15000 $
我正在努力让它发挥作用，但还是有些不对劲。 我想用 CSS 设置提交按钮的样式以匹配我已有的按钮。 风格: input[type="button"], input[type="submit"], b
import java.util.*;; public class selection { Scanner in=new Scanner(System.in); private
这可能是一个非常菜鸟的问题。假设我有一个带宽限制为 100MB/s 的网卡，那么输入/输出带宽是否有可能达到该限制 同时 ?或者我会在任何时候遇到这个不等式:in bandwidth + out ba
看着这个问题，Fill immutable map with for loop upon creation ，我很好奇是什么this表示在 Map(1 -> this) . scala> Map(1
我有这样的东西 一个 乙 问？ 是或否 数字 数字或零 我想做的是: 如果 B1 = “Y”，则让用户在 B2 中输入一个数字。 如果 B1 = “N”，则将 B2 中的值更改为零，并且不允许用户在
我有一个包含许多列的表，我想添加 input标题单元格内的字段，但我希望输入适合根据正文内容的宽度。 这是没有 input 的样子领域: 这就是 input 的样子领域: 可以看出，像“index”和
关于为 FTP 客户端设置传出和传入文件夹，您遵循哪些最佳实践(如果有)？我们通常使用“outgoing”和“incoming”，但无论你如何表述方向，它都可以有两种解释方式，具体取决于名称相对于哪一
我正在尝试“求解”给定 d 的 Pell 方程:x^2 - d * y^2 = 1，或者至少我想得到最小的 x > 0 来求解方程。到目前为止，一切都很好。这是我的 Haskell 代码 minX :
我是VS Code的新手，可以使用Ctrl + Enter将代码运行到python交互式窗口中。我希望光标自动移动到下一行，因此我可以逐行浏览代码。 能做到吗？ 最佳答案 如this blog pos
我正在创建一个 bool 值矩阵/二维数组，并且我想为 dategrid 推断一种不仅仅是“ANY”的类型。 let yearRange = [2000,2001,2002,2003,2004]; l
我有两个排序的列表，例如 a = [1, 4, 7, 8] b = [1, 2, 3, 4, 5, 6] 我想知道a中的每个项目是否在b中。对于上面的示例，我想找到 a_in_b = [True, T
菜鸟警报 这很奇怪 - 当我编写以下代码时，尝试在 AngularJS 中创建自定义指令: myModule.directive('myTab', function(){ console.lo
已关闭。此问题需要 debugging details 。目前不接受答案。 编辑问题以包含 desired behavior, a specific problem or error, and the
假设我正在使用 gdscript 静态类型，并且对于一个函数参数，我事先不知道我会得到什么。这就是 python 中 typing.Any 的作用。如何使用 gdscript 做到这一点？ 似乎 Va
我使用 dropzone 上传多个图像，并且工作正常，直到我想为每个图像插入品牌和网址。 我遇到的唯一问题是，当我要从输入字段获取值时，我会从服务器获取来自字段(品牌、网址)的未定义值，但如果我使用静
我是一名优秀的程序员,十分优秀！