| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 513 人关注过本帖
标题:[已解决.感谢回帖的你]勇求智者相助-关于提交
取消只看楼主 加入收藏
jlky
Rank: 1
等 级:新手上路
帖 子:44
专家分:0
注 册:2007-3-14
收藏
 问题点数:0 回复次数:1 
[已解决.感谢回帖的你]勇求智者相助-关于提交
对ASP算是初学吧,感悟很多!提个问题希望大家帮助(感谢以前帮助过我的版主和各位大侠)

思路如下:
Content.asp(新闻列表页面)

我想加一个判断,
当Content.asp?typeid=1 时 显示表里tpye=1的所有新闻(例如国家新闻)
当Content.asp?typeid=2 时 显示表里tpye=2的所有新闻(例如地方新闻)

Content.asp大致内容如下:

===============================================
<td width="156" align="center"><strong>新闻标题</strong></td>
<td width="329" align="center"><strong>新闻内容</strong></td>
<-- ---------------------------
typeid=Request("typeid")

if typeid = 1 then '等于1时显示“国内新闻”
set rs=server.CreateObject("adodb.recordset")
sql="select * from news where type=1" '(国内新闻)
rs.open sql,conn,3,1
end if

if typeid = 2 then '等于2时显示“地方新闻”
set rs=server.CreateObject("adodb.recordset")
sql="select * from news where type=2" '(地方新闻)
rs.open sql,conn,3,1
end if

循环------------------------------->
<td width="156" align="center"><%=rs("title")%></td>
<td width="329" align="center"><%=rs("content")%></td>
结束循环<-----------------------------

关闭数据库连接
====================================

报错的提示如下:
===========错误提示==============
错误类型:
Microsoft VBScript 运行时错误 (0x800A01A8)
缺少对象: 'rs'
=============================

可否告诉我正确的方法!谢谢

[此贴子已经被作者于2007-4-26 12:27:07编辑过]

搜索更多相关主题的帖子: 智者 感谢 
2007-04-26 00:42
jlky
Rank: 1
等 级:新手上路
帖 子:44
专家分:0
注 册:2007-3-14
收藏
得分:0 
谢谢楼上的提示,再次感谢!和你们学习真好!
2007-04-26 12:24
快速回复:[已解决.感谢回帖的你]勇求智者相助-关于提交
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.034629 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved