欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片

JavaScript中使用ActiveXObject操作本地文件夾的方法

 更新時(shí)間:2014年03月28日 22:22:22   作者:  
以前一直用vbscript來(lái)操作文件夾,才發(fā)現(xiàn)原來(lái)使用JavaScript也是可以的,肯定不如vbs用的簡(jiǎn)單,不過(guò)學(xué)習(xí)一下還是不錯(cuò)的

在Windows平臺(tái)上, js可以調(diào)用很多Windows提供的ActivexObject,本文就使用js來(lái)實(shí)現(xiàn)文檔處理, 和使用js編寫(xiě)ActiveX做一個(gè)簡(jiǎn)單介紹.

復(fù)制代碼 代碼如下:

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
 <head>
  <title> New Document </title>

 </head>
<script type="text/javascript">
 function readFolder(){
 var filePath = "d:\\test\\";
 var fso = new ActiveXObject("Scripting.FileSystemObject");   //加載控件
 var f = fso.GetFolder(filePath);
 var underFiles = new Enumerator(f.files); //文件夾下文件
for (;!underFiles.atEnd();underFiles.moveNext()){  
             var fn = "" + underFiles.item();  
               //alert(fn);
          var content = readFile(fn,fso);
                 alert(content);
                    }  

 }
function readFile(path,fso){
var f1 = fso.GetFile(path);
var fh = fso.OpenTextFile(f1, 1/*reading*/);
               var content = '';
               while ( !fh.AtEndOfStream ) {
                      content += fh.ReadLine();
               }
               fh.close()
      return content;
}

function writeExcel(){
 var ExcelApp = new ActiveXObject("Excel.Application");
  var ExcelSheet = new ActiveXObject("Excel.Sheet");
  ExcelSheet.Application.Visible = true;
 ExcelSheet.ActiveSheet.Cells(1,1).Value = "This is column A, row 1";
 ExcelSheet.SaveAs("d:\\TEST.XLS");
 ExcelSheet.Application.Quit();
}
</script>
 <body>
  <input type="button" value="遍歷文件夾" onclick="readFolder()">
<input type="button" value="寫(xiě)excel" onclick="writeExcel()">
 </body>
</html>

JavaScript中ActiveXObject對(duì)象是啟用并返回 Automation 對(duì)象的引用。使用方法:

newObj = new ActiveXObject( servername.typename[, location])

ActiveXObject 對(duì)象語(yǔ)法有這些部分:其中newObj是必選項(xiàng)。要賦值為 ActiveXObject 的變量名。
servername是必選項(xiàng)。提供該對(duì)象的應(yīng)用程序的名稱(chēng)。
typename是必選項(xiàng)。要?jiǎng)?chuàng)建的對(duì)象的類(lèi)型或類(lèi)。
location是可選項(xiàng)。創(chuàng)建該對(duì)象的網(wǎng)絡(luò)服務(wù)器的名稱(chēng)。

切記:ActiveX是微軟的東西,故而這玩意兒只有IE才支持!

javaScript中利用ActiveXObject來(lái)創(chuàng)建FileSystemObject操作文件

一、功能實(shí)現(xiàn)核心:FileSystemObject 對(duì)象

要在javascript中實(shí)現(xiàn)文件操作功能,主要就是依靠FileSystemobject對(duì)象。

二、FileSystemObject編程

使用FileSystemObject 對(duì)象進(jìn)行編程很簡(jiǎn)單,一般要經(jīng)過(guò)如下的步驟: 創(chuàng)建FileSystemObject對(duì)象、應(yīng)用相關(guān)方法、訪(fǎng)問(wèn)對(duì)象相關(guān)屬性 。

(一)創(chuàng)建FileSystemObject對(duì)象

創(chuàng)建FileSystemObject對(duì)象的代碼只要1行:
var fso = new ActiveXObject("Scripting.FileSystemObject");
上述代碼執(zhí)行后,fso就成為一個(gè)FileSystemObject對(duì)象實(shí)例。

(二)應(yīng)用相關(guān)方法

