文档介绍：软件开发环境与工具
实验报告
实验二
实验题目: 用户登录
指导老师：王琦
专业班级:计算机科学与技术系1102班
姓 名:张松（2011100221）
2013年 11月18日
软件开发环境与工具
实验报告
实验二
实验题目: 用户登录
指导老师：王琦
专业班级:计算机科学与技术系1102班
姓 名:张松（2011100221）
2013年 11月18日
实验类型__验证__ 实验室_软件实验室三_
一、实验题目
用户管理及登录程序设计
实验目的
通过本次实验，进一步掌握 ，，并利用 ，采用分层架构，实现一个完整的用户管理及登录程序。两种连接方式。
三、实验功能要求
实验功能要求：
1、实现对用户的各种管理，包括新增、修改、删除、停用、启用、重置密码、查询等。
2、实现完整的用户登录系统。
3、对敏感数据进行加密处理。
4、。
四、实验步骤：
本实验使用了SQL Server作为程序的后台数据库，程序中使用了各种常
窗口，每个模块更加独立，完成特定的功能.
： 登录代码：
Public Class 登陆系统
Dim o As New
Private Sub btndenglu_Click(ByVal sender As , ByVal e As ) Handles
Dim constr As String 定义要连接的数据库
constr = "data source=.;initial catalog=gg_User;userid=sa;
password="
= constr
() 打开数据库
Dim sqlcom As New
= "select * from gg_user where user_name='" & & " ' and user_pwd='" & & " ' "
= sqlcon
Dim myds As New DataSet
Dim myadpter As New
= sqlcom
(myds, "temp")
If ("temp"). = 0 Then
MsgBox("登录失败")
Else
MsgBox("登陆成功")
()
()
End If