以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  我觉得这段代码没有问题,怎么会找不到需要的行  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=88113)

--  作者:天蝉一线
--  发布时间:2016/7/27 11:51:00
--  我觉得这段代码没有问题,怎么会找不到需要的行
Dim dr As DataRow = DataTables("users").Find("yhbm =\'" & e.Form.Controls("useryhbm").text & "\'")
    If dr Is Nothing Then
        Messagebox.show("用户账号错误!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
        e.Form.Controls("Useryhbm").Select
    Else
        e.Form.Controls("userdwmc").value = dr("dwmc")
        e.Form.Controls("username").value = dr("name")
        e.Form.Controls("usergroup").value = dr("group")
        e.Form.Controls("PassWord").Select
    End If


--  作者:大红袍
--  发布时间:2016/7/27 12:13:00
--  
msgbox(e.Form.Controls("useryhbm").text)