计算机毕业设计系统实现部分介绍：
（一）系统主界面
在IE里运行本系统，出现系统的主界面，包括系统登陆、选择角色，转到“毕业设计分配”系统页面。如图：
|
以下是引用片段：
相关代码如下：
Private Sub LinkButton1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles LinkButton1.Click
Dim tmpcnn As New Sql2000DB
Dim tmpda As New DataTable
Dim tmpYh As New clsYh
If Me.RadioButton1.Checked = True Then
'如果是学生登陆 判断用户和密码是否正确
tmpda = tmpcnn.GetData("select * from student where id='" & Me.TextBox1.Text & "' and mm='" & Me.TextBox2.Text & "'")
If tmpda.Rows.Count > 0 Then
'保存信息 跳转页面
tmpYh.strId = tmpda.Rows(0)("ID")
tmpYh.strMM = tmpda.Rows(0)("mm")
tmpYh.strXm = tmpda.Rows(0)("Xm")
tmpYh.strJB = "学生"
Session("Yh") = tmpYh
Response.Redirect("StudentSee.aspx")
Exit Sub
Else
Response Exit Sub
End If
End If
If Me.RadioButton2.Checked = True Then
'如果是教师登陆 判断用户或密码是否正确
tmpda = tmpcnn.GetData("select * from teacher where id='" & Me.TextBox1.Text & "' and mm='" & Me.TextBox2.Text & "'")
If tmpda.Rows.Count <= 0 Then
Response
Exit Sub
End If
'根据标志 保存信息 跳转到不同页面
tmpYh.strId = tmpda.Rows(0)("ID")
tmpYh.strMM = tmpda.Rows(0)("mm")
tmpYh.strXm = tmpda.Rows(0)("Xm")
If tmpYh.strId = "admin" Then
tmpYh.strJB = "管理员"
Session("Yh") = tmpYh
Response
Else
tmpYh.strJB = "教师"
Session("Yh") = tmpYh
Response End If
End If
End Sub
|
〖资料来源:计算机毕业论文 www.xiaoniu168.com〗
第7页为计算机毕业论文基本功能介绍......