VB.NET ExecuteNonQuery 怎么用,返回总是0
DimDBConnectionStrAsString="Provider=Microsoft.Jet.OLEDB.4.0;DataSource=|DataDirector...
Dim DBConnectionStr As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\StudentManage.mdb"
Dim objConn As New OleDb.OleDbConnection
objConn.ConnectionString = DBConnectionStr
Dim sqlpassword As String = password.Text.Trim()
Dim sqlusername As String = username.Text.Trim()
objConn.Open()
Dim command As OleDb.OleDbCommand = New OleDb.OleDbCommand("select * from [user] where username='" & username.Text & "' and password='" & password.Text & "'", objConn)
'where username='" & sqlusername & "' and password='" & sqlpassword & "'", objConn)
Dim n As Integer
n = command.ExecuteNonQuery()
MsgBox(n, , "登陆")
If n = 0 Then
MsgBox("登陆失败", , "登陆")
Else
MsgBox("登陆成功", , "登陆")
End If
objConn_lixingang.Close()
无论输入什么不管数据库中有还是没有都是0,求大神解! 展开
Dim objConn As New OleDb.OleDbConnection
objConn.ConnectionString = DBConnectionStr
Dim sqlpassword As String = password.Text.Trim()
Dim sqlusername As String = username.Text.Trim()
objConn.Open()
Dim command As OleDb.OleDbCommand = New OleDb.OleDbCommand("select * from [user] where username='" & username.Text & "' and password='" & password.Text & "'", objConn)
'where username='" & sqlusername & "' and password='" & sqlpassword & "'", objConn)
Dim n As Integer
n = command.ExecuteNonQuery()
MsgBox(n, , "登陆")
If n = 0 Then
MsgBox("登陆失败", , "登陆")
Else
MsgBox("登陆成功", , "登陆")
End If
objConn_lixingang.Close()
无论输入什么不管数据库中有还是没有都是0,求大神解! 展开
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询