ASP网站如何调用文章标题作为网页title? 5

<!--#includefile="conn.asp"--><!--#includefile="config.asp"--><!--#includefile="page.... <!--#include file="conn.asp"-->
<!--#include file="config.asp" -->
<!--#include file="page.asp" -->
<!--#include file="Sql.Asp" -->
<!--#include file="w78_sql.asp"-->

<%
id=request.QueryString("id")
if id="" or not isnumeric(id) then
Response.Write "<script>alert('参数错误!');history.go(-1);</script>"
Response.End()
end if
set rsw=server.createobject("adodb.recordset")
exec="select * from [Products] where id="& id
rsw.open exec,conn,1,1
if rsw.eof then
response.write "<script>alert('无此记录');history.go(-1);</script>"
response.End()
end if
set bigClass=server.createobject("adodb.recordset")
exec="select * from [bigClass] where BigClassID="&rsw("BigClassID")&""
bigClass.open exec,conn,1,1
if rsw("SmallClassID")<>0 then
set smallclass=server.createobject("adodb.recordset")
exec="select * from [smallclass] where SmallClassID="&rsw("SmallClassID")&""
smallclass.open exec,conn,1,1
end if
%>

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<title><%=bigClass("bigClassname")%>_<%=w78_home%></title>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<LINK href="images1/css.css" type=text/css rel=stylesheet>
<!--#include file="top.asp"-->
展开
 我来答
a_yong
2012-03-30
知道答主
回答量:41
采纳率:0%
帮助的人:14.4万
展开全部
(头部省略)
<%
id=request.QueryString("id")
if id="" or not isnumeric(id) then
Response.Write "<script>alert('参数错误!');history.go(-1);</script>"
Response.End()
end if
set rsw=server.createobject("adodb.recordset")
exec="select * from [Products] where id="& id
rsw.open exec,conn,1,1
if rsw.eof then
response.write "<script>alert('无此记录');history.go(-1);</script>"
response.End()
end if

set rs_bigClass=server.createobject("adodb.recordset") 'bigclass跟表名称bigclass容易混淆,建议改个记录集名称,后面涉及到的相应修改哈。
exec="select * from [bigClass] where BigClassID="&rsw("BigClassID")&""
rs_bigClass.open exec,conn,1,1
dim _title
_title=rs_bigClass("bigClassname") '把大类名称提前赋值到_title变量中,下面好调用。前提是要确保bigclass数据库中有bigclassname这个字段哈。
if rsw("SmallClassID")<>0 then
set smallclass=server.createobject("adodb.recordset")
exec="select * from [smallclass] where SmallClassID="&rsw("SmallClassID")&""
smallclass.open exec,conn,1,1
end if
%>

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<title><%=_title %>_<%=w78_home%></title>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<LINK href="images1/css.css" type=text/css rel=stylesheet>
<!--#include file="top.asp"-->
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
蛇仔明表哥
2012-03-30 · TA获得超过2954个赞
知道小有建树答主
回答量:1824
采纳率:33%
帮助的人:602万
展开全部
把exec="select * from [smallclass] where SmallClassID="&rsw("SmallClassID")&""
smallclass.open exec,conn,1,1
end if
这段的end if 移到
<title><%=bigClass("bigClassname")%>_<%=w78_home%></title>
后面即可。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
狂奔的蜗牛83
2012-04-01 · TA获得超过130个赞
知道小有建树答主
回答量:230
采纳率:0%
帮助的人:108万
展开全部
试一下:
在这句后边:bigClass.open exec,conn,1,1
dim title
title=bigClass("bigClassname") & w78_home

绑定的时候用:<title><%=title%>></title>
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
精致且灿烂丶典范k
2012-03-29 · TA获得超过9583个赞
知道大有可为答主
回答量:1.3万
采纳率:3%
帮助的人:4095万
展开全部
本网站文章页代码如下: <!--#include file="inc/conn.asp" --> <!-<% sql="select * from News where type_id='1' and id="&id set ,EboGUB
追问
具体怎么改呢?
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
快意怼怼侠
2012-03-29
知道答主
回答量:46
采纳率:100%
帮助的人:14.9万
展开全部
<title><%=bigClass("bigClassname")%>_<%=w78_home%></title>改为
<title><%=title%></title>
title是你的文章标题
更多追问追答
追问
试过了不行,,,,
追答
alert('参数错误!');history.go(-1);" 
Response.End()
end if

set bigClass=server.createobject("adodb.recordset")
exec="select * from [bigClass] where BigClassID="&rsw("BigClassID")&""
bigClass.open exec,conn,1,1
if rsw("SmallClassID")0 then
set smallclass=server.createobject("adodb.recordset")
exec="select * from [smallclass] where SmallClassID="&rsw("SmallClassID")&""
smallclass.open exec,conn,1,1
end if

set rsw=server.createobject("adodb.recordset")
exec="select * from [Products] where id="& id
rsw.open exec,conn,1,1
if rsw.eof then
response.write "alert('无此记录');history.go(-1);"
response.End()

else
%>

试一试
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(3)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式