2

我正在尝试从 .txt 复制一行文本-> 粘贴到另一个文件中并保存。我一直在粘贴部分给我错误的代码。我在这方面是全新的,并且在我去的时候学习。我的主要目标是将信息粘贴到Host=另一个文件中。但我需要先把它弄下来。

到目前为止,这是我的代码

 ///OPEN FILE and READ
Set objFileToRead = CreateObject("Scripting.FileSystemObject").OpenTextFile("C:\vnc\vnc.txt",1)
strFileText = objFileToRead.ReadAll()
objFileToRead.Close


' ///PASTE 
Set objFSO = CreateObject("Scripting.FileSystemObject") 
Set objFileToWrite = objFSO.OpenTextFile("c:\vnc\testfile.vnc", 2)
objFileToWrite.Write strFileText
objFileToWrite.Close
4

2 回答 2

2

这对我有用:

'//OPEN FILE and READ
Set objFileToRead = CreateObject("Scripting.FileSystemObject").OpenTextFile("C:\vnc.txt",1)
strFileText = objFileToRead.ReadAll()
objFileToRead.Close


' ///PASTE 
Set objFSO = CreateObject("Scripting.FileSystemObject") 
Set objFileToWrite = objFSO.OpenTextFile("c:\vnc.vnc", 2)
objFileToWrite.Write strFileText
objFileToWrite.Close

我所做的唯一区别是删除子文件夹,并放入 C 的根目录:脚本有效。

我手动创建了源文件和目标文件。如果这两个文件都存在并且没有被锁定(就像您在另一个应用程序中打开/锁定它一样),那么该 VNC 文件夹的权限一定是问题所在。

于 2013-02-21T16:43:21.623 回答
1

如果您的文件权限仍然拒绝您写入,那么您必须使用鼠标右键单击更改该文件的安全性,并更新高级设置。

于 2014-12-17T10:56:07.177 回答