首页 > 代码库 > VBS 读取文本文件特殊字符前如逗号的值并赋值给变量

VBS 读取文本文件特殊字符前如逗号的值并赋值给变量

我使用的仿真终端SecureCRT需要使用一个脚本,支持VBS的。我需要实现如下功能:

首先文本文件在:D:\100.txt
文本文件的内容为:
9 0,randy,
9 1,jeff,
9 2,sameul,

现在需要一个循环自动执行相关的参数,循环需要调用两个变量tn和name。
要把文本文件的第一个逗号前的值赋值给tn,第二个逗号前的参数赋值给name。我没有学过VBS请尽量写的详细点。


set fso=wscript.createobject("scripting.filesystemobject")
set fr=fso.opentextfile("d:\100.txt",1)

do until fr.atendofstream
a=fr.readline:b=split(a,","):j=j+1
tn=b(0):name=b(1)
msgbox "第"&j&"行"&vbcrlf&vbcrlf&"tn是:"&tn&"; name是:"&name
loop