如何落伍 | 站长俱乐部 | 落伍预告 | 落伍分类 | 站长运营 | 站长赚钱 | 免费代码 | 现金任务 | 人才招聘 | 落伍DIY | 站长工具 | 我喜爱的人民警察
推荐:图铃+艺术签名效果强!年底暴利,淘宝CPC1000ip/50元弹窗,点击,自定义多种广告 强力推荐:签名+Q号.无线金玉
推荐!27by日结联盟,日赚300精品段E7300 4999元 真百独999元20人合租 赠CDN加速 399¥/年51联盟轻松月赚1万!(信誉第一)
挚盟:签名+杀毒+考考你英拓0元送机托管活动08联盟为你打破图铃新纪录10M独享租用550元-合租80/月
DNSPod智能DNS,我们一直在免费九播联盟 小站长日赚500不是梦上海服务器酷睿租用499/月一年送产权5G双线主机59.8元/月,可试用3天
发新话题
打印

[提问] 高人来,如何强制判断用户访问路径,不同的页面显示不同的Title?

高人来,如何强制判断用户访问路径,不同的页面显示不同的Title?

我的站是动态。全站只有一个头部,top.asp,而top.asp里的 TITLE是固定的。我怎么让他调用在新闻页面时自动显示新闻标题。

如果改TITLE,我的首页TITLE就会变
如果不改TITLE,我的新闻页面标题就是首页的TITLE

请问怎么办

第一种解决办法是:这个网站有7个不同的栏目,命名7个头部top对以后改动非常大,你要改个电话要改7个页面
第二种在一个页面使用两个头部,对优化损害较大

我想知道第三种也就是优化的办法,有谁知道?

TOP

Public Sub Top(ByVal Title)
    If Title = "" Or IsNull(Title) Or IsEmpty(Title) Then
        Title = "Hello World!"
    End If
    With Response
        .Write "<title>" & Title & "</title>" & vbCrLf
    End With
End Sub

Hello World!是你网站默认标题
例如:在新闻栏目
肯定要读取数据库,得到新闻标题
那么你就调用<%=Top(RsNews("Title")%>

明白了吗?方法很多!

TOP

引用:
原帖由 cnzz 于 2008-10-27 23:08 发表
Public Sub Top(ByVal Title)
    If Title = "" Or IsNull(Title) Or IsEmpty(Title) Then
        Title = "Hello World!"
    End If
    With Response
        .Write "" & Title & "" & vbCrLf
    End  ...
不错..

TOP

高手

TOP

访问新闻页面的时候都要传ID的,你就根据有没有ID,然后读数据库的标题,文章的话有标题,栏目的话就是栏目名称啦。
按2楼的去做

TOP

发新话题