Question

我需要一个能阅读的VBScript。替换4个单独文本文件中的文本并将其另存为不同的文件名（* .ws filename）。我也想让它问我想要用什么来代替文本。我需要替换的唯一文本是每个文本文件下LUName下两个字母后面的6位数字。这6个数字类似于资产，每个数字都不同。下面是4个单独的文本文件。

文字档案1

   [Profile]
   ID=WS
   Version=9
   [Telnet3270]
   LUName=FE223006
   HostName=plx.access.com
   Security=N
   CertSelection=AUTOSELECT
   [Communication]
   Link=telnet3270
   [3270]
   ScreenSize=43x80
   HostGraphics=Y
   QueryReplyMode=Auto
   HostCodePage=037-U
   [Keyboard]
   CuaKeyboard=1
   Language=United-States
   IBMDefaultKeyboard=N
   DefaultKeyboard=C:\ProgramData\IBM\Personal Communications\bnsf.kmp
   [LastExitView]
   A=3 177 396 656 456 83 8 15 400 0 Fixedsys— 37

文字档案2

[Profile]
ID=WS
Version=9
[Telnet3270]
LUName=FF223006
HostName=plx.access.com
Security=N
CertSelection=AUTOSELECT
[Communication]
Link=telnet3270
[3270]
ScreenSize=43x80
HostGraphics=Y
QueryReplyMode=Auto
HostCodePage=037-U
[Keyboard]
CuaKeyboard=1
Language=United-States
IBMDefaultKeyboard=N
DefaultKeyboard=C:\ProgramData\IBM\Personal Communications\bnsf.kmp
[LastExitView]
A=3 177 396 656 456 83 8 15 400 0 Fixedsys— 37

文字档案3

[Profile]
ID=WS
Version=9
[Telnet3270]
LUName=FG223006
HostName=plx.access.com
Security=N
CertSelection=AUTOSELECT
[Communication]
Link=telnet3270
[3270]
ScreenSize=43x80
HostGraphics=Y
QueryReplyMode=Auto
HostCodePage=037-U
[Keyboard]
CuaKeyboard=1
Language=United-States
IBMDefaultKeyboard=N
DefaultKeyboard=C:\ProgramData\IBM\Personal Communications\bnsf.kmp
[LastExitView]
A=3 177 396 656 456 83 8 15 400 0 Fixedsys— 37

文字档案4

[Profile]
ID=WS
Version=9
[Telnet3270]
LUName=FH223006
HostName=plx.access.com
Security=N
CertSelection=AUTOSELECT
[Communication]
Link=telnet3270
[3270]
ScreenSize=43x80
HostGraphics=Y
QueryReplyMode=Auto
HostCodePage=037-U
[Keyboard]
CuaKeyboard=1
Language=United-States
IBMDefaultKeyboard=N
DefaultKeyboard=C:\ProgramData\IBM\Personal Communications\bnsf.kmp
[LastExitView]
A=3 177 396 656 456 83 8 15 400 0 Fixedsys— 37

我已经搜索了可以执行此操作的脚本的所有位置以及我发现的所有问题。我可能会补充一点，我对VBS中的编程很熟悉，并且在我还在学习的时候会对某些事情有所了解。

Answer 1

我建议阅读GetPrivateProfileString及其合作伙伴WritePrivateProfileString。它们是Windows与ini文件交互的方式，这是您在此处发布的内容。

然后你可能想看看这篇文章：http://www.freevbcode.com/ShowCode.asp?ID=5390

需要有一个vb脚本替换四个文本文件中的一行，然后将它们输出到一个新的文件名

1 个答案: