我的网站是asp程序，现在的问题是所有内页的标题都与首页标题相同，如何解决？如何修改下面的代码？
这是部分代码，<%subhead'页面顶部Response.Write"<html>"&vbCrLfResponse.Write"<HEAD>"&vbCrLfRespon...
这是部分代码，
<%sub head'页面顶部
Response.Write "<html>" & vbCrLf
Response.Write "<HEAD>" & vbCrLf
Response.Write "<title>"&webname&" >> 欢迎您</title>" & vbCrLf
Response.Write "<meta http-equiv=""Content-Type"" content=""text/html; charset=gb2312"">" & vbCrLf
如果我没说明白，请看网站http://www.lc2x.com 展开
<%sub head'页面顶部
Response.Write "<html>" & vbCrLf
Response.Write "<HEAD>" & vbCrLf
Response.Write "<title>"&webname&" >> 欢迎您</title>" & vbCrLf
Response.Write "<meta http-equiv=""Content-Type"" content=""text/html; charset=gb2312"">" & vbCrLf
如果我没说明白，请看网站http://www.lc2x.com 展开
4个回答
展开全部
你内容页有个ID可以查询数据库获得文章的标题
把ASP sql查询的模块放在 head上面运行一下
就可以先获得了标题
至于你这个 头部的sub函数 最好再给内页单独写一个sub函数
内页调用的就是 就调用另外一个
不过如果 你合在一些写的话 也加个判断就可以
if rs("title")='' or rs("title") is null then
Response.Write "<title>"&webname&" >> 欢迎您</title>" & vbCrLf
esle
Response.Write "<title>"&rs("title")&" >> 欢迎您</title>" & vbCrLf
end if
rs("title")内页标题 内页的函数 判断如果记录集中能读取到对应的标题 且标题不为空的时候显示标题 不然就显示webname
把ASP sql查询的模块放在 head上面运行一下
就可以先获得了标题
至于你这个 头部的sub函数 最好再给内页单独写一个sub函数
内页调用的就是 就调用另外一个
不过如果 你合在一些写的话 也加个判断就可以
if rs("title")='' or rs("title") is null then
Response.Write "<title>"&webname&" >> 欢迎您</title>" & vbCrLf
esle
Response.Write "<title>"&rs("title")&" >> 欢迎您</title>" & vbCrLf
end if
rs("title")内页标题 内页的函数 判断如果记录集中能读取到对应的标题 且标题不为空的时候显示标题 不然就显示webname
更多追问追答
追问
这位高手，我对asp知之甚少，我想实现内页标题就是文章标题。请详细说明操作步骤和详细的修改代码。
追答
......
//这里
if rs("title")='' or rs("title") is null then '判断能否获得内页标题
Response.Write ""&webname&" >> 欢迎您" & vbCrLf '不能则是显示webname
esle
Response.Write ""&rs("title")&" >> 欢迎您" & vbCrLf '能则是显示 该标题
end if
....
其余的部分自己融会贯通一下吧
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
Response.Write "<title>"&webname&" >> 欢迎您</title>" & vbCrLf
这一段是你的页面标题
修改<title>和</title>之间的内容，就可以修改标题，也可以修改其中的webname变量值
如：
webname="这是测试标题"
Response.Write "<title>"&webname&"</title>"
那么你的页面标题就是 “这是测试标题”
这一段是你的页面标题
修改<title>和</title>之间的内容，就可以修改标题，也可以修改其中的webname变量值
如：
webname="这是测试标题"
Response.Write "<title>"&webname&"</title>"
那么你的页面标题就是 “这是测试标题”
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
吧你的连接数据库代码写在前面
Response.Write "<title>" & r("标题") & " " &webname&" >> 欢迎您</title>" & vbCrLf
Response.Write "<title>" & r("标题") & " " &webname&" >> 欢迎您</title>" & vbCrLf
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
很明显 webname变量的值全部一样
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
更多回答（2）
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
