level 2
帮忙写个asp删除文件的第一行的代码
用fso控件
比如说我有一个文本文档的内容是:
1
2
3
运行这段asp后变成了
2
3
麻烦帮我写一下,谢谢!
2020年10月02日 01点10分
1
level 4
写是不可能写的了,这一辈子都是不可能写的了,写了也会被删除,所以不写了。
2021年06月07日 02点06分
5
level 4
写个 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(); }
}
2021年06月07日 04点06分
7