Question

我有一个文本文件C:\user\test.txt，文本“这是一个测试”，我想使用VBScript物理打开文件（就像我点击 Accesories→Notepad ）。我希望在屏幕上看到文件打开，这样我就可以直观地阅读文本。

现在，由于某种原因，我不能。这就是我正在尝试的（我尝试使用和不使用“textfile.close”行，是的，该文件存在于该路径中）：

dim FS1, textfile

Const ForReading = 1 

set FS1 = CreateObject("Scripting.FileSystemObject")
set textfile = FS1.OpenTextFile("C:\user\test.txt", ForReading, True)
textfile.close

我错过了什么？我没有创建，编写或追加的问题......但我无法打开它！

Answer 1

如果要在记事本中打开文件：

With CreateObject("WScript.Shell")
    .Run "notepad.exe c:\user\test.txt"
End With

您也可以运行文件，它将在您的默认txt编辑器中打开（无论您为扩展程序txt建立的Windows文件关联）。

With CreateObject("WScript.Shell")
    .Run "c:\user\test.txt"
End With

Answer 2

你在看文件吗？

你应该做类似

的事情

' Open the file for input.
Set MyFile = fso.OpenTextFile(FileName, ForReading)

' Read from the file and display the results.
Do While MyFile.AtEndOfStream <> True
    TextLine = MyFile.ReadLine
    Document.Write TextLine & "<br />"
Loop
MyFile.Close

https://msdn.microsoft.com/en-us/library/314cz14s(v=vs.84).aspx

物理打开文本文件

2 个答案: