主题:  数据库连接怎么那么烦啊??

toger

职务:普通成员
等级:1
金币:0.0
发贴:36
注册:2001/11/19 19:09:34
#12002/7/26 10:50:23
我看了好多的数据库连接的问题,看论坛帖子里的回答也看了好多,可还是一头雾水,忍不住发个帖子了,麻烦大家了,不好意思。先说明一下我这里的文件情况:
服务器的硬盘地址:E:\freehost06\flire 主页地址:http://freehost06.websamba.com/flire
本地文件地址:E:\freehost06\flire\tbb\index.asp tbb是专门做留言板用的一个文件夹
其中数据库放在E:\freehost06\flire\tbb\include/hehe.mdb
连接的文件在 E:\freehost06\flire\tbb\Connections\hehe.asp (系统自动生成的)
在本地硬盘测试可以,但传到服务器上就不可以了,惨。
里面的文件代码如下:

E:\freehost06\flire\tbb\Connections\hehe.asp:
<%
' FileName="Connection_odbc_conn_dsn.htm"
' Type="ADO"
' DesigntimeType="ADO"
' HTTP="false"
' Catalog=""
' Schema=""
Dim MM_hehe_STRING
MM_hehe_STRING = "dsn=bbs;"
%>

E:\freehost06\flire\tbb\index.asp:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>

<%
Dim r
Dim r_numRows

Set r = Server.CreateObject("ADODB.Recordset")
r.ActiveConnection = MM_hehe_STRING
r.Source = "SELECT * FROM user ORDER BY user_time DESC"
r.CursorType = 0
r.CursorLocation = 2
r.LockType = 1
r.Open()

r_numRows = 0
%>


welcome to my first bbs













——hehe——














姓名 <%=(r.Fields.Item("user_id").value)%>
来自
<%=(r.Fields.Item("user_from").value)%>
性别
<%=(r.Fields.Item("user_sex").value)%> <%=(r.Fields.Item("user_age").value)%>






 






<%
r.Close()
Set r = Nothing
%>

请问,我应该如何修改,让asp在服务器上也能正常运行呢?