学生信息管理系统之用户登录:用户登录流程
第一步:获取本计算机用户名
Private Sub Form_Load()重点内容Dim sBuffer As String '缓冲器Dim lSize As LongsBuffer = Space$(255) '缓冲器容量255Byte,sBuffer为255个空格字符串lSize = Len(sBuffer) 'sBuffer串的长度Call GetUserName(sBuffer, lSize) '读取用户名到sBuffer中If lSize > 0 ThentxtUserName.Text = ""Else
第二步:判断文本框
Private Sub cmdOK_Click()Dim txtSQL As StringDim mrc As ADODB.RecordsetDim MsgText As StringUserName = ""If Trim(txtUserName.Text = "") ThenMsgBox "没有这个用户,请重新输入用户名!", vbOKOnly + vbExclamation, "警告"txtUserName.SetFocusElsetxtSQL = "select*from user_Info where user_ID='" & txtUserName.Text & "'"Set mrc = ExecuteSQL(txtSQL, MsgText)
第三步:ExecuteSQL函数执行
Public Function ExecuteSQL(ByVal SQL As String, MsgString As String) As ADODB.Recordset
'execute SQL and return recordsetDim cnn As ADODB.ConnectionDim rst As ADODB.RecordsetDim sTokens() As StringOn Error GoTo ExecuteSQL_ErrorsTokens = Split(SQL)Set cnn = New ADODB.Connectioncnn.Open ConnectString
第四步:打开ConnectString,连接数据库
Public Function ConnectString() As String '以文件DSN标记,访问ODBC数据源
ConnectString = "FileDSN=student.dsn;UID=sa;PWD=123456" '连接文件dsn
End Function
第五步:判断增删改查
If InStr("INSERT,DELETE,UPDATE", UCase$(sTokens(0))) Thencnn.Execute SQLMsgString = sTokens(0) & " query successful"ElseSet rst = New ADODB.Recordsetrst.Open Trim$(SQL), cnn, adOpenKeyset, adLockOptimisticSet ExecuteSQL = rstMsgString = "查询到" & rst.RecordCount & "条记录"End IfExecuteSQL_Exit:Set rst = NothingSet cnn = NothingExit Function
第六步:数据库查询后的判断
If mrc.EOF ThenMsgBox "没有这个用户,请重新输入用户名!", vbOKOnly + vbExclamation, "警告"txtUserName.SetFocusElseIf Trim(mrc.Fields(1)) = Trim(txtPassword.Text) ThenOK = Truemrc.CloseMe.HideUserName = Trim(txtUserName.Text)ElseMsgBox "输入密码不正确,请重新输入!", vbOKOnly + vbExclamation, "警告"txtPassword.SetFocustxtPassword.Text = ""End If
第七步:登录成功
学生信息管理系统之用户登录:用户登录流程相关推荐
- JAVA登录界面学生和老师_学生信息管理系统之第三篇登录界面java代码
class DLFrame extends JFrame implements ActionListener, ItemListener {// 登录界面 JPanel p1 = null; JPan ...
- 基于java的学生信息管理系统(含源文件)
欢迎添加微信互相交流学习哦! 项目源码:https://gitee.com/oklongmm/biye 内容摘要 - 2 - 引言 - 4 - 学生信息管理系统开发的意义和目的 - ...
- (解析+源码)基于JAVA Swing+MySQL实现学生信息管理系统(增、删、改、查)数据库/文件存储
根据学校对学生信息日常管理需要,学生信息管理系统包括以下功能: 登录系统: 新建学生信息:添加学生信息: 删除学生信息:对指定学生信息进行删除: 修改学生信息:对指定学生信息进行修改 查找学生信息:输 ...
- 添加老师信息的php学生信息管理,PHP+MySQL学生信息管理系统的开发与设计
一直以来我国领导人提倡以人为本的治国方案,而大学是未来人才的培养基地,如何能够更好的对学生信息进行管理,是很多高校一直在研究的一个问题,只有更加科学的对学生信息进行管理,才能够更加积极的培养国家的栋梁 ...
- 基于PHP+MySQL学生信息管理系统的开发与设计
一直以来我国领导人提倡以人为本的治国方案,而大学是未来人才的培养基地,如何能够更好的对学生信息进行管理,是很多高校一直在研究的一个问题,只有更加科学的对学生信息进行管理,才能够更加积极的培养国家的栋梁 ...
- 基于php学生信息管理系统——计算机毕业设计
本毕业设计所描述的学生信息管理系统是采用php,Mysql编写的系统.系统主要实现了:学生档案维护:教师管理:考勤情况:作业完成情况:平时成绩的生成和查询等功能等功能.基于B/S模式的. 本系统通过三 ...
- 基于php学生信息管理系统
本毕业设计所描述的学生信息管理系统是采用php,Mysql编写的系统.系统主要实现了:学生档案维护:教师管理:考勤情况:作业完成情况:平时成绩的生成和查询等功能等功能.基于B/S模式的. 本系统通过三 ...
- 基于文件操作的学生信息管理系统(含登录验证)
本人C++大一小白,最近有闲着的时间,就写了个学生信息管理系统,全文件操作,有些地方复杂度太大,还有很大的修改空间. 功能结构图 后期关于成绩修改和信息修改实现没写,思想跟已经实现的修改密码一样,你若 ...
- Java学生信息管理系统——管理员登录模块(简单易上手)
前言 这一篇是用来记录我编写学生信息管理系统时实现登录操作的过程,这是学生信息管理系统的第一个模块,之后我还会陆续将其它模块分享出来. 其它章节 ------------------------> ...
- 学生信息管理系统(登录功能)
工具eclipse 主要操作登陆,增删查改 编写实体类 public class Student {private int id;private String sId;//学号private Stri ...
最新文章
- JavaScript (二)
- adb命令开启手机的一些功能,请问怎么操作?
- python 如何将代码打包成exe可执行程序?(导出为exe可执行文件)pyinstaller
- linux中用参数代替键盘输入,Linux终端中使用上一命令减少键盘输入
- treegrid,可以展开的jqgrid树
- nyist oj 37 回文字符串 (动态规划经典)
- 使用Git推送代码到GitHub远程仓库
- C/C++轻松写电脑锁机程序
- 第三章:选择结构(一)
- Hive 元数据库表信息
- 如何将unity3d动画嵌入html,在Unity3D中使用精灵动画引擎制作动画的两种方法
- 苹果Mac好用的图片编辑工具:Acorn 再升级
- dos 命令检索文件
- Linux系统中如何查看日志信息
- Cisco路由器密码设置
- office2019 图目录_赶快收藏!这款强大的PPT通路图插件ScienceSlides 2016来了!
- live.com与live.cn邮箱收不到QQ绑定激活信的解决方法
- Java实现文件批量导入导出实例(兼容xls,xlsx)
- 没有目标,永远也找不到人生方向
- Kafka学习征途:.NET Core操作Kafka