以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 字符串比对 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=110792) |
-- 作者:Rhonin -- 发布时间:2017/12/9 16:16:00 -- 字符串比对 老师好,请问一下怎样判断textbox控件的值和表里某一列的值是否相等,如果不相等的话输出一个msg,相等则无操作 Dim n1 As String = e.form.controls("textbox1").value Dim n2 As String = e.form.controls("textbox2").value For Each r As Row In Tables("修改密码_table1").Rows \'Dim r1 As String = r("name") Dim fdr As DataRow = DataTables("Users").Find("name = \'" & n1 & "\'") If fdr("password")=n2 Then Else messagebox.show("您输入的密码错误") End If Next 这个代码执行的话就是无论对错都会一直提示msg,请问下老师错在哪里,应该怎么修改
|
-- 作者:有点蓝 -- 发布时间:2017/12/9 16:35:00 -- Dim n1 As String = e.form.controls("textbox1").value Dim n2 As String = e.form.controls("textbox2").value Dim fdr As DataRow = DataTables("Users").Find("name = \'" & n1 & "\'") If fdr Is Nothing messagebox.show("无此用户") ElseIf fdr("password")=n2 Then Else messagebox.show("您输入的密码错误") End If |