conn.asp

随着计算机技术的广泛应用,在酒店客房管理中引入计算机管理技术,成为一个值得深入研究的问题。本系统采用ASP+ACCESS作为开发环境,本文首先概要的论述了ASP的有关知识与现状。之后

<%
dim db
const DatabaseType="ACCESS"     
      
         On Error Resume Next
	dim ConnStr
	dim conn
	    db=Server.MapPath("db/hcotry.mdb")  
		ConnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & db
		Set conn = Server.CreateObject("ADODB.Connection")
		
	conn.Open connstr
	If Err Then
		err.Clear
		Set Conn = Nothing
		Response.Write "数据库连接出错，请检查conn.asp文件中的数据库参数设置。"
		Response.End
	End If
sub CloseConn()
	On Error Resume Next
	If IsObject(Conn) Then
		conn.close
		set conn=nothing
	end if
end sub
if session("")="" then
response.redirect("")
end if
%>