发布时间 : 星期三 文章BBS论坛毕业设计论文 - 图文更新完毕开始阅读4ace3f1514791711cc7917da
海南软件职业技术学院毕业设计（论文）
\ & _ \ cmdSQL.Connection = cnData
End Sub
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load typeID = CMyFunc.GetTypeID(TreeView1.SelectedValue)
If Session(\) IsNot Nothing Then lbName.Text = Session(\).ToString pnLogin.Visible = False btnLogin.Text = \注销\ rblMy.Visible = True Else
lbName.Text = \客人\ pnLogin.Visible = True btnLogin.Text = \登陆\ rblMy.Visible = False
End If
MyDataBind()
hlkAsk.NavigateUrl = \ & typeID.ToString
If typeID = \ Then
hlkAsk.Text = \提问请先选择子论坛\ hlkAsk.Enabled = False rblMy.Enabled = False Else
hlkAsk.Text = \我要提问\ hlkAsk.Enabled = True rblMy.Enabled = True End If
Dim strType As String
strType = CMyFunc.GetTypeName(typeID)
- 21 - - 2
海南软件职业技术学院毕业设计（论文）
If strType = \ Then lbType.Text = \社区起点\ Else
lbType.Text = strType End If End Sub
Sub MyDataBind()
Dim strSQL As String If typeID = \ Then rbl1.Visible = False
strSQL = \lasttime DESC\ Else
rbl1.Visible = True Dim strState As String If rbl1.SelectedIndex = 0 Then
strState = \ Else
strState = \ End If
If Session(\) IsNot Nothing Then If rblMy.SelectedIndex = 1 Then
strState &= \ & Session(\).ToString & \ End If End If
strSQL = \ & _ \ & typeID.ToString & \ & strState & \ End If
Dim dap As New OleDbDataAdapter(strSQL, cnData) Dim ds As New DataSet dap.Fill(ds, \)
Dim dt As DataTable = ds.Tables(\)
- 22 - - 2
海南软件职业技术学院毕业设计（论文）
dgv1.DataSource = dt dgv1.DataBind() End Sub
Protected Sub TreeView1_SelectedNodeChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TreeView1.SelectedNodeChanged
End Sub End Class
4.3设计数据库
本系统所使用的数据库服务器为ACCESS 2000，它在ACCESS 2000 的基础上, 扩展了ACCESS的总体功能与性能、工具界面更加方便合理、全面的数据完整性保护、系统安全性更高。ACCESS 2000的数据库空间不会受限于Device空间大小, 方便了数据空间的扩展, 使ACCESS 2000作为一个网络数据库管理系统,其扩展已超出了单个物理计算机的限制,并且多服务器“分布式”事物的内在支持更加充分.本系统主要使用了存储过程Stored Procedure, 所谓Stored Procedure实际上就是一段保存在数据库中的程序, 通过一个名称的命名,其中包含有处理数据库存取与运算的SQL语句, 并且将这样的程序文件紧密结合在数据库中,这样我们的前台应用系统在执行过程中,可以直接执行数据库中设置好的Stored Procedure,甚至可以传递参数。
4.4创建数据库
ACCESS 2000 的Manager管理工具是一个非常好用的可视化管理工具, ACCESS 2000中提供的datetime和text两种字段类型,其中datetime是用来保存日期和时间数据的,text 是用来保存不定长度的备注说明内容的, 有了这两个数据类型, 应用系统中就不用再为输出格式和限制字符串长度而增加额外代码了。 数据表间关系：
序 号 1 2 3
数据表名称 T_Operator T_Forum T_Topic - 23 - -
2
说 明 操作员（用户）表 论坛回帖表 论坛主题表 海南软件职业技术学院毕业设计（论文）
4 5 6 7
T_UserPara T_Mark T_OperatorFunction T_Function 系统参数表 积分头衔表 用户功能权限关联表 功能表 之所以这样设计数据表间关系，主要是考虑论坛中各个对象得相互关系，帖子属于板块，回复帖从属于主题帖，帖子的作者属于用户，因此板块、主题帖、回复帖是一层层的从属依赖关系，帖子的作者必须是论坛的用户，帖子不能脱离板块、用户而单独存在。
5 系统实现与测试
本论坛系统完成之后，就必须设计许多的测试用例来验证本系统的正确性，容错能力/恢复能力，信息安全性，可靠性等，尽可能多地找出系统的错误所在。
5.1 验证性测试
在登录论坛之前，论坛首页上显示 “您的当前状态是：未登录！”（如图1）此时，该用户除了能够进行用户注册之外，没有任何权限访问论坛的任何一个模块。当点击任何一个功能按钮时，页面将会显示：“您没有登录，请返回！”
当用户点击“注册”按钮，页面便跳转到用户注册界面（如图 2），若注册成功，则显示“注册成功”（如图3），否则显示“发生错误···返回”。
- 24 - - 2