conn.asp

新手第一次做系统

<!-- 连接 -->
<%
Public conn,rec
Set conn=server.CreateObject("adodb.connection")
	'response.write "before:" & conn.state & "<br>"
If conn.state=1 Then
	conn.close
End if 
conn.open "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=As_Book;Data Source=."
	'response.write "after:" & conn.state & "<br>"
%>