帮忙看段代码!!
Dim conn As SqlConnection
conn = New SqlConnection()
conn.ConnectionString = "server=10.255.250.31;uid=lixu;pwd=1981618;database=asp.net"
conn.Open()
Dim cmd As SqlCommand
cmd = New SqlCommand("select * from user where name='" & Trim(name.Text) & "'", conn)
Dim da As SqlDataReader
da = cmd.ExecuteReader()
Dim temp1 As String, temp2 As String
temp1 = da.Item("name")
temp2 = da.Item("password")
If temp1 = "" And temp1 = "" Then
Dim a As String = MsgBox("您不是管理员!", , "系统提示!")
Exit Sub
End If
提示
da = cmd.ExecuteReader()错误 怎么改呀!!