文件名称：VB+SQL教学管理系统
文件大小：717KB
文件格式：RAR
更新时间：2012-07-07 05:13:13
教学管理系统
VB+SQL教学管理系统哦rivate Sub cmdok_Click() Dim txtsql As String Dim mrc As ADODB.Recordset Dim msgtext As String If Trim(txtusername.Text) = "" Then MsgBox "请输入用户名称!", vbOKOnly, "警告" Exit Sub End If '判断输入的密码是否一致 If Trim(txtpassword1.Text) <> Trim(txtpassword2.Text) Then MsgBox "两次输入密码不一样,请确认!", vbOKOnly, "警告" Exit Sub End If If Len(txtpassword1.Text) = 0 Then MsgBox "输入密码不能为空!", vbOKOnly, "警告" Exit Sub End If txtsql = "select*from user_info where user_ID ='" & txtusername.Text & "'" Set mrc = executesql(txtsql, msgtext) If mrc.EOF Then mrc.addnew mrc.fields("user_ID") = Trim(txtusername.Text) mrc.Update MsgBox "添加用户成功!", vbOKOnly, "添加用户" Else MsgBox "用户已经存在,请重新输入用户名!", vbOKOnly, "警告" Exit Sub End If Private Sub cmbcancel_click() Unload Me End Sub
【文件预览】：
VB
----dl.frm(6KB)
----frmcjquery.frm(8KB)
----模块.doc(51KB)
----student.frm(815B)
----FRMCJQ~1.log(143B)
----frmcjadd.log(223B)
----1_200803240113511aKeX.gif(134KB)
----frmrshz.frm(2KB)
----frmmodify.frm(3KB)
----dl.log(67B)
----frmxjquery.log(67B)
----新建 Microsoft Word 文档 (4).doc(24KB)
----MSSCCPRJ.SCC(196B)
----FRMMAIN.FRX(134KB)
----frmmain.frm(2KB)
----frmcjadd.frm(6KB)
----student_MIS.vbp(2KB)
----sj.doc(42KB)
----Student_db_Log.LDF(1024KB)
----Module1.bas(1020B)
----Register1.log(65B)
----frmAdduser.frm(4KB)
----frmcjadd.frx(33B)
----frmmain.tbk(74KB)
----frmcjmodify.frx(33B)
----student_MIS.vbw(627B)
----新建 Microsoft Word 文档 (3).doc(21KB)
----frmmain.001(74KB)
----frmxjquery.frm(10KB)
----Thumbs.db(6KB)
----frmpjf.frx(42B)
----frmxjquery.frx(21B)
----Register1.frx(193KB)
----代码大全()
--------frmadduser.txt(849B)
--------frmxjadd.txt(2KB)
--------frmxjmodify.txt(2KB)
--------module1.txt(0B)
--------frmtjcj.txt(749B)
--------frmcjadd.txt(2KB)
--------frmxjquery.txt(737B)
--------frmmain.txt(334B)
--------register.txt(642B)
----frmcjmodify.frm(6KB)
----frmxjadd.frm(6KB)
----FRMMAIN.FRT(512B)
----Register1.frm(5KB)
----frmpjf.frm(8KB)
----frmxjmodify.frm(10KB)
----Student_db_Data.MDF(1024KB)
----frmcjquery.frx(21B)
----frmmain.log(46B)
----FRMXJM~1.log(1KB)