Foxtable(狐表)用户栏目专家坐堂 → 导入


  共有1567人关注过本帖树形打印复制链接

主题:导入

帅哥哟,离线,有人找我吗?
有点色
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/3/31 14:53:00 [显示全部帖子]

If DataTables("生地报名库").sqlFind("身份证号 = '" & dr1("身份证件号") & "' and  姓名 = '" & dr1("学生姓名") & "'") Is Nothing Then

 

改成

 

If DataTables("生地报名库").Find("身份证号 = '" & dr1("身份证件号") & "' and  姓名 = '" & dr1("学生姓名") & "'") Is Nothing AndAlso DataTables("生地报名库").sqlFind("身份证号 = '" & dr1("身份证件号") & "' and  姓名 = '" & dr1("学生姓名") & "'") Is Nothing Then


 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/3/31 15:03:00 [显示全部帖子]

msgbox("身份证号 = '" & dr1("身份证件号") & "' and  姓名 = '" & dr1("学生姓名") & "'")

 

弹出条件看看,看看是否正常。看是否有特殊字符,比如空格之类的。


 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/3/31 16:06:00 [显示全部帖子]

条件这样生成

 

Dim Filter As String = ""
If dr1.IsNull("身份证件号") Then
    filter &= "身份证号 is Null"
Else
    filter &= "身份证号 = '" & dr1("身份证件号") & "'"
End If

If dr1.IsNull("姓名") Then
    filter &= "姓名 is Null"
Else
    filter &= "姓名 = '" & dr1("学生姓名") & "'"
End If

msgbox(filter)


 回到顶部