connli（connasp）

1、<%dim conn,connstr,time1,time2time1=timer on error resume nextConnstr="DRIVER=Microsoft Access Driver (*.mdb);DBQ="+server.mappath("inc/wygkcnschool/ghostdb.mdb")Set Conn=Server.CreateObject("ADODB.Connection") conn.Open connstrIf Err Thenerr.ClearSet Conn = NothingResponse.Write "数据库连接出错，请检查连接字串。

2、"Response.EndEnd If%>这个应该比较适合你！