以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  根据两列内容登录认证  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=184917)

--  作者:xuzihang
--  发布时间:2023/1/16 11:12:00
--  根据两列内容登录认证
有个设备表,设备第三次接入时候采集设备的 【设备型号】【序列号】,之后接入时候,根据前面两列【设备型号】【序列号】验证,再根据逻辑列是否允许使用
请问老师:采集会了,
1、如何根据两列验证?
2、逻辑列是这样做么:
 if  设备号=*** and 序列号=***  时 
      if 逻辑列= true  
       好用
       end if
 else
  抱歉不能用
end if
是这样的么?

--  作者:有点蓝
--  发布时间:2023/1/16 11:22:00
--  
if  设备号=*** and 序列号=*** and 逻辑列= true    时 
       好用
 else
  抱歉不能用
end if

--  作者:xuzihang
--  发布时间:2023/1/16 14:20:00
--  
Dim XLH As Integer = BriSDKLib.QNV_DevInfo(0, BriSDKLib.QNV_DEVINFO_GETSERIAL)\'电话盒子序列号
    If XLH = Tables("设备登记").Current("序列号") And Tables("设备登记").Current("正常") = True Then
        \'    If e.NewValue = True Then \'而且变动后的值是True(已勾选)
        \'        e.DataRow.Locked = True \'那么锁定此行
        \'    End If
       好用
    else
    End If
老师,代码是在窗口按钮里的怎么写?,If XLH = Tables("设备登记").Current("序列号") And Tables("设备登记").Current("正常") = True Then

--  作者:有点蓝
--  发布时间:2023/1/16 14:27:00
--  
if dataTables("设备登记").find("序列号=\'" & XLH & "\' and 正常=true") isnot nothing then
可以用
else
不可以用


--  作者:xuzihang
--  发布时间:2023/1/16 14:45:00
--  
这么写啊,谢谢