創(chuàng)建對(duì)象實(shí)例后,就可以使用對(duì)象的相關(guān)方法了。比如,使用CreateTextFile方法創(chuàng)建一個(gè)文本文件:
var fso = new ActiveXObject("Scripting.FileSystemObject");
var f1 = fso.createtextfile("c:\\myjstest.txt",true");
(三)訪(fǎng)問(wèn)對(duì)象相關(guān)屬性
要訪(fǎng)問(wèn)對(duì)象的相關(guān)屬性,首先要建立指向?qū)ο蟮木浔?,這就要通過(guò)get系列方法實(shí)現(xiàn):GetDrive負(fù)責(zé)獲取驅(qū)動(dòng)器信息,GetFolder負(fù)責(zé)獲取文件夾信息,GetFile負(fù)責(zé)獲取文件信息。比如,指向下面的代碼后,f1就成為指向文件c:\test.txt的句柄:
var fso = new ActiveXObject("Scripting.FileSystemObject");
var f1 = fso.GetFile("c:\\myjstest.txt");
然后,使用f1訪(fǎng)問(wèn)對(duì)象的相關(guān)屬性。比如:

復(fù)制代碼 代碼如下:

var fso = new ActiveXObject("Scripting.FileSystemObject");
var f1 = fso.GetFile("c:\\myjstest.txt");
alert("File last modified: " + f1.DateLastModified);

執(zhí)行上面最后一句后,將顯示c:\myjstest.txt的最后修改日期屬性值。
但有一點(diǎn)請(qǐng)注意:對(duì)于使用create方法建立的對(duì)象,就不必再使用get方法獲取對(duì)象句柄了,這時(shí)直接使用create方法建立的句柄名稱(chēng)就可以:

復(fù)制代碼 代碼如下:

var fso = new ActiveXObject("Scripting.FileSystemObject");
var f1 = fso.createtextfile("c:\\myjstest.txt",true");
alert("File last modified: " + f1.DateLastModified);

三、操作驅(qū)動(dòng)器(Drives)

使用FileSystemObject對(duì)象來(lái)編程操作驅(qū)動(dòng)器(Drives)和文件夾(Folders)很容易,這就象在Windows文件瀏覽器中對(duì)文件進(jìn)行交互操作一樣,比如:拷貝、移動(dòng)文件夾,獲取文件夾的屬性。
(一)Drives對(duì)象屬性
Drive對(duì)象負(fù)責(zé)收集系統(tǒng)中的物理或邏輯驅(qū)動(dòng)器資源內(nèi)容,它具有如下屬性:
l TotalSize:以字節(jié)(byte)為單位計(jì)算的驅(qū)動(dòng)器大小。
l AvailableSpace或FreeSpace:以字節(jié)(byte)為單位計(jì)算的驅(qū)動(dòng)器可用空間。
l DriveLetter:驅(qū)動(dòng)器字母。
l DriveType:驅(qū)動(dòng)器類(lèi)型,取值為:removable(移動(dòng)介質(zhì))、fixed(固定介質(zhì))、network(網(wǎng)絡(luò)資源)、CD-ROM或者RAM盤(pán)。
l SerialNumber:驅(qū)動(dòng)器的系列碼。
l FileSystem:所在驅(qū)動(dòng)器的文件系統(tǒng)類(lèi)型,取值為FAT、FAT32和NTFS。
l IsReady:驅(qū)動(dòng)器是否可用。
l ShareName:共享名稱(chēng)。
l VolumeName:卷標(biāo)名稱(chēng)。
l Path和RootFolder:驅(qū)動(dòng)器的路徑或者根目錄名稱(chēng)。

(二)Drive對(duì)象操作例程

下面的例程顯示驅(qū)動(dòng)器C的卷標(biāo)、總?cè)萘亢涂捎每臻g等信息:

復(fù)制代碼 代碼如下:

var fso, drv, s ="";
fso = new ActiveXObject("Scripting.FileSystemObject");
drv = fso.GetDrive(fso.GetDriveName("c:\\"));
s += "Drive C:" + " – ";
s += drv.VolumeName + "\n";
s += "Total Space: " + drv.TotalSize / 1024;
s += " Kb" + "\n";
s += "Free Space: " + drv.FreeSpace / 1024;
s += " Kb" + "\n";
alert(s);

四、操作文件夾(Folders)

涉及到文件夾的操作包括創(chuàng)建、移動(dòng)、刪除以及獲取相關(guān)屬性。
Folder對(duì)象操作例程 :
下面的例程將練習(xí)獲取父文件夾名稱(chēng)、創(chuàng)建文件夾、刪除文件夾、判斷是否為根目錄等操作:

復(fù)制代碼 代碼如下:

