2114 查看 3 回复

主题：[求助]企业空间的导航我要增加一个判断语句，可是加上后不起作用 [收藏主题]

转到：

加为好友 发送消息 空间 | 微博 | 邮件 | QQ号码 用户:nphsq 性别:女 积分:246分 威望:94 帖子:28 精华:0 广播:0 粉丝:0 登录次数:16 次 注册时间:2006/7/18 22:57:00 最后登录:2011/7/15 20:43:10 nphsq 当前离线 28 主题 0 广播 0 粉丝 级别:学前班 用户积分:246 分 登录次数:16 次 注册时间:2006/7/18 最后登录:2011/7/15	nphsq 发表于：2011/5/28 16:41:45   | 只看该作者 查看该作者主题 楼主  做线上考试培训 就选#科汛网校 复制代码 Function ReplaceMenu() Dim HomeUrl,BlogUrl,MessageUrl,ProductUrl,IntroUrl,NewsUrl,JobUrl,RyzsUrl Dim AlbumUrl,GroupUrl,FriendUrl,XXUrl,InfoUrl,FreshUrl If KS.SSetting(21)="1" Then If Not KS.IsNul(Domain) Then If Instr(Domain,".")<>0 Then HomeUrl = "http://" & domain Else HomeUrl = "http://" & domain &"." & KS.SSetting(16) End If Else HomeUrl ="" & userid End If BlogUrl = "blog-" & userid MessageUrl= "message-"&userid ProductUrl= "product-"&userid IntroUrl = "intro-" &userid NewsUrl = "news-" & userid JobUrl = "job-" & userid RyzsUrl = "ryzs-" &userid AlbumUrl = "album-" & userid GroupUrl = "group-" & userid FriendUrl = "friend-" & userid XXUrl = "xx-" & userid InfoUrl = "info-" & userid FreshUrl = "fresh-" & userid Else HomeUrl = "../space/?" & userid BlogUrl = "../space/?" & userid & "/blog" MessageUrl= "../space/?" & userid & "/message" ProductUrl= "../space/?" & userid & "/product" IntroUrl = "../space/?" & userid & "/intro" NewsUrl = "../space/?" & userid &"/news" JobUrl = "../space/?" & userid & "/job" RyzsUrl = "../space/?" & userid & "/ryzs" AlbumUrl = "../space/?" & userid & "/album" GroupUrl = "../space/?" & userid & "/group" FriendUrl = "../space/?" & userid & "/friend" XXUrl = "../space/?" & userid & "/xx" InfoUrl = "../space/?" & userid & "/info" FreshUrl = "../space/?" & userid & "/fresh" End If if conn.execute("Select top 1 username From KS_enterprise Where UserName='" & UserName & "'").eof Then ReplaceMenu="<div id=""Menu"">"_ & "<ul>"_ &" <li><a href=""" & HomeUrl & """>首页</a></li>"_ &" <li><a href=""" & FreshUrl & """>新鲜事</a></li>"_ &" <li><a href=""" & BlogUrl & """>博文</a></li>"_ &" <li><a href=""" & AlbumUrl & """>相册</a></li>"_ &" <li><a href=""" & GroupUrl & """>圈子</a></li>" _ &" <li><a href=""" & FriendUrl & """>好友</a></li>"_ &" <li><a href=""" & XXUrl & """>文集</a></li>"_ &" <li><a href=""" & InfoUrl & """>小档案</a></li>"_ &" <li><a href=""" & MessageUrl & """>留言板</a>"_ &"</ul>"_ &"</div>" Else if conn.execute("Select top 1 ClassID From KS_enterprise Where ClassID=1").eof Then ReplaceMenu="<div id=""Menu"">"_ & "<ul>"_ &" <li><a href=""" & HomeUrl & """>首页</a></li>"_ &" <li><a href=""" & introUrl & """ title=""公司简介"">企业简介</a></li>"_ &" <li><a href=""" & NewsUrl & """ title=""公司动态"">企业新闻</a></li>"_ &" <li><a href=""" & JobUrl & """ title=""公司招聘"">人才招聘</a></li>"_ &" <li><a href=""" & AlbumUrl & """ title=""公司相册"">成功案例</a></li>"_ &" <li><a href=""" & ryzsurl & """ title=""公司证书"">荣誉证书</a></li>"_ &" <li><a href=""" & InfoUrl & """>联系我们</a></li>"_ &" <li><a href=""" & MessageUrl & """>留言板</a>"_ &"</ul>"_ &"</div>" Else ReplaceMenu="<div id=""Menu"">"_ & "<ul>"_ &" <li><a href=""" & HomeUrl & """>首页</a></li>"_ &" <li><a href=""" & introUrl & """ title=""公司简介"">企业简介</a></li>"_ &" <li><a href=""" & NewsUrl & """ title=""公司动态"">企业新闻</a></li>"_ &" <li><a href=""" & ProductUrl & """ title=""产品展示"">产品展示</a></li>"_ &" <li><a href=""" & JobUrl & """ title=""公司招聘"">人才招聘</a></li>"_ &" <li><a href=""" & AlbumUrl & """ title=""公司相册"">成功案例</a></li>"_ &" <li><a href=""" & ryzsurl & """ title=""公司证书"">荣誉证书</a></li>"_ &" <li><a href=""" & InfoUrl & """>联系我们</a></li>"_ &" <li><a href=""" & MessageUrl & """>留言板</a>"_ &"</ul>"_ &"</div>" End If End If End Function 整段就是这样的，我在判断是否为企业空间后，加了一个条件，根据行业判断不同的导航，可是怎么判断都是后者。麻烦各位老大帮忙看看。
	有课程 找生源 就上科汛课堂街
	支持(4) | 反对(4) 顶端 底部

