从文本中复制信息并粘贴到另一个vbscript中

时间:2013-02-21 14:34:16

标签: vbscript copy-paste

我正在尝试从.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

2 个答案:

答案 0 :(得分: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文件夹的权限必定是问题。

答案 1 :(得分:1)

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