response.write("沒有找到網頁!")
'轉換編碼
function bytestobstr(body,cset)
dim objstream
set objstream = server.createobject("adodb.stream")
objstream.type = 1
objstream.mode =3
objstream.open
objstream.write body
objstream.position = 0
objstream.type = 2
objstream.charset = cset
bytestobstr = objstream.readtext
objstream.close
set objstream = nothing
end function
'呼叫方法
ASP讀取Excel xsl 檔案
html head title 操縱excel title head body h2 align center 顯示excel檔案示例 h2 table border 1 width 90 align center tr align center bgcolor e6e6e6 td 學號td td ...
ASP讀取顯示TXT檔案內容
html head title 基於文字的訊息發布系統 title head body table border 1 cellspacing 0 cellpadding 1 bordercolorlight dfdfdf bordercolordark ffffff align center tr ...
ASP讀取顯示TXT檔案內容
html head title 基於文字的訊息發布系統 title head body table border 1 cellspacing 0 cellpadding 1 bordercolorlight dfdfdf bordercolordark ffffff align center tr ...