毕业论文论文范文课程设计实践报告法律论文英语论文教学论文医学论文农学论文艺术论文行政论文管理论文计算机安全
您现在的位置: 毕业论文 >> 论文 >> 正文

VB题库管理系统 第6页

更新时间:2010-3-7:  来源:毕业论文
VB题库管理系统 第6页
  在应用程序结束之前,应该释放分配给ADO对象的资源,操作系统回收这些资源并可以再分配给其他应用程序.
    使用的方法为:Close方法.
    语法如下:
    Object.Close ' Object为ADO对象
二. 系统的技术要点
1多用户登陆问题
a  建立模块,Module1
b  在模块中申明变量 Public user
    c  在数据库建立用户表,存放用户名和密码,然后输入多个用户
    d  通过ADO代码连接到数据库。
    E  通过SQL语句 判断是否用户数据库有。
    F  如果没有则退出。
    G  如果有 通过SQL语句判断是否密码正确。
H  如果正确则发送数据库的该用户名到公共变量 user = myrs("user")
I  通过变量决定各个用户的权限。
2 出试卷
    手动出试卷
将题库的一个字段设为是否出试卷。
然后通过SQL语句筛选出记录,形成出试卷库。
SELECT * FORM TK WHERE 是否出卷=“是”
自动出试卷
获得随即数,然后自动出题
nb = myrs3.RecordCount
rdnb = Int((nb) * Rnd()) '获得随机数
myrs3.Move rdnb
    t1 = CStr(myrs3("编号"))
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
 myrs2.Open "insert into sj select * from tkgl2 where 编号='" + t1 + "' ", mycn, adOpenKeyset, adLockOptimistic     
  myrs3.Delete
 myrs3.MoveFirst
3  多级查询问题
  单级查询使用 SELECT * FORM TK WHERE 字段 =SS
多级查询使用 SELECT * FORM TK WHERE 字段1 =SS  AND字段2 =SS2
第五章 系统具体实现
首先建立模块,用来存放公共变量
Public user
一. 用户界面的实现
1.登陆界面   
在工程引用ADO2.0。
在命令按钮单击写下连接数据库USER表的判断语句
Private Sub Command1_Click()
mname = Text1.Text
pass = Text2.Text
Dim mycn As New ADODB.Connection
Dim myrs As New ADODB.Recordset
Set myrs = New ADODB.Recordset
mycn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=kygl.mdb;"
myrs.Open "SELECT * FROM [user] where (user.user)='" + mname + "';", mycn, adOpenKeyset, adLockOptimistic
If myrs.BOF = True And myrs.EOF = True Then
MsgBox "查无此人", , "登陆信息"
Else    
     If myrs("pass") = pass Then       
         ''''''''''''''''''''''''''''''''''''''''''
        MsgBox "ok", , "登陆信息"
        user = myrs("user")                
          Form2.Show        
         Unload Me            
           '''''''''''''''''''''''''''''''''''''''''''''''''''
     Else
        MsgBox "密码不正确", , "登陆信息"
     End If
    End If
End Sub
  目的是USER表没有该用户,将无法使用本程序
user = myrs("user ")
将公共变量user设为用户的身份

上一页  [1] [2] [3] [4] [5] [6] [7] 下一页

VB题库管理系统 第6页下载如图片无法显示或论文不完整,请联系qq752018766
设为首页 | 联系站长 | 友情链接 | 网站地图 |

copyright©751com.cn 辣文论文网 严禁转载
如果本毕业论文网损害了您的利益或者侵犯了您的权利,请及时联系,我们一定会及时改正。