标题: 请问VBS键盘按键功能~!
[打印本页]
作者: sd287054
时间: 2007-6-7 00:59
标题: 请问VBS键盘按键功能~!
Set objDialog = CreateObject("SAFRCFileDlg.FileSave")
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set WshShell=WScript.CreateObject("WScript.Shell")
objDialog.FileName = "test"
objDialog.FileType = ".txt"
intReturn = objDialog.OpenFileSaveDlg
If intReturn Then
objFSO.CreateTextFile(objDialog.FileName & objdialog.filetype)
WScript.Sleep 300
WshShell.SendKeys "%s"
Else
Wscript.Quit
End If
请问为什么在命令里按键语句会不能实现？
作者: baomaboy
时间: 2007-6-7 02:12
呵呵 我还没用过SAFRCFileDlg.FileSave，只能瞎猜一下。
1.只是看结构，你的那两句：
WScript.Sleep 300
WshShell.SendKeys "%s"
好像就放错位置了。看你意图，那两句也应该加在if之前。
2.大概试下好像objDialog.OpenFileSaveDlg只支持手动，所以那两句加哪都没效果了。
作者: sd287054
时间: 2007-6-7 02:24
哦，怪不得我加哪都不起作用....
作者: sd287054
时间: 2007-6-7 06:42
那请问如果我要保存，怎么用fos对象里的命令来保存呢？