加为好友 发送消息 空间 | 微博 | 邮件 | QQ号码 用户:qq275505419 性别:女 积分:491分 威望:898 帖子:299 精华:0 广播:0 粉丝:0 登录次数:36 次 注册时间:2010/10/5 15:43:08 最后登录:2012/11/13 22:02:06 qq275505419 当前离线 299 主题 0 广播 0 粉丝 级别:二年级 用户积分:491 分 登录次数:36 次 注册时间:2010/10/5 最后登录:2012/11/13	qq275505419 发表于：2011/5/28 20:37:16   | 只看该作者 查看该作者主题 沙发  有课程 找生源 就上科汛课堂街 学习下】】
	痘印怎么消除[/url]http://www.xnqdh.com/ 如何瘦大腿[/url]http://www.lijishou.info/ 英语四级词汇[/url]http://www.wxtguanwang.com/ 羊奶粉排行榜[/url]http://www.52ynf.com/ 海珥玛[/url]http://www.haierma.net/ 产后如何***[/url]http://www.61fx.com/ 什么***产品效果好[/url]http://www.61fx.net/ 做官网 就用科汛智能建站系统!
	支持(4) | 反对(3) 顶端 底部

加为好友 发送消息 空间 | 微博 | 邮件 | QQ号码 用户:a371271883 性别:男 积分:28分 威望:47 帖子:21 精华:0 广播:0 粉丝:0 登录次数:6 次 注册时间:2011/5/20 12:40:10 最后登录:2011/6/17 19:52:10 a371271883 当前离线 21 主题 0 广播 0 粉丝 级别:学前班 用户积分:28 分 登录次数:6 次 注册时间:2011/5/20 最后登录:2011/6/17	a371271883 发表于：2011/5/28 20:55:53   | 只看该作者 查看该作者主题 藤椅  做线上考试培训 就选#科汛网校 我也学习下！！
	一夜晴交友qq群[/url]|***[/url]|最新电影排行榜2011[/url]|乐趣园聊天室[/url]|一夜晴交友qq群[/url] 一分钟快速开通线上知识店铺
	支持(2) | 反对(1) 顶端 底部

加为好友 发送消息 空间 | 微博 | 邮件 | QQ号码 用户:sffwztgd 性别:女 积分:625分 威望:1171 帖子:592 精华:0 广播:0 粉丝:1 登录次数:49 次 注册时间:2011/6/22 18:04:31 最后登录:2012/2/16 10:15:58 sffwztgd 当前离线 592 主题 0 广播 1 粉丝 级别:五年级 用户积分:625 分 登录次数:49 次 注册时间:2011/6/22 最后登录:2012/2/16	sffwztgd 发表于：2011/6/27 14:07:06   | 只看该作者 查看该作者主题 板凳  有课程 找生源 就上科汛课堂街 对不起，该用户所发的帖已全被锁定!
	10G Cables[/url] CXP Cables[/url] 10G SFP+ Cables[/url] SFP[/url] SFP+[/url] QSFP[/url] MINISAS[/url] XENPAK[/url] X2[/url] XFP[/url] QSFP Cables[/url] SFP+ Cables[/url] SFP Cables[/url] SAS/Mini SAS[/url] SCSI Products[/url] SATA Products[/url] 10G Transceiver Modules[/url] XENPAK[/url]                         XFP[/url] 光模块[/url] SFP[/url] SFP+[/url] SFP++[/url] SFP光模块[/url] SFP+光模块[/url] SFP++光模块[/url] XFP光模块[/url] 40GQSFP[/url] 10G光模块[/url] 10G SFP[/url] 光模块[/url] 万兆光模块[/url] sfp模块[/url] xfp模块[/url] X2[/url] XFP[/url] XENPAK[/url] SFP[/url] SFP[/url] SFP[/url] SFP+[/url] SFP++[/url] xfp[/url] 科汛商学院助您快速入门
	支持(1) | 反对(1) 顶端 底部

＜上一主题 | 下一主题 ＞

<< 返回列表 首 页 1