| asp连接数据库 |
<%
dim cndate
mes_cndate="../db/"
On Error Resume Next
set conntu=server.createobject("adodb.connection")
conntu.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&server.mappath(mes_cndate&"#3321.mdb")
if err then
err.clear
response.Write "<center><br><br><br><br><br><br>数据库连接失败……"
response.end
conntu.close
set conntu=nothing
end if
set rstu=server.createobject("adodb.recordset")
%> |
| 点击：1262 发布者：xinyou 发布时间：2014-06-08 19:07:01 | |
|
|
|
