欧美性猛交XXXX免费看蜜桃,成人网18免费韩国,亚洲国产成人精品区综合,欧美日韩一区二区三区高清不卡,亚洲综合一区二区精品久久

打開(kāi)APP
userphoto
未登錄

開(kāi)通VIP,暢享免費電子書(shū)等14項超值服

開(kāi)通VIP
請教ASP中如何讀取.dat的文件?
 
以文本方式查看主題

-  我的幫助論壇(主要探討 VFP 及其它編程技術(shù))  (http://www.gz9f.com/bbs/index.asp)
--  CGI、ASP、JAVA論壇  (http://www.gz9f.com/bbs/list.asp?boardid=8)
----  請教ASP中如何讀取.dat的文件?  (http://www.gz9f.com/bbs/dispbbs.asp?boardid=8&id=200853)

--  作者:pangcg
--  發(fā)布時(shí)間:2003-4-2 11:29:00

--  請教ASP中如何讀取.dat的文件?
請教各位大蝦,ASP中如何讀取.dat的文件?
--  作者:初級VFP
--  發(fā)布時(shí)間:2003-4-2 22:44:00

--  
<%
\‘以下為讀取一行
Function file_Getword(filename)
Dim fileobj,thisfile
set fileobj=createobject("scripting.filesystemobject")
set thisfile=fileobj.opentextfile(updatefile,1,false)
file_Getword=thisfile.readline
thisfile.close
set fileobj=nothing
end function
response.write "文件內容:"&file_Getword(filename)

\‘以下為讀取整個(gè)文件
dim fname,FS,FGetfile,Readfile,Cstr
fname="路徑+文件"
Set FS = Server.CreateObject("Scripting.FileSystemObject")
Set FGetfile = FS.Getfile(fname)
Set Readfile = FGetfile.OpenAsTextStream(1,0)
Cstr=""
Do while Readfile.AtEndOfLine<>True
Cstr=Cstr&Readfile.ReadLine&chr(13)&chr(10)
Loop
Readfile.close
set FGetfile = nothing
set Readfile = nothing
Set FS = nothing
response.write Cstr
%>


本站僅提供存儲服務(wù),所有內容均由用戶(hù)發(fā)布,如發(fā)現有害或侵權內容,請點(diǎn)擊舉報。
打開(kāi)APP,閱讀全文并永久保存 查看更多類(lèi)似文章
猜你喜歡
類(lèi)似文章
禁止迅雷偷偷上傳已下載的文件
徹底找出WEB空間中的ASP后門(mén)!
Server對象MapPath方法
Python 比較文件內容是否一致
閱讀格式
計數器源代碼
更多類(lèi)似文章 >>
生活服務(wù)
分享 收藏 導長(cháng)圖 關(guān)注 下載文章
綁定賬號成功
后續可登錄賬號暢享VIP特權!
如果VIP功能使用有故障,
可點(diǎn)擊這里聯(lián)系客服!

聯(lián)系客服

欧美性猛交XXXX免费看蜜桃,成人网18免费韩国,亚洲国产成人精品区综合,欧美日韩一区二区三区高清不卡,亚洲综合一区二区精品久久