这段代码是什么意思

<%

dim startime,endtime,conn,connstr,db

startime=timer()

db="data\12912.asp"

Set conn = Server.CreateObject("ADODB.Connection")

'connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)

connstr="driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath(db)

conn.Open connstr

Function CloseDatabase

conn.close()

set conn=Nothing

End Function

%>

__________

dim startime,endtime,conn,connstr,db

startime=timer()

db="data\12912.asp"

Set conn = Server.CreateObject("ADODB.Connection")

'connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)

connstr="driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath(db)

conn.Open connstr

___________________

这段代码是连接数据库,数据库的地址是data\12912.asp(12912.asp是数据库文件,名称改为12912.mdb就可以打开了)

__________________________

Function CloseDatabase

conn.close()

set conn=Nothing

End Function

_________________________

这段代码是一个关闭数据库的函数