javascript 系統文件夾文件操作及參數介紹
2024-05-06 14:20:05
供稿：網友
前期在.net 下進行系統操作，同樣的功能實現起來非常復雜，沒想到用javascript竟然如此簡單，所以在網上搜索了代碼并加以改進。
代碼如下:
function PathList(path) {
var fso = new ActiveXObject("Scripting.FileSystemObject");
var fldr = fso.GetFolder(path);
var fd = new Enumerator(fldr.SubFolders);
for (; !fd.atEnd(); fd.moveNext()) {
sd = fd.item();
WScript.Echo(sd.path);
//寫入文件
writeFile("a.text",sd.path);
//document.write(sd.path);
PathList(sd.path);
}
}
function FileList(path) {
var fso = new ActiveXObject("Scripting.FileSystemObject");
var fldr = fso.GetFolder(path);
var fd = new Enumerator(fldr.SubFolders);
for (; !fd.atEnd(); fd.moveNext()) {
sd = fd.item();
var fc = new Enumerator(sd.files);
for (; !fc.atEnd(); fc.moveNext())
{
WScript.Echo(fc.item());
writeFile("B.text",fc.item());
}
WScript.Echo(sd.path);
//寫入文件
writeFile("a.text",sd.path);
//document.write(sd.path);
FileList(sd.path);
}
}
//當前目錄文件
function CurFileList(path) {
var fso = new ActiveXObject("Scripting.FileSystemObject");
var fldr = fso.GetFolder(path);
var fc = new Enumerator(fldr.files);
for (; !fc.atEnd(); fc.moveNext())
{
WScript.Echo(fc.item());
writeFile("c.text",fc.item());
}
}
/*
object.OpenTextFile(filename[, iomode[, create[, format]]])
參數
object
必選項。object 應為 FileSystemObject 的名稱。
filename
必選項。指明要打開文件的字符串表達式。
iomode
可選項。可以是三個常數之一：ForReading 、 ForWriting 或 ForAppending 。
create
可選項。Boolean 值，指明當指定的 filename 不存在時是否創建新文件。如果創建新文件則值為 True ，如果不創建則為 False 。如果忽略，則不創建新文件。
format
可選項。使用三態值中的一個來指明打開文件的格式。如果忽略，那么文件將以 ASCII 格式打開。
設置
iomode 參數可以是下列設置中的任一種：
常數 值 描述
ForReading 1 以只讀方式打開文件。不能寫這個文件。
ForWriting 2 以寫方式打開文件
ForAppending 8 打開文件并從文件末尾開始寫。
format 參數可以是下列設置中的任一種：
值 描述
TristateTrue 以 Unicode 格式打開文件。
TristateFalse 以 ASCII 格式打開文件。
TristateUseDefault 使用系統默認值打開文件。
*/
//讀文件
function readFile(filename){
var fso = new ActiveXObject("Scripting.FileSystemObject");
var f = fso.OpenTextFile(filename,1);
var s = "";
while (!f.AtEndOfStream)
s += f.ReadLine()+"/n";
f.Close();
return s;
}
//寫文件
function writeFile(filename,filecontent){
var fso, f, s ;
fso = new ActiveXObject("Scripting.FileSystemObject");
f = fso.OpenTextFile(filename,8,true);
f.WriteLine(filecontent);
