% dim conn dim connstr db="JhrxWebData/News.mdb" '数据库文件位置 on error resume next connstr="DBQ="+server.mappath(""&db&"")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};" set conn=server.createobject("ADODB.CONNECTION") if err then err.clear else conn.open connstr end if %>
|
![]() |
|
![]() |
|
![]() |