Java抽象工厂模式抽象工厂模式( 三 )

'******创建人：毕桃杨
'******创建时间：2012年5月4日
'******说明：数据表User的接口类
''' summary
''' User数据表接口
''' /summary
''' remarks/remarks
'''
Public Interface IUser
''' summary
''' 查询用户
''' /summary
''' param name="userInfo"实体类/param
''' returns返回记录集/returns
''' remarks/remarks
Function SelcetUser(ByVal userInfo As Entity.UserInfo) As DataSet
''' summary
''' 修改密码
''' /summary
''' param name="userInfo"实体类/param
''' returns是否修改成功/returns
''' remarks/remarks
Function ModifyPwd(ByVal userInfo As Entity.UserInfo) As Boolean
''' summary
''' 添加用户
''' /summary
''' param name="userInfo"实体类/param
''' returns是否添加成功/returns
''' remarks/remarks
Function AddUser(ByVal userInfo As Entity.UserInfo) As Boolean
''' summary
''' 删除用户
''' /summary
''' param name="userInfo"实体类/param
''' returns是否删除成功/returns
''' remarks/remarks
Function DeleteUser(ByVal userInfo As Entity.UserInfo) As Boolean
''' summary
''' 根据用户等级查询用户
''' /summary
''' param name="userInfo"实体类/param
''' returns返回记录集/returns
''' remarks/remarks
Function SelectLevel(ByVal userInfo As Entity.UserInfo) As DataSet
''' summary
''' 只是根据用户名查询用户信息
''' /summary
''' param name="userInfo"实体类/param
''' returns返回记录集/returns
''' remarks/remarks
Function QueryUser(ByVal userInfo As Entity.UserInfo) As DataSet
End Interface
DAL层IUser实现类：
'******类名：SqlUser
'******创建人：毕桃杨
'******创建时间：2012年5月6日
'****** 说明：数据表SqlUser的操作类
Option Explicit On
Option Strict On
Imports System.Data'引用类库
Imports System.Data.SqlClient
Imports IDAL
Imports Entity
''' summary
''' DAL—User操作类
''' /summary
''' remarks/remarks
Public Class SqlUser
Implements IDAL.IUser'实现I_user接口
''' summary
''' 添加用户
''' /summary
''' param name="userInfo"实体类/param
''' returns返回是否添加用户成功/returns
''' remarks/remarks
Public Function AddUser(ByVal userInfo As Entity.UserInfo) As Boolean Implements IDAL.IUser.AddUser
Dim btn As Boolean = False'是否成功标志
Dim sqlHelper As New SQLHelper()'助手类
Dim strSQL As String'SQL字符串
Dim i As Integer'受影响的行数
'参数集合
Dim paras As SqlParameter()
paras = New SqlParameter() {New SqlParameter("@userID", userInfo.userID),
New SqlParameter("@u_password", userInfo.u_password),
New SqlParameter("@u_level", userInfo.u_level),
New SqlParameter("@u_operator", userInfo.u_operator)
}
'SQL语句
strSQL = "insert into D_sqlUser (userID,u_password,u_level,u_operator)" _
"values(@userID,@u_password,@u_level,@u_operator)"
'执行带参数的过程
i = sqlHelper.ExecuteNonQuery(strSQL, paras, CommandType.Text)
If i0 Then
btn = True
End If
Return btn
End Function
''' summary
''' 删除用户
''' /summary
''' param name="userInfo"实体类/param
''' returns是否删除成功/returns
''' remarks/remarks
Public Function DeleteUser(ByVal userInfo As Entity.UserInfo) As Boolean Implements IDAL.IUser.DeleteUser
Dim strSQL As String'sql字符串
Dim i As Integer'受影响的行数
Dim btn As Boolean = False'是否成功标志
Dim sqlHelper As New SQLHelper'SQL助手类
Dim strUserId As String'用户名
strUserId = userInfo.userID'获取实体类的用户名
'删除用户sql语句
strSQL = "delete from D_sqlStudentInfo where userID ='"Trim(strUserId)"'"
i = sqlHelper.ExecuteNonQuery(strSQL, CommandType.Text)
If i0 Then
btn = True'成功
End If
Return btn
End Function
''' summary
''' sql实现查询用户
''' /summary
''' param name="userInfo"实体类/param
''' returns返回记录集/returns
''' remarks/remarks
Public Function SelcetUser(ByVal userInfo As Entity.UserInfo) As System.Data.DataSet Implements IDAL.IUser.SelcetUser
Dim strUserID As String'用户名存储
Dim strPWD As String'用户密码存储
Dim queryString As String'SQL查询语句
Dim sqlHelper As SQLHelper = New SQLHelper()
'从实体类获取用户名和密码
strUserID = userInfo.userID
strPWD = userInfo.u_password
'查询SQL语句
queryString = "SELECT * FROM D_sqlUser WHERE userID ='"Trim(strUserID)"'""AND u_password ='"strPWD"'"

Java抽象工厂模式 抽象工厂模式( 三 )

秒懂生活扩展阅读

Java抽象工厂模式抽象工厂模式( 三 )