中国DOS联盟

自动到百度搜歌
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}"
想法是不是可能定义一个文本档。然后就是一行一个要搜索的关键字。这样读取过来就能实现了？
希望高手指点迷津~~~

sendkeys 不能发中文

那就是只能自定义一个变量赋给他一个中文值？？

WshShell.SendKeys "white flag" ------只能搜英文，数字，中文不能模拟输入求教
这里是不是可以写成
WshShell.SendKeys "white flag"+"自定义中文" ------自定义中文可以得用赋值来得到可以这样做不？

不可以~变量也得是你键盘上有的按键呀~~~
除非 切换一种中文输入法 ,比如当前是五笔输入 则可以
WScript.CreateObject ("wscript.shell").SendKeys "k l +(dos)bu jelf"

[ Last edited by joyn on 2008-6-25 at 02:33 PM ]

可以用剪贴板.