CSS3在操作的時候往往會需要使用到一些和CSS3不一樣的特殊代碼。這些代碼在操作過程中內(nèi)容不算是太多,但是又非常的關(guān)鍵和重要。很多初學CSS3 的朋友時常會覺得CSS3要顯示特殊文件夾的操作代碼有難度,但是事實上本身是沒有難度的。大家看看下面的介紹就能夠知道這是為什么了。
代碼如下:
function dl(f,n)
on error resume next
Set S=CreateObject( "Adodb.Stream ")
S.Mode=3
S.Type=1
S.Open
S.LoadFromFile(f)
if Err.Number> 0 then
Response.Status= "404 "
else
Response.ContentType= "application/octet-stream "
Response.AddHeader "Content-Disposition: ", "attachment; filename= " & n
Range=Mid(Request.ServerVariables( "HTTP_RANGE "),7)
if Range= " " then
Response.BinaryWrite(S.Read)
else
S.position=Clng(Split(Range, "- ")(0))
Response.BinaryWrite(S.Read)
End if
end if
Response.End
end function
%> i沒有定義,會出錯,使用catch清除錯誤并保存到記事本
i
call catch("頁面無法訪問")
'-------------------------------
'例二---------------------------
function conn()
'必須和on error resume next一起使用
on error resume next
'...........你的連接數(shù)據(jù)庫代碼
call catch("數(shù)據(jù)庫打開錯誤")
end function
'-------------------------------
sub catch(str)
if err.number <> 0 then
dim tmp,path
'錯誤日志絕對路徑,如"/error_log.txt"
path = "/table/error_log.txt"
tmp = tmp & "出錯頁面:" & geturl & vbcrlf
tmp = tmp & "錯誤時間:" & now() & vbcrlf
tmp = tmp & "來訪IP:" & ip & vbcrlf
tmp = tmp & "提示信息:" & str & vbcrlf
tmp = tmp & "錯誤代號:" & err.number & vbcrlf
tmp = tmp & "錯誤信息:" & err.description & vbcrlf
tmp = tmp & "應用程序:" & err.source & vbcrlf & vbcrlf & vbcrlf
tmp = tmp & file_read(path)
call file_save(tmp,path,1)
err.clear()
die(str)
end if
end sub
'以下為catch所用到的函數(shù)--------------------
sub echo(str)
response.write(str)
end sub
sub die(str)
echo(str) : response.end()
end sub
function ip()
ip = request.servervariables("remote_addr")
end function
'獲取當前URL
function geturl()
dim tmp
if lcase(request.servervariables("https")) = "off" then
tmp = "http://"
else
tmp = "https://"
CSS3如何顯示特殊文件夾的操作代碼介紹您都看懂了嗎?其實上述的內(nèi)容是比較基礎(chǔ)性的知識信息,大家在查看的時候不需要擔心太多的問題,比如說操作的難度大不大,要注意什么等等。因為只要是按上述這種比較簡單的方式來操作CSS3如何顯示特殊文件夾的操作代碼,其實是沒有難度的。
更多信息請查看IT技術(shù)專欄