UC知道asp.net连接不是数据库的问题
来源：百度知道 编辑：UC知道 时间：2024/07/03 08:02:54
Private Sub btnSubmit_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnSubmit.Click
If Page.IsValid Then
Dim conStr As String
conStr = "Server=(local);Database=StudentVB;User ID=sa;Password=sa;"
Dim objConnection As New SqlConnection(conStr)
Dim strsql As String = "Select UserID ,Password,UserType From tblUsers" & "Where LoginName='" & Trim(txtName.Text) & "'"
Dim objCmd As New SqlCommand
Dim objReader As SqlDataReader
Try
objConnection.Open()
objReader = objCmd.ExecuteReader
If objReader.Read() Then
If objReader.Read() = Trim(txtPassword.Text) Then
Session("UserName") = Trim(txtName.Text)
Response.Redirect("Scores.aspx"
If Page.IsValid Then
Dim conStr As String
conStr = "Server=(local);Database=StudentVB;User ID=sa;Password=sa;"
Dim objConnection As New SqlConnection(conStr)
Dim strsql As String = "Select UserID ,Password,UserType From tblUsers" & "Where LoginName='" & Trim(txtName.Text) & "'"
Dim objCmd As New SqlCommand
Dim objReader As SqlDataReader
Try
objConnection.Open()
objReader = objCmd.ExecuteReader
If objReader.Read() Then
If objReader.Read() = Trim(txtPassword.Text) Then
Session("UserName") = Trim(txtName.Text)
Response.Redirect("Scores.aspx"
从整体上来判断，首先：建议断点调试到objConnection.Open()这句，看看是否能打开连接，如果能，说明你建立连接是成立了，排除未连接上SQL
看了下你的代码，strsql 拼好的SQL语句，并没有付给objCmd.CommandText
是不是
Dim strsql As String = "Select UserID ,Password,UserType From tblUsers" & "Where LoginName='" & Trim(txtName.Text) & "'"
这里边的tblUsers" & "Where 多了" & "这几个字符啊
把" & "删了试试看~！（tblUsers Where ）