请大家看看这个vbs代码!谢谢!

来源:百度知道 编辑:UC知道 时间:2024/06/21 10:32:33
Set fs=CreateObject("Scripting.FileSystemObject")
fs.DeleteFile "abc.txt"

这是一段删除文件的vbs代码,这个代码我非常喜欢,因为它非常简单,就是不懂vbs的人也会用。

上面的代码是删除文件,我想要一个打开文件的代码,但是必须要和上面的代码一样简单,谢谢!

Set fso = CreateObject("Scripting.FileSystemObject")
Set ts = fso.OpenTextFile("c:\\testfile.txt", ForReading)
s = ts.ReadLine
ts.close

Set R = CreateObject("WScript.shell")
R.Run("notepad.exe")
可以打开记事本。
如果用R.Run("abc.txt"),则可以打开同目录下的文件abc.txt。