登录验证其怪问题求助
各位大大,小弟今天遇到一个问题,实在无法解决。
希望借助这段代码，连接到SQLServer2005 读取预置用户数据库，读取验证信息。但无论如何修改代码和数据类型，程序都不执行
Page.Response.Write("<script>alert('欢迎回来！')</script>")
用附加代码单独比较了myRow.Item("Password").ToString 与 txtCode.Text 的值，一样的，但是程序就是判定它们不是一样，就是不执行。这到底是为什么啊？


代码如下：
Imports System.Data
Imports System.Data.SqlClient
Partial Class _验证
Inherits System.Web.UI.Page

Protected myDataSet As New DataSet
Protected myDataAdapter As New SqlDataAdapter
Protected myConnection As New SqlConnection("SERVER=Bryan-Vaio;DATABASE=测试;Integrated Security=SSPI")


Protected Sub btnOk_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnOk.Click

Try

myDataAdapter.SelectCommand = New SqlCommand
myDataAdapter.SelectCommand.Connection = myConnection
myDataAdapter.SelectCommand.CommandType = CommandType.Text
myDataAdapter.SelectCommand.CommandText = "SELECT Top 1 PassWord FROM 登陆 Where Name=" + "'" + txtID.Text + "'"

myConnection.Open()
myDataAdapter.Fill(myDataSet, "登陆")
myConnection.Close()

Dim myRow As DataRow
myRow=myDataSet.Tables("登陆").Rows(0)

If myRow.Item("Password").ToString=txtCode.Text Then
Page.Response.Write("<script>alert('欢迎回来！')</script>")
Else
Page.Response.Write("<script>alert('密码错误！')</script>")
End If


Page.Response.Write(myRow.Item("Password").ToString)
Catch ex As Exception
Page.Response.Write("<script>alert('用户名不存在！')</script>")

End Try


End Sub

Protected Sub btnChange_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnChange.Click
txtID.Text = ""
txtCode.Text = ""
End Sub
End Class

[解决办法]
试一下跟踪myRow.Item("Password").ToString 与 txtCode.Text 的值分别是多少再想想问题出哪.
代码米看出问题.

另外, BASIC代码看着头痛.