写个 js 版的吧,你自己去改 vbs。
var stm = new ActiveXObject("Adodb.Stream");
var arr = readText("aa.txt").split("\n");
arr.shift();
writeText("aa.txt", arr.join("\n"));
// 读文件
function readText(fileName) {
return openFile(function() {
stm.LoadFromFile(Server.MapPath(fileName));
return stm.ReadText();
});
}
// 写文件
function writeText(fileName, text) {
openFile(function() {
stm.WriteText(text);
stm.SaveToFile(Server.MapPath(fileName), 2);
});
}
// 文件操作封装function openFile(func) {
stm.Type = 2;
stm.Charset = charset;
stm.Open();
try { return func(); }
finally { stm.Close(); }
}