请帮我看看这段ASP代码有没有错！

来源：百度知道编辑：UC知道时间：2024/06/23 04:45:34

Sub ConnectionDatabase()
Dim ConnStr,Db
Db = "Data/Faw.mdb" '请修改数据库名字，如改为Data/FengLing_File.asp
ConnStr = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath(Db)
On Error Resume Next
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.open ConnStr
If Err Then
err.Clear
Set Conn = Nothing
Response.Write "数据库连接出错，请检查连接字串。"
Response.End
End If

最后少了个end sub
一般的数据库连接代码都没有用函数体，你干吗这样做呢？用这不更好吗？

Sub ConnectionDatabase() 结束处应该用End sub

请帮我看看这段ASP代码谢谢了请高手帮我看看这段asp代码！帮我看看这段ASP代码帮我看看这段ASP代码～～！ ASP代码问题。。。帮我看看这段ASP代码请帮我看看这段asp代码有什么地方写得不对！请帮我看一下这段asp代码有没有问题。请帮我看看这段代码高手.帮看看这段ASP代码有什么错误!! 关于ASP,那位帮我看看这段代码!