conn1.asp

来自「飞天论坛FTBBS PHP版 v4.1.ASP源代码」· ASP 代码 · 共 15 行

<%
on error resume next
dsnstrconn1="DRIVER=sql server;server=127.0.0.1;database=lh100;uid=sa;password=lh100com"
set dsnstrconn=server.CreateObject("adodb.connection")
dsnstrconn.Open dsnstrconn1
If Err.Number <> 0 Then
		dsnstrconn.close
		set dsnstrconn=nothing
		On Error GoTo 0
        	Response.redirect "/err.asp"
		response.End()
end if
On Error GoTo 0
%>