var fso, fldr, s = "";
// 創(chuàng)建FileSystemObject對(duì)象實(shí)例
fso = new ActiveXObject("Scripting.FileSystemObject");
// 獲取Drive 對(duì)象
fldr = fso.GetFolder("c:\\");
// 顯示父目錄名稱(chēng)
alert("Parent folder name is: " + fldr + "\n");
// 顯示所在drive名稱(chēng)
alert("Contained on drive " + fldr.Drive + "\n");
// 判斷是否為根目錄
if (fldr.IsRootFolder)
alert("This is the root folder.");
else
alert("This folder isn't a root folder.");
alert("\n\n");
// 創(chuàng)建新文件夾
fso.CreateFolder ("C:\\Bogus");
alert("Created folder C:\\Bogus" + "\n");
// 顯示文件夾基礎(chǔ)名稱(chēng),不包含路徑名
alert("Basename = " + fso.GetBaseName("c:\\bogus") + "\n");
// 刪除創(chuàng)建的文件夾
fso.DeleteFolder ("C:\\Bogus");
alert("Deleted folder C:\\Bogus" + "\n");

五、操作文件(Files)

對(duì)文件進(jìn)行的操作要比以上介紹的驅(qū)動(dòng)器(Drive)和文件夾(Folder)操作復(fù)雜些,基本上分為以下兩個(gè)類(lèi)別:對(duì)文件的創(chuàng)建、拷貝、移動(dòng)、刪除操作和對(duì)文件內(nèi)容的創(chuàng)建、添加、刪除和讀取操作。下面分別詳細(xì)介紹。
(一)創(chuàng)建文件
一共有3種方法可用于創(chuàng)建一個(gè)空文本文件,這種文件有時(shí)候也叫做文本流(text stream)。
第一種是使用CreateTextFile方法。代碼如下:

復(fù)制代碼 代碼如下:

var fso, f1;
fso = new ActiveXObject("Scripting.FileSystemObject");
f1 = fso.CreateTextFile("c:\\testfile.txt", true);

第二種是使用OpenTextFile方法,并添加上ForWriting屬性,F(xiàn)orWriting的值為2。代碼如下:

復(fù)制代碼 代碼如下:

var fso, ts;
var ForWriting= 2;
fso = new ActiveXObject("Scripting.FileSystemObject");
ts = fso.OpenTextFile("c:\\test.txt", ForWriting, true);

第三種是使用OpenAsTextStream方法,同樣要設(shè)置好ForWriting屬性。

復(fù)制代碼 代碼如下:

var fso, f1, ts;
var ForWriting = 2;
fso = new ActiveXObject("Scripting.FileSystemObject");
fso.CreateTextFile ("c:\\test1.txt");
f1 = fso.GetFile("c:\\test1.txt");
ts = f1.OpenAsTextStream(ForWriting, true);

(二)添加數(shù)據(jù)到文件

當(dāng)文件被創(chuàng)建后,一般要按照"打開(kāi)文件->填寫(xiě)數(shù)據(jù)->關(guān)閉文件"的步驟實(shí)現(xiàn)添加數(shù)據(jù)到文件的目的。
打開(kāi)文件可使用FileSystemObject對(duì)象的OpenTextFile方法,或者使用File對(duì)象的OpenAsTextStream方法。
填寫(xiě)數(shù)據(jù)要使用到TextStream對(duì)象的Write、WriteLine或者WriteBlankLines方法。在同是實(shí)現(xiàn)寫(xiě)入數(shù)據(jù)的功能下,這3者的區(qū)別在于:Write方法不在寫(xiě)入數(shù)據(jù)末尾添加新?lián)Q行符,WriteLine方法要在最后添加一個(gè)新?lián)Q行符,而WriteBlankLines則增加一個(gè)或者多個(gè)空行。
關(guān)閉文件可使用TextStream對(duì)象的Close方法。

(三)創(chuàng)建文件及添加數(shù)據(jù)例程

下面的代碼將創(chuàng)建文件、添加數(shù)據(jù)、關(guān)閉文件幾個(gè)步驟結(jié)合起來(lái)進(jìn)行應(yīng)用:

復(fù)制代碼 代碼如下:

