Foxtable(狐表) → 用户栏目 → 专家坐堂 → 符合条件后自动跳转怎么写？


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

主题：符合条件后自动跳转怎么写？
帅哥哟，离线，有人找我吗？
南望
 小大  91楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：391 积分：3290 威望：0 精华：0 注册：2014/4/9 10:04:00 		  发帖心情 Post By：2021/3/18 21:11:00 [只看该作者]

明白了，那两个字段如何比较呢？就是htmname字段的值不等于guest字段的值
Dim dr2 As DataRow = DataTables("GrantTable").SqlFind("HtmName ='" & e.path & "'") 

if dr2 isnot nothing andalso dr2("HtmName")<>dr2("guest")  
 回到顶部
帅哥，在线噢！
有点蓝
 小大  92楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：106242 积分：540333 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/3/18 21:27:00 [只看该作者]

就是这样比较

 回到顶部
帅哥哟，离线，有人找我吗？
南望
 小大  93楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：391 积分：3290 威望：0 精华：0 注册：2014/4/9 10:04:00 		  发帖心情 Post By：2021/3/18 21:34:00 [只看该作者]

 If openid <>useropenid  Then
    Dim dr2 As DataRow = DataTables("GrantTable").SqlFind("HtmName ='" & e.path & "'") '根据openid找出对应的行
     If  dr2 IsNot Nothing AndAlso dr2("HtmName")<>dr2("guest")   Then
            msgbox(这个条件始终满足不了？)
            wb.InsertHTML("<meta http-equiv='Refresh' c>")
        End If
        e.WriteString(wb.Build) '在用户浏览器显示错误信息
        Return
 回到顶部
帅哥哟，离线，有人找我吗？
南望
 小大  94楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：391 积分：3290 威望：0 精华：0 注册：2014/4/9 10:04:00 		  发帖心情 Post By：2021/3/18 21:42:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下：2021-03-18_214118.png
图片点击可在新窗口打开查看
 回到顶部
帅哥，在线噢！
有点蓝
 小大  95楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：106242 积分：540333 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/3/18 21:55:00 [只看该作者]

表格里数据是相等的吧，代码里判断的是不等

 回到顶部
帅哥哟，离线，有人找我吗？
南望
 小大  96楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：391 积分：3290 威望：0 精华：0 注册：2014/4/9 10:04:00 		  发帖心情 Post By：2021/3/18 22:11:00 [只看该作者]

主要就是想让他过滤掉两个相等的，碰到相等的就不执行那个跳转。这样listfee.htm是不是就可以实现正常跳转了？

 回到顶部
帅哥，在线噢！
有点蓝
 小大  97楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：106242 积分：540333 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/3/18 22:14:00 [只看该作者]

    Dim dr2 As DataRow = DataTables("GrantTable").SqlFind("HtmName ='" & e.path & "' and HtmName <> guest") '根据openid找出对应的行
     If  dr2 IsNot Nothing Then
 回到顶部
帅哥哟，离线，有人找我吗？
南望
 小大  98楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：391 积分：3290 威望：0 精华：0 注册：2014/4/9 10:04:00 		  发帖心情 Post By：2021/3/19 11:36:00 [只看该作者]

苹果手机关掉微信cookies即被清空，而华为手机的微信关掉后cookies仍然没有清空，导致代码不能执行授权链接的语句，请问老师有什么办法？

Else
    UserName = e.Cookies("username") '
    OpenID = e.Cookies("openid")
    msgbox(6)
    If userName = "" OrElse OpenID = "" Then
   腾讯授权链接
 回到顶部
帅哥，在线噢！
有点蓝
 小大  99楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：106242 积分：540333 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/3/19 11:52:00 [只看该作者]

只是关闭微信，还是退出微信登录？如果只是关闭微信，有什么关系？反正都是同一个微信账号，cookies没有清空，说明已经授权过，也没有必要重新授权

 回到顶部
帅哥哟，离线，有人找我吗？
wh420
 小大  100楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1107 积分：10562 威望：0 精华：0 注册：2014/2/19 16:32:00 		  发帖心情 Post By：2021/3/19 12:39:00 [只看该作者]

关闭微信了，当wxuser表没有该微信信息时，如果判断usename不为空wuser表就不创新建信息啊

 回到顶部
总数 102 1.. 上一页 2 3 4 5 6 7 8 9 10 11 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04401 秒, 4 次数据查询