中国DOS联盟

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
请问为什么在命令里按键语句会不能实现？

呵呵 我还没用过SAFRCFileDlg.FileSave，只能瞎猜一下。
1.只是看结构，你的那两句：
WScript.Sleep 300
WshShell.SendKeys "%s"
好像就放错位置了。看你意图，那两句也应该加在if之前。
2.大概试下好像objDialog.OpenFileSaveDlg只支持手动，所以那两句加哪都没效果了。

哦，怪不得我加哪都不起作用....

那请问如果我要保存，怎么用fos对象里的命令来保存呢？