关于用户名密码检验的问题

[wonderwin]

各位大侠帮帮忙
我用vb.net做登录界面中关于用户名密码检验时碰到了一个错误，各位帮忙解决一下！
谢谢啊！


Dim connStr As String = "SELECT username,userpsw FROM user"
Dim myConn As New SqlConnection(connectstring)
Dim myCommand As New SqlCommand(connStr, myConn)
myConn.Open()
Dim myReader As SqlDataReader
myReader = myCommand.ExecuteReader(CommandBehavior.CloseConnection)

运行后 myReader = myCommand.ExecuteReader(CommandBehavior.CloseConnection)出现了


未处理的“System.Data.SqlClient.SqlException”类型的异常出现在 system.windows.forms.dll 中。

其他信息: 系统错误。


请问是什么错误？
怎么解决？
谢谢哦！

[hamadou]

使用try
Dim connStr As String = "SELECT username,userpsw FROM user"
Dim myConn As New SqlConnection(connectstring)
Dim myCommand As New SqlCommand(connStr, myConn)
myConn.Open()
Dim myReader As SqlDataReader
myReader = myCommand.ExecuteReader(CommandBehavior.CloseConnection)

catch ex as excaption
msgbox(ex.messge)
finally
mycon.close()
end try
来看看报错信息！

[Night_Elf]

CommandBehavior.CloseConnection是什么呀？ExecuteReader怎么会有这么一个参数呢！

[wonderwin]

mycon.close()为什么不能关闭呀？

[wonderwin]

报的就是

未处理的“System.Data.SqlClient.SqlException”类型的异常出现在 system.windows.forms.dll 中。
其他信息: 系统错误。

这个错误呀！

[beijingbeerman]

楼主完全写错了！
Dim sql As String = "SELECT username,userpsw FROM user"
Dim myConn As New SqlConnection(connectstring)
myConn.Open()

Dim myCommand As New SqlCommand(sql, myConn)
Dim myReader As SqlDataReader
myReader = myCommand.ExecuteReader(CommandBehavior.CloseConnection)

[hamadou]

呵呵，不好意思，忘记关闭mydatareader了。
CommandBehavior.CloseConnection参数的意思是：在执行该命令时，如果关闭关联的 DataReader 对象，则关联的 Connection 对象也将关闭。
看看是不是 Dim myConn As New SqlConnection(connectstring)中的连接字符串有问题啊？

[捏造的信仰]

注意用户明或者密码中是否有特殊字符干扰了SQL语句。

[wonderwin]

Try
Dim connStr As String = "SELECT username,userpsw FROM user"
Dim myConn As New SqlConnection(connectstring)
myConn.Open()
Dim myCommand As New SqlCommand(connStr, myConn)
'Dim cmd As New SqlCommand
Dim myReader As SqlDataReader
myReader = myCommand.ExecuteReader(CommandBehavior.CloseConnection)


Catch ex As Exception
MsgBox("")

End Try
myReader.Close()
mycon.close()



这样吗？
可是
myReader.Close()
mycon.close()
都是错的呀！

[hamadou]

将catch ex As Exception 中报错语句加上看看报什么样的错！
MsgBox(ex.message)

[youlongzaitian]

Try
Dim connStr As String = "SELECT username,userpsw FROM user"
Dim myConn As New SqlConnection(connectstring)
myConn.Open()
Dim myCommand As New SqlCommand(connStr, myConn)
'Dim cmd As New SqlCommand
Dim myReader As SqlDataReader
myReader = myCommand.ExecuteReader(CommandBehavior.CloseConnection)


Catch ex As Exception
MsgBox("")
Finaly
myReader.Close()
mycon.close()
End Try



这样再看看，单步走，看看到底报什么错误！

[3tzjq]

注意这里(user 是SQL保留字)：
Dim connStr As String = "SELECT username,userpsw FROM [user]"

[hamadou]

呵呵，楼上说的对！user是保留字，没仔细看啊，呵呵。保留字加上[]就好。

[wonderwin]

那用这样
Dim connStr As String = "SELECT username,userpsw FROM [user] where username=" & username & " and userpsw=" & userpsw & ""

行不行呀？
如果语法没有错误

[wonderwin]

解决了
我的第一个ｖｂ．ｎｅｔ的程序终于完成了
感谢这几天各位对我的帮助
可用分有限，希望大家见谅！