CSS3在操作的时候往往会需要使用到一些和CSS3不一样的特殊代码。这些代码在操作过程中内容不算是太多，但是又非常的关键和重要。很多初学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

'...........你的连接数据库代码

call catch("数据库打开错误")

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 & 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所用到的函数--------------------

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如何显示特殊文件夹的操作代码介绍您都看懂了吗？其实上述的内容是比较基础性的知识信息，大家在查看的时候不需要担心太多的问题，比如说操作的难度大不大，要注意什么等等。因为只要是按上述这种比较简单的方式来操作CSS3如何显示特殊文件夹的操作代码，其实是没有难度的。

更多信息请查看IT技术专栏