conn.asp

来自「音乐管理系统的采集数据程序可自行添加采集点,适合一些大型音乐网站数据的采集」· ASP 代码 · 共 19 行

<%
   dim conn   
   dim connstr
   on error resume next
sub TLconnstr
   connstr="DBQ="+server.mappath("@music.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
     set conn=server.createobject("ADODB.CONNECTION")
     conn.open connstr
end sub
sub TLconnstr1
   connstr="DBQ="+server.mappath("db1.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
     set conn=server.createobject("ADODB.CONNECTION")
     conn.open connstr
end sub
 
%>