|
bd123456789
中级用户
积分 360
发帖 216
注册 2007-5-29
状态 离线
|
『楼 主』:
如何用VBS模拟键盘激活inputbox对话框
难题!!
我打一个VBS制作的inputbox对话框,怎么用VBS模拟键盘来激活它,并在输入框中输入aaa????
|
|
 2007-6-22 17:47 |
|
|
lxmxn
版主
积分 11386
发帖 4938
注册 2006-7-23
状态 离线
|
『第
2 楼』:
用键盘激活？vbs不是有一个“AppActivate”吗？
Set xxx=CreateObject("WScript.shell")
xxx.AppActivate "C:\windows\system32\cmd.exe"
|
|
|
2007-6-22 18:01 |
|
|
HAT
版主
积分 9023
发帖 5017
注册 2007-5-31
状态 离线
|
『第
3 楼』:
AppActivate是根据title来激活的吧？后面要跟那个inputbox对话框的title吧？
初学VBS
|
|
|
2007-6-22 18:07 |
|
|
slore
铂金会员
积分 5212
发帖 2478
注册 2007-2-8
状态 离线
|
『第
4 楼』:
iptStr = InputBox("提示","标题","aaa")
|
|
|
2007-6-22 21:46 |
|
|
bd123456789
中级用户
积分 360
发帖 216
注册 2007-5-29
状态 离线
|
『第
5 楼』:
| Quote: | Originally posted by lxmxn at 2007-6-22 06:01 PM:
用键盘激活？vbs不是有一个“AppActivate”吗？
Set xxx=CreateObject("WScript.shell")
xxx.AppActivate "C:\windows\system32\cmd.exe" |
|
不行呀!
我制作了一个名称为a.vbs,代码为"c=inputbox("请输入三个字母","标题","aaa")"
然后在同一文件夹内制作了一个名称为b.vbs 代码为
Set xxx=CreateObject("WScript.shell")
xxx.AppActivate "标题"
首先打开a.vbs,然后点显示桌面,最后双击b.vbs,但结果是不能激活任务栏上的a.vbs
|
|
|
2007-6-23 09:48 |
|
|
sonicandy
中级用户
积分 273
发帖 91
注册 2007-5-7
状态 离线
|
『第
6 楼』:
| Quote: | Originally posted by bd123456789 at 2007-6-23 09:48 AM:
不行呀!
我制作了一个名称为a.vbs,代码为"c=inputbox("请输入三个字母","标题","aaa")"
然后在同一文件夹内制作了一个名 ... |
|
我这里可以。
|
|
|
2007-6-23 10:02 |
|
|
bd123456789
中级用户
积分 360
发帖 216
注册 2007-5-29
状态 离线
|
『第
7 楼』:
| Quote: | Originally posted by sonicandy at 2007-6-23 10:02 AM:
我这里可以。 |
|
多谢测试,对了
不过能否再研究一下,如果我将a.vbs中的内容设为c=inputbox("请输入三个字母","000","aaa"),即标题为000,而b.vbs中的内容设为
Set xxx=CreateObject("WScript.shell")
xxx.AppActivate "000"
奇怪的是,为什么又不行了,是不是AppActivate函数不支持数字标题????
有谁研究过吗?盼
|
|
|
2007-6-23 10:53 |
|
