1698 查看 4 回复

主题：想做个内部网站，怎么加登陆状态判断呢？ [收藏主题]

转到：

加为好友 发送消息 空间 | 微博 | 邮件 | QQ号码 用户:songyuanboy 性别:男 积分:718分 威望:384 帖子:40 精华:0 广播:1 粉丝:0 登录次数:104 次 注册时间:2008/3/19 15:23:00 最后登录:2016/3/20 18:28:09 songyuanboy 当前离线 40 主题 1 广播 0 粉丝 级别:学前班 用户积分:718 分 登录次数:104 次 注册时间:2008/3/19 最后登录:2016/3/20	songyuanboy 发表于：2014/2/4 20:18:00   | 只看该作者 查看该作者主题 楼主  有生源 找课程 就上科汛课堂街! 想做个登陆状态判断，如果未登录就跳转到网站首页，怎么加判断，求大家帮忙指点，谢谢
	www.idrollery.com----大笑网 做官网 就用科汛智能建站系统!
	支持(0) | 反对(0) 顶端 底部

加为好友 发送消息 空间 | 微博 | 邮件 | QQ号码 用户:yufeng4301 性别:男 积分:76分 威望:78 帖子:38 精华:0 广播:2 粉丝:0 登录次数:33 次 注册时间:2013/9/24 17:48:29 最后登录:2015/6/9 10:09:29 yufeng4301 当前离线 38 主题 2 广播 0 粉丝 级别:学前班 用户积分:76 分 登录次数:33 次 注册时间:2013/9/24 最后登录:2015/6/9	yufeng4301 发表于：2014/2/4 21:09:41   | 只看该作者 查看该作者主题 沙发  有生源 找课程 就上科汛课堂街! 问题比较实用，可惜我不会。
	做官网 就用科汛智能建站系统!
	支持(0) | 反对(0) 顶端 底部

加为好友 发送消息 空间 | 微博 | 邮件 | QQ号码 用户:无风 性别:男 积分:5963分 威望:6257 帖子:1622 精华:12 广播:5 粉丝:29 登录次数:199 次 注册时间:2009/10/12 13:36:00 最后登录:2024/4/4 10:34:25 无风 当前离线 1622 主题 5 广播 29 粉丝 级别:高一年 用户积分:5963 分 登录次数:199 次 注册时间:2009/10/12 最后登录:2024/4/4	无风 发表于：2014/2/5 11:58:59   | 只看该作者 查看该作者主题 藤椅  有课程 找生源 就上科汛课堂街 老版本代码，仅供参考 复制代码 <!--#include file="Conn.asp"--> <!--#include file="KS_Cls/Kesion.MemberCls.asp"--> <% '---------------------------------------- '判断用户是否登录  调用方式：<script language="javascript" type="text/javascript" src="GetQikanPrice.asp?id={$Field(id,Num,0,2)}"></script > '---------------------------------------- Dim KS:Set KS=New PublicCls Dim KSUser:Set KSUser=New UserCls Dim UserLoginTF:UserLoginTF=KSUser.UserLoginChecked Dim RS,SqlStr,id,qkmoney id=Trim(Request("id")) IF Cbool(KSUser.UserLoginChecked)=false Then        qkmoney = "<a href=""javascript:ShowLogin();""><font color=red>请登录查看</font></a>" Else         SqlStr = "select qkmoney from qikan where rec=1 and id ="&id         Set RS = Server.CreateObject("ADODB.Recordset")         RS.Open SqlStr, conn, 1, 1         If Not RS.bof  Then               qkmoney = "<span>"&rs("qkmoney") & "</span>元"        End If     rs.close        set rs = nothing End If       Response.Write "document.write('" & qkmoney & "');"       Response.Write "document.write('<script src=""" & KS.Setting(3) & "ks_inc/kesion.box.js"" language=""JavaScript""></script>');" %> function ShowLogin() { new KesionPopup().popupIframe('会员登录','<%=KS.Setting(3)%>user/userlogin.asp?Action=Poplogin',397,184,'no'); } <% Call CloseConn() Set KS=Nothing %>
	做官网 就用科汛智能建站系统!
	支持(0) | 反对(0) 顶端 底部

加为好友 发送消息 空间 | 微博 | 邮件 | QQ号码 用户:ks1w 性别:女 积分:14338分 威望:14687 帖子:2796 精华:3 广播:4 粉丝:1 登录次数:665 次 注册时间:2006/11/3 15:35:00 最后登录:2019/7/26 13:32:28 ks1w 当前离线 2796 主题 4 广播 1 粉丝 级别:大一 用户积分:14338 分 登录次数:665 次 注册时间:2006/11/3 最后登录:2019/7/26	ks1w 发表于：2014/2/5 12:27:54   | 只看该作者 查看该作者主题 板凳  一分钟快速开通线上知识店铺 有二次开发的示例代码的。
	有课程 找生源 就上科汛课堂街
	支持(0) | 反对(0) 顶端 底部

加为好友 发送消息 空间 | 微博 | 邮件 | QQ号码 用户:songyuanboy 性别:男 积分:718分 威望:384 帖子:40 精华:0 广播:1 粉丝:0 登录次数:104 次 注册时间:2008/3/19 15:23:00 最后登录:2016/3/20 18:28:09 songyuanboy 当前离线 40 主题 1 广播 0 粉丝 级别:学前班 用户积分:718 分 登录次数:104 次 注册时间:2008/3/19 最后登录:2016/3/20	songyuanboy 发表于：2014/2/5 18:36:19   | 只看该作者 查看该作者主题 报纸  有生源 找课程 就上科汛课堂街! 解决了，谢谢大家。
	有课程 找生源 就上科汛课堂街
	支持(0) | 反对(0) 顶端 底部

＜上一主题 | 下一主题 ＞

<< 返回列表 首 页 1