tcconn.asp

一套简单的教师办公系统,ASP+ACCESS开发

<%
   dim conn   
   dim connstr

on error resume next
   connstr="DBQ="+server.mappath("tcmdb/teacher.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
   set conn=server.createobject("ADODB.CONNECTION")
   if err then 
     err.clear
   else
        conn.open connstr 
       if err then 
          err.clear
       end if
  end if
%>