conn.asp

来自「STM32 Keil 下的驱动STM32 Keil 下的驱动」· ASP 代码 · 共 14 行

<%
Dim Conn
Sub ConnOpen()
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.ConnectionTimeOut=30  '设置数据库连接时间
Conn.ConnectionString="Driver={MicroSoft Access Driver (*.mdb)};Dbq="&server.Mappath("database/CnwyAsp.mdb")
Conn.Open
End Sub
Sub ConnClose()
Conn.close
set Conn=Nothing
End Sub

%>