老师,关于下面这个验证成功之后如何跳转到我点击的网址,而不是固定的首页?
比如别人发给我一个网址,然后我的登陆过期了,需要重新登陆,我点击网址之后进行登陆,登陆完直接跳转到链接上的地址,而不是固定的首页?
Else
'其它页面从Cookie提取登录信息进行验证
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