是这样.我想把动网论坛里的贴子连接到评论里.想要连接动网论坛数据库.

但是数据库这里的代码我看不得懂..具体要怎么搞?

这是/inc/Cls_DB.asp文件.

<%
'────────────────────────────────
'功能说明：DataBaseClass类是实现数据库连接的类，里面留有数据库连接字符串接口
'包括模块：无，一般都是被其他模块包括
'调用方法：1、如果使用原有数据库连接，则不用更改数据库连接字符串ConnStr
'            具体操作为：Set DBC=New DataBaseClass
'                        DBC.ConnStr="其他连接字符串"
'          2、方法使用：Set Conn=DBC.OpenConnection()得到一个连接对象
'────────────────────────────────
Session.Timeout  = 300
Server.ScriptTimeOut = 10000    '设置脚本超时
Const IsSqlDataBase=0
Dim StrSqlDate
Class DataBaseClass
'────────────────────────────────
'定义变量
Private IConnStr
'────────────────────────────────
' ConnStr属性
Public Property Let ConnStr(Val)
    IConnStr = Val
End Property
'────────────────────────────────
' ConnStr属性
Public Property Get ConnStr()
    ConnStr = IConnStr
End Property
'────────────────────────────────
' 类初始化
Private Sub Class_initialize()
ConnStr = "DBQ=" + Server.MapPath(DataBaseConnectStr) + ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
StrSqlDate = "Date()"
End Sub
'────────────────────────────────
' 类注销
Private Sub Class_Terminate()
ConnStr = Null
End Sub
'────────────────────────────────
' 建立一个连接
Public Function OpenConnection()
Dim TempConn
On Error Resume Next
Set TempConn = Server.CreateObject(G_FS_CONN)
TempConn.Open ConnStr
Set OpenConnection = TempConn
Set TempConn = Nothing
if Err.Number <> 0 then
  Response.Write("<font size=""2"">[数据库连接错误]<br>请检查系统参数设置>>站点常量设置,或者/inc/const.asp文件!</font>") 
        Response.End
end if
End Function
End Class
%>

黑体那里这样说,是不是Set DBC=New DataBaseClass
'                        DBC.ConnStr="/bbs/db/dvbbs7.mdb"

这样就行了?

Set DBC = New DataBaseClass
Set Conn = DBC.OpenConnection()--------------------这是NewsReview.asp文件(评论),光这几句就连了数据库存了?
Set DBC = Nothing

动网论坛提供的有首页调用的代码吧,你把那代码加在讨论的地方调用就可以实现功能了,何必要做那么麻烦呢

活动评审组：加2分魅力值，请查收。

(原始值:魅力43分)

连是连了，那新闻怎么出来？里面怎么调用？最好用动网提供的首页调用，要不自己有能力的话，整合一下动网和风讯，只这么弄不行地~~~~~~~~~~~~~