28,391
社区成员
发帖
与我相关
我的任务
分享
dim conn,connstr
on error resume next
connstr="DBQ="&Request.ServerVariables("APPL_PHYSICAL_PATH") & "data/data.mdb;DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
Set conn=Server.CreateObject("ADODB.CONNECTION")
conn.open connstr