var fso, tf;
fso = new ActiveXObject("Scripting.FileSystemObject");
// 創(chuàng)建新文件
tf = fso.CreateTextFile("c:\\testfile.txt", true);
// 填寫(xiě)數(shù)據(jù),并增加換行符
tf.WriteLine("Testing 1, 2, 3.") ;
// 增加3個(gè)空行
tf.WriteBlankLines(3) ;
// 填寫(xiě)一行,不帶換行符
tf.Write ("This is a test.");
// 關(guān)閉文件
tf.Close();

(四)讀取文件內(nèi)容

從文本文件中讀取數(shù)據(jù)要使用TextStream對(duì)象的Read、ReadLine或ReadAll 方法。Read方法用于讀取文件中指定數(shù)量的字符;ReadLine方法讀取一整行,但不包括換行符;ReadAll方法則讀取文本文件的整個(gè)內(nèi)容。讀取的內(nèi)容存放于字符串變量中,用于顯示、分析。在使用Read或ReadLine方法讀取文件內(nèi)容時(shí),如果要跳過(guò)一些部分,就要用到Skip或SkipLine方法。
下面的代碼演示打開(kāi)文件、填寫(xiě)數(shù)據(jù),然后讀取數(shù)據(jù):

復(fù)制代碼 代碼如下:

var fso, f1, ts, s;
var ForReading = 1;
fso = new ActiveXObject("Scripting.FileSystemObject");
// 創(chuàng)建文件
f1 = fso.CreateTextFile("c:\\testfile.txt", true);
// 填寫(xiě)一行數(shù)據(jù)
f1.WriteLine("Hello World");
f1.WriteBlankLines(1);
// 關(guān)閉文件
f1.Close();
// 打開(kāi)文件
ts = fso.OpenTextFile("c:\\testfile.txt", ForReading);
// 讀取文件一行內(nèi)容到字符串
s = ts.ReadLine();
// 顯示字符串信息
alert("File contents = ‘" + s + "‘");
// 關(guān)閉文件
ts.Close();

(五)移動(dòng)、拷貝和刪除文件

對(duì)于以上三種文件操作,javascript各有兩種對(duì)應(yīng)的方法:File.Move 或 FileSystemObject.MoveFile用于移動(dòng)文件;File.Copy 或 FileSystemObject.CopyFile用于拷貝文件;File.Delete 或 FileSystemObject.DeleteFile用于刪除文件。
下面的代碼演示在驅(qū)動(dòng)器C的根目錄下創(chuàng)建一個(gè)文本文件,填寫(xiě)一些內(nèi)容,然后將文件移動(dòng)到\tmp目錄下,再在目錄\temp下面建立一個(gè)文件拷貝,最后刪除這兩個(gè)目錄的文件:

復(fù)制代碼 代碼如下:

var fso, f1, f2, s;
fso = new ActiveXObject("Scripting.FileSystemObject");
f1 = fso.CreateTextFile("c:\\testfile.txt", true);
// 寫(xiě)一行
f1.Write("This is a test.");
// 關(guān)閉文件
f1.Close();
// 獲取C:\根目錄下的文件句柄
f2 = fso.GetFile("c:\\testfile.txt");
// 移動(dòng)文件到\tmp目錄下
f2.Move ("c:\\tmp\\testfile.txt");
// 拷貝文件到\temp目錄下
f2.Copy ("c:\\temp\\testfile.txt");
// 獲取文件句柄
f2 = fso.GetFile("c:\\tmp\\testfile.txt");
f3 = fso.GetFile("c:\\temp\\testfile.txt");
// 刪除文件
f2.Delete();
f3.Delete();

六、結(jié) 語(yǔ)

通過(guò)以上對(duì)FileSystemObject的各種對(duì)象、屬性和方法的介紹和示例,相信你已經(jīng)對(duì)如何使用javascript語(yǔ)言在頁(yè)面中操作驅(qū)動(dòng)器、文件和文件夾有了清晰的認(rèn)識(shí)。但是上述提及的例程都非常簡(jiǎn)單,要全面、靈活地掌握javascript文件操作技術(shù),還需要大量的實(shí)踐練習(xí)。而且還有一點(diǎn)提醒大家,由于涉及到在瀏覽器中進(jìn)行文件讀寫(xiě)這樣的高級(jí)操作,對(duì)于默認(rèn)的瀏覽器安全級(jí)別而言,在代碼運(yùn)行前都會(huì)有一個(gè)信息提示,這點(diǎn)請(qǐng)?jiān)趯?shí)際環(huán)境中提示訪(fǎng)問(wèn)者注意。

相關(guān)文章

最新評(píng)論