Question

简短版本：我知道没有一种简单的方法可以做到这一点，但如何用VB更改命令文件中的行？

Long：使用登录脚本，最终根据用户名填写特定用户的RDP文件（IE：user@blahdeblah.com转到完整地址：s：blahdeblah.blahdeblah.com等等。地址的第一部分中的多个服务器位置。我已经完成了拉动文件，捕获用户名以及应该去哪里的简单部分，但我缺乏如何填充文件的知识。我在这里看到一些关于阅读文本然后更改单词的帖子，但它们会出现在列中，但同样的练习会在行中进行吗？

如果RDP中的整个文本文件是47行，我可以说“用 _ 替换第45行”吗？

我知道阅读是痛苦的。

任何和所有帮助将不胜感激。

Answer 1

你几乎肯定想要做更多的事情，比如用“完整地址”找到行，然后用另一行替换它，行号是一个非常易碎的东西。我不是我可以轻松测试整个事情的地方，但你想要的东西是：

Dim oFSO
Dim inTS,OutTS
Dim tline
Set oFSO = CreateObject("Scripting.FileSystemObject")
Set inTS = oFSO.OpenTextFile("default.rdp",1,1)
Set outTS = oFSO.CreateTextFile("mynew.rdp", true,true)
While inTS.AtEndOfStream = false 
tline = inTS.ReadLine
If InStr(1,tline,"full address:",1) > 0 Then 
WScript.Echo("found " &InStr(tline,"full address:"))
outTs.WriteLine("full address:s:SERVER")
Else
outTs.WriteLine(tline)
End If
Wend       
inTS.Close
outTS.Close

虽然你可能在使用unicode时遇到麻烦，但运行gnuwin32的sed版本可能会有更好的运气

如何使用VB读取和更改命令脚本中的行？

1 个答案: