标题：移动端判断提示错误

11楼

xuzihang 发表于：2024/5/18 17:01:00

dr1是客户表雇主识别用户身份的用的微信

Dim Verified As Boolean

Dim dr1 As DataRow = DataTables("雇主").SQLFind("openid ='" & Openid & "'")

If OpenId > "" AndAlso dr1 IsNot Nothing AndAlso dr1("permit") = False Then'授权成功

' msgbox("Verified", 64, "提示")

Verified = True

[此贴子已经被作者于2024/5/18 17:10:07编辑过]

12楼

xuzihang 发表于：2024/5/18 17:04:00

Dim dr As DataRow = DataTables("雇主").SQLFind("openid ='" & Openid & "'")

---------------------------------------------

dr如上 dr1 有点重复了一个表

共12 条记录, 每页显示 10 条, 页签: [1] [2]