请大家讨论一下，数据库连接

[killStar]

1.我用Application("Cn")作为数据库连接，使所有用户用同一个连接访问数据库，这样做有什么问题没有？
2.我在Application的Onstart事件里打开连接，但在Onend事件里却无法关闭连接（已经关闭所有的浏览器了），这却是为什么呢？Onend事件是每个用户结束站点访问时发生还是最后一个用户结束时发生呢？
3.同志们有没有更好的数据库连接方法呢？请赐教。

[xieyj]

在 session_onend 里写试试

[danjingwu]

我一般是把连接数据库放在一个文件里面conn.asp
<%
Set conn = Server.CreateObject("Adodb.Connection")
Dim strConnString
strConnString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("../database/mysystem.mdb")
conn.Errors.clear
conn.Open strConnString

sub closedb
set rst=nothing
conn.close
set conn=nothing
end sub
%>

然后在页面的时候打<!--#include file="conn.asp"-->

[killStar]

可是session_onend是每个用户结束访问时或连接超时的时候都会产生，那样其他用户不是没法使用连接了？

[jfly301]

直接创建个文件。conn.asp

<%

dim conn
dim connstr
dim db
db="database/easttimes.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
conn.Open connstr

%>

然后include就可以了，

[jfly301]

二楼和我的一样，呵呵，

[killStar]

这样用，不需要关闭连接吗？如果要，那么在什么时候写呢？

[fenlin]

1.没有问题。
2.Application的OnEnd事件只有当网站没有人访问并且Session超时后或当服务器重启或关闭时才会关闭
3.连接方法有很多，可以用DSN，ODBC等等。个人习惯吧。

[flying310]

dim conn
dim connstr
dim db
db="upload.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
' connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(""&db&"")
' connstr="driver={SQL Server};server=localhost;UID=sa;PWD=;database=club"
conn.Open connstr