1、引言
隨著Internet的飛速發(fā)展，許多企業(yè)都紛紛開(kāi)發(fā)基于WEB的業(yè)務(wù)應(yīng)用系統(tǒng)。一般情況下，基于WEB的業(yè)務(wù)應(yīng)用都采用三層或三層以上的結(jié)構(gòu)，前臺(tái)即客戶端是普通的WEB瀏覽器，中間業(yè)務(wù)邏輯應(yīng)用層存放于WEB服務(wù)器上，由WEB服務(wù)器上的服務(wù)構(gòu)件訪問(wèn)后臺(tái)數(shù)據(jù)庫(kù)。為了業(yè)務(wù)系統(tǒng)與Internet的互聯(lián)，WEB服務(wù)器和數(shù)據(jù)庫(kù)系統(tǒng)均托管在IDC（互聯(lián)網(wǎng)數(shù)據(jù)中心），因而需要從托管在 IDC的服務(wù)器上提取業(yè)務(wù)數(shù)據(jù)在本地打印輸出。在客戶端瀏覽器只能打印簡(jiǎn)單的HTML頁(yè)面的情況下，要求更為強(qiáng)大靈活的打印輸出功能；通過(guò)采用相關(guān)的技術(shù)對(duì)瀏覽器的功能進(jìn)行擴(kuò)展，能夠完成更復(fù)雜的數(shù)據(jù)打印的任務(wù)，如收條、回執(zhí)等。筆者曾經(jīng)為一網(wǎng)絡(luò)教育公司開(kāi)發(fā)教育管理軟件時(shí)采用FileSystem組件實(shí)現(xiàn)在本地打印三聯(lián)收款憑證和準(zhǔn)考證等的功能。
2、FileSystem組件使用簡(jiǎn)介
FileSystem組件其實(shí)是一個(gè)ActiveX控件，其存在于WINDOWS平臺(tái)中（不管是Win98、Win2000，還是NT環(huán)境都包含該組件。），CLSID：0D43FE01-11CF-8940-00A0C9054228。熟悉ASP編程人可能都使用過(guò)FileSystem組件，一般情況下該組件用在服務(wù)器端，用來(lái)對(duì)文本文件、文件夾及驅(qū)動(dòng)器進(jìn)行訪問(wèn)和控制。可以通過(guò)兩種方法創(chuàng)建FileSystem組件的對(duì)象實(shí)例：
1、使用ASP的內(nèi)置對(duì)象SERVER的方法Server.CreateObject來(lái)創(chuàng)建服務(wù)器端對(duì)象的實(shí)例。
2、使用Vbscript腳本函數(shù)CreateObject來(lái)創(chuàng)建客戶端對(duì)象的實(shí)例（也可以在服務(wù)器端用該方法，但有時(shí)會(huì)出錯(cuò)，一般不使用；）。
FileSystem組件對(duì)文本文件進(jìn)行操作有如下方法：
CreateTextFile（Filename,[Overwrite if exists],[Unicode/ASCII]） //創(chuàng)建文本文件
OpenTextFile（Filename,[Input/output mode],[Create if not exists],[Format]） //打開(kāi)文本文件
CopyFile（Filename1,Filename2,[Overwrite]） //拷貝文本文件
MoveFile (Filename1,Filename2) //移動(dòng)文本文件
DeleteFile (Filename) //刪除文本文件
GetFile (Filename) //獲得文本文件
FileExists (Filename) //判斷文本文件是否存在
FileSystem組件對(duì)文件夾和驅(qū)動(dòng)器也有和文本文件相類似的方法，在此不一一贅述。
其實(shí)，F(xiàn)ileSystem組件也可使用于客戶端，采用創(chuàng)建FileSystem組件對(duì)象實(shí)例的第二種方法即可以使用該組件對(duì)客戶端系統(tǒng)的文本文件、文件夾及驅(qū)動(dòng)器進(jìn)行訪問(wèn)和控制。因?yàn)槲④浧脚_(tái)帶有FileSystem組件，所以對(duì)于微軟平臺(tái)的客戶端則不需要從遠(yuǎn)程服務(wù)器下載，其在安裝操作系統(tǒng)時(shí)會(huì)自己安裝并注冊(cè)；而對(duì)于其他平臺(tái)的客戶端則須安裝插件并下載FileSystem組件。
3、本地端特定打印的實(shí)現(xiàn)機(jī)制
利用FileSystem組件實(shí)現(xiàn)本地端特定打印的過(guò)程如圖所示：
1、客戶端向WEB服務(wù)器發(fā)送數(shù)據(jù)請(qǐng)求；
2、WEB服務(wù)器根據(jù)業(yè)務(wù)處理邏輯與后臺(tái)數(shù)據(jù)庫(kù)進(jìn)行交互，取得所需數(shù)據(jù)形成HTML頁(yè)面，并附帶有FileSystem組件對(duì)象的VBScript腳本，向客戶端瀏覽器發(fā)回HTML頁(yè)面；
3、在客戶端運(yùn)行腳本，腳本取得HTML頁(yè)面構(gòu)件的數(shù)據(jù)，建立與打印機(jī)的連接，向打印機(jī)輸出打印數(shù)據(jù)。
前兩步與一般的WEB應(yīng)用沒(méi)有什么區(qū)別，需要說(shuō)明的是第三步：首先使用Vbscript腳本函數(shù)CreateObject來(lái)創(chuàng)建FileSystem組件對(duì)象的實(shí)例；然后調(diào)用該實(shí)例創(chuàng)建文本文件的CreateTextFile方法，把打印端口LPT1或LPT2作為文件名參數(shù)，并將可覆蓋文件參數(shù)設(shè)為T(mén)RUE，建立與打印機(jī)的連接；調(diào)用獲得的打印機(jī)文本文件流實(shí)例的寫(xiě)文本方法WriteLine向打印機(jī)輸出打印的內(nèi)容。
4、程序示例
客戶端腳本：
<script Language=VBScript>
function print_onclick //打印函數(shù)
dim label
label=document.printinfo.label.value //獲得HTML頁(yè)面的數(shù)據(jù)
set objfs=CreateObject("Scripting.FileSystemObject") //創(chuàng)建FileSystem組件對(duì)象的實(shí)例
set objprinter=objfs.CreateTextFile ("LPT1:",true) //建立與打印機(jī)的連接
objprinter.Writeline("__________________________________") //輸出打印的內(nèi)容
objprinter.Writeline("| |")
objprinter.Writeline("| 您打印的數(shù)據(jù)是："&label& " |”)
objprinter.Writeline("| |")
objprinter.Writeline("|_________________________________|")
objprinter.close //斷開(kāi)與打印機(jī)的連接
set objprinter=nothing
set objfs=nothing // 關(guān)閉FileSystem組件對(duì)象
end function
</script>
服務(wù)器端腳本：
<%………
set conn=server.CreateObject ("adodb.connection")
conn.Open "DSN=name;UID=XXXX;PWD=XXXX;"
set rs=server.CreateObject("adodb.recordset")
rs.Open(“select ……”),conn,1,1
……….%> //與數(shù)據(jù)庫(kù)進(jìn)行交互
HTML頁(yè)面編碼：
<HTML>
………
<FORM ID=printinfo NAME="printinfo" >
<INPUT type="button" value="打印>>" id=print name=print > //調(diào)用打印函數(shù)
<INPUT type=hidden id=text1 name=label value=<%=………%>> //保存服務(wù)器端傳來(lái)的數(shù)據(jù)
………
</HTML>
5、說(shuō)明及結(jié)論
1、使用此方法實(shí)現(xiàn)打印任務(wù)之前，必須調(diào)節(jié)瀏覽器的安全設(shè)置；在Internet選項(xiàng)上安全級(jí)別降低，對(duì)自己的站點(diǎn)充分信任，可以通過(guò)瀏覽器執(zhí)行腳本訪問(wèn)本機(jī)資源。
2、本方法可以實(shí)現(xiàn)在局域網(wǎng)的打印機(jī)上打印遠(yuǎn)程服務(wù)器的數(shù)據(jù)，只須用局域網(wǎng)上打印機(jī)注冊(cè)在本地的端口代替本地打印機(jī)端口作為創(chuàng)建文本文件的CreateTextFile方法的參數(shù)即可。
3、本方法可以實(shí)現(xiàn)根據(jù)用戶選擇打印的寬度、高度和數(shù)量及內(nèi)容，并可重復(fù)打印。
4、不需要編寫(xiě)ActiveX控件即可以完成特定的打印功能，實(shí)現(xiàn)較為簡(jiǎn)單。
5、不足之處是需要調(diào)節(jié)瀏覽器的安全設(shè)置，且不支持圖片和特殊字體的打印。
巧用FileSystem組件實(shí)現(xiàn)WEB應(yīng)用中的本地特定打印的方法
2019-10-15 10:16asp技術(shù)網(wǎng) ASP教程
一般情況下，基于WEB的業(yè)務(wù)應(yīng)用都采用三層或三層以上的結(jié)構(gòu)，前臺(tái)即客戶端是普通的WEB瀏覽器，中間業(yè)務(wù)邏輯應(yīng)用層存放于WEB服務(wù)器上，由WEB服務(wù)器上的服務(wù)構(gòu)件訪問(wèn)后臺(tái)數(shù)據(jù)庫(kù)。
延伸 · 閱讀
- 2024-12-13安全軟件組件反成黑客幫兇：研究公司曝光攻擊
- 2022-03-09C語(yǔ)言打印某一年中某月的日歷
- 2022-03-08React 非父子組件傳參的實(shí)例代碼
- 2022-03-07易語(yǔ)言給組件上加載圖片方法步驟
- 2022-03-06易語(yǔ)言農(nóng)歷月歷組件使用方法
- 2022-03-06詳解易語(yǔ)言透明標(biāo)簽組件
精彩推薦
- ASP教程
ASP常用函數(shù):getpy()
ASP常用函數(shù):getpy()...
- ASP教程
ASP.NET 數(shù)據(jù)源
數(shù)據(jù)源 一個(gè) data sourse 控件與數(shù)據(jù)綁定的控件相互作用，并隱藏了復(fù)雜的數(shù)據(jù)的聯(lián)編過(guò)程。這些是提供數(shù)據(jù)給 data bound 控件的工具，并且支持如插入，刪除...
- ASP教程
asp+javascript實(shí)現(xiàn)404頁(yè)的處理轉(zhuǎn)換
asp+javascript實(shí)現(xiàn)404頁(yè)的處理轉(zhuǎn)換...
- ASP教程
asp Access數(shù)據(jù)備份,還原,壓縮類代碼
asp Access數(shù)據(jù)備份,還原,壓縮類實(shí)現(xiàn)代碼，大家可以參考下。...
- ASP教程
JScript中遍歷Request表單參數(shù)集合的方法
這篇文章主要介紹了JScript中遍歷Request表單參數(shù)集合的方法,本文以遍歷Request.QueryString集合為例給出了實(shí)現(xiàn)代碼,需要的朋友可以參考下...
- ASP教程
asp 標(biāo)記字符串中指定字符變色不區(qū)分大小寫(xiě)
今天遇到這種問(wèn)題，單純的使用replace函數(shù)不行，他會(huì)改變?cè)械淖址拇笮?xiě),在網(wǎng)上找到相關(guān)的代碼，自己備份下...
- ASP教程
asp 采集實(shí)戰(zhàn)代碼
最近實(shí)在是太流行采集了，本人是不喜歡采集的，但對(duì)采集的原理我卻很有興趣進(jìn)行研究，拿到了網(wǎng)上采集常用函數(shù)，對(duì)其進(jìn)行了一番研究，并實(shí)戰(zhàn)，結(jié)果...
- ASP教程
asp之基于adodb.stream的文件操作類
asp之基于adodb.stream的文件操作類...
