none
请大家看看这个vbs代码!谢谢! RRS feed

  • 问题

  • Set fs=CreateObject("Scripting.FileSystemObject")
    fs.DeleteFile "abc.txt"

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

     

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

    2008年4月18日 7:30

答案

  •  

    打开任意类型的文件代码

    Code Snippet

     

    Dim oShell,strFile
    Set oShell = WScript.CreateObject ("WSCript.shell")
    strFile = "c:\Book1.xls"
    oShell.run "explorer.exe " & strFile
    Set oShell = Nothing

     

     

     

    简单写法制一行

    Code Snippet

     

    WScript.CreateObject ("WSCript.shell").run "explorer.exe c:\Book1.xls"

     

     

    2008年4月18日 7:45
    版主