图书馆管理系统源代码
源程序清单
1、文件名 login(login.frm)
功能说明：整个系统的登陆界面，需要输入用户名和登陆密码才能进入到系统中，进行借阅等操作。
源代码：
Option Explicit
Dim cnt As Integer
Private Sub Command1_Click()
Dim sql As String
Dim rs_login As New ADODB.Recordset
If Trim(Combo1.Text) = "" Then
MsgBox "没有这个用户", vbOKOnly + vbExclamation, ""
Combo1.SetFocus
Else
sql = "select * from 系统管理 where 用户名='" & Combo1.Text & "'" rs_login.Open sql, conn, adOpenKeyset, adLockPessimistic If rs_login.EOF = True Then
MsgBox "没有这个用户", vbOKOnly + vbExclamation, "" Combo1.SetFocus
Else
If Trim(rs_login.Fields(1)) = Trim(txtpwd.Text) Then userID = Combo1.Text
rs_login.Close
Unload Me
form1.Show
Else
MsgBox "密码不正确", vbOKOnly + vbExclamation, "" txtpwd.SetFocus
End If
你可能喜欢
- 图书馆管理信息系统课程设计
- 数据库课程设计图书馆管理系统
- C语言课程设计图书管理系统
- 图书馆管理系统设计
- 图书管理系统代码设计
- C语言图书管理系统代码
- java图书管理系统课程设计
- 图书馆信息管理系统
- 基于C++的图书馆管理信息系统的设计与开发》课程设计13页
- 图书馆信息管理系统课程设计报告35页
- 图书馆管理信息系统课程设计报告模板5页
- 图书馆管理信息系统课程设计221220页
- 图书馆管理信息系统课程设计报告24页
- 图书馆管理信息系统课程设计12页
- 数据库课程设计-高校图书馆管理系统管理系统41页
- 数据库课程设计(图书馆管理系统)16页
- 数据库课程设计-图书馆管理系统30页
- 数据库课程设计_图书馆管理系统21页
- 数据库课程设计-高校图书馆管理系统管理系统40页
- SQLserver图书馆管理系统数据库课程设计说明书12页
- C语言课程设计—图书管理系统11页
- C语言课程设计图书管理系统23页
- 课程设计要用用C语言编写的图书管管理系统6页
- C语言图书管理系统课程设计报告 - 副本25页
- C语言图书馆管理系统课程设计19页
- C语言课程设计-图书信息管理系统43页
- 人民医院图书馆管理系统的设计与实现40页
- Delphi+SQL 图书馆管理系统的设计与实现23页
- 图书馆管理系统设计报告137页
- 数据库设计关于图书馆管理系统的设计(有完整代码)[1]25页
- 浅谈基于VF的高校图书馆管理系统的分析与设计3页
- 学校图书馆管理系统的设计与实现3页
- 数据库设计关于图书馆管理系统的设计(有完整代码)[1]25页
- oracle__图书管理系统__E-R图设计__源代码4页
- C语言程序设计(图书管理系统)源代码 倾情奉献29页
- 软件设计案例实验二图书管理系统详细设计以及编 写代码11页
- 图书管理信息系统C++课程设计代码17页
- C++课程设计---图书信息管理系统设计源代码 (2)7页
- C语言实现图书管理系统代码11页
- C语言图书管理系统代码28页
- C语言程序设计(图书管理系统)源代码 倾情奉献29页
- C语言 图书信息管理系统 最终源代码38页
- 图书管理系统源代码--纯C语言8页
- 图书管理系统C语言代码3页
