!--METADATA TYPE="typelib"
UUID="00000205-0000-0010-8000-00AA006D2EA4"
NAME="ADODB Type Library"
-->
%
Dim objStream
Set objStream = Server.CreateObject("ADODB.Stream")
' 創(chuàng)建一個(gè)Stream 對(duì)象.
objStream.Type = adTypeBinary
objStream.Open
objStream.LoadFromFile "D:\Inetpub\wwwroot\images\chunfeng.gif"
' 用stream對(duì)象的loadfromfile方法打開一個(gè)GIF文件.
' 輸出stream 對(duì)象連接.
Response.ContentType = "image/gif"
' 指定操作文件類型的信息,二進(jìn)制還是text,如果是text還要指定是ASCII還是UNICODE格式.
Response.BinaryWrite objStream.Read
objStream.Close
Set objStream = Nothing
' 清空.
%>
[1]
標(biāo)簽：襄陽 柳州 朔州 中山 遵義 邯鄲 威海 雞西
巨人網(wǎng)絡(luò)通訊聲明：本文標(biāo)題《如何實(shí)現(xiàn)無組件上傳二進(jìn)制文件？》，本文關(guān)鍵詞 如何,實(shí)現(xiàn),無,組件,上傳,；如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問題，煩請(qǐng)?zhí)峁┫嚓P(guān)信息告之我們，我們將及時(shí)溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò)，涉及言論、版權(quán)與本站無關(guān)。
