以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 如何跳转到点击的网址 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=145783) |
-- 作者:lxhmax -- 发布时间:2020/2/7 10:15:00 -- 如何跳转到点击的网址 老师,关于下面这个验证成功之后如何跳转到我点击的网址,而不是固定的首页? 比如别人发给我一个网址,然后我的登陆过期了,需要重新登陆,我点击网址之后进行登陆,登陆完直接跳转到链接上的地址,而不是固定的首页? UserName = e.Cookies("username") \'从cookie中获取用户名 UserID = e.Cookies("userid") \'从cookie中获取 随机ID Dim dr As DataRow = UserTable.Find("UserName = \'" & UserName & "\'") If dr IsNot Nothing AndAlso dr("UserID") = UserID Then \'如果通过验证,更新活动时候,继续访问其它页面. dr("ActiveTime") = Date.Now \'更新活动时间 Else \'如果验证失败 wb.InsertHTML("<meta http-equiv=\'Refresh\' c>") \'那么直接跳转到登录页面 e.WriteString(wb.Build) \'生成网页 Return \'必须的 End If End If |
-- 作者:有点蓝 -- 发布时间:2020/2/7 11:05:00 -- 参考:http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=102550&skin=0 |