请各位asp程序员帮帮忙写段程序
因为不会asp,所以请大家帮忙。
问题:
数据库: sqlserver2000
数据库名: news
用户: sa
密码:
表名: info
字段: title,time
现我想在首页上从info表中用asp代码取出最新的十条信息的标题和时间。
请问应该如何写?
-------
多谢览贴
问题点数:50、回复次数:7Top
1 楼gaoks(正在学习)回复于 2003-06-03 18:58:48 得分 5
<%
'打开数据库连接
openConn
'定义结果集对象
set rs=Server.CreateObject("ADODB.RecordSet")
for i=0 to ubound(news_TYPE)
'通过存储过程查询
strSql = "pGetInfo;2 @nTo=10, @vType='" + INFO_TYPE(i) + "'"
rs.Open strSql, conn
'每行两格
if (i Mod 2)=0 then Response.Write "<tr>"
%>
<td>
....... </td>
<%
if (i Mod 2)=1 then Response.Write "</tr>"
'关闭结果集
rs.Close
next
'释放结果集对象
set rs = nothing
'关闭数据库连接
closeConn
%>Top
2 楼flyinweb()回复于 2003-06-03 19:02:49 得分 0
select top 10 * from info order by time descTop
3 楼allserver(server)回复于 2003-06-03 20:01:55 得分 5
<%
set rs=Server.CreateObject("ADODB.RecordSet")
Sql = "select top 10 * from info order by time desc"
rs.Open Sql, conn
%>
<table>
<tr><td>标题</td>
<td>时间</td></tr>
<tr><td><%=rs("title")%></td>
<td><%=rs("time")%></td></tr>
</table>
Top
4 楼linuxsun999()回复于 2003-06-03 20:34:21 得分 40
<%
dim conn
set conn = server.createobject("adodb.connection") conn.Open "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;pwd=;Data Source=IP地址;database=数据库名"
set rs=server.createobject("adodb.recordset")
sql="select top 10 * from info order by time desc"
rs.open sql,conn,1,3
%>
<html>
<body>
<table>
<tr><td>标题</td>
<td>时间</td></tr>
<%do while not rs.eof
<tr><td><%=rs("title")%></td>
<td><%=rs("time")%></td></tr>
<%
rs.movenext
loop
%>
</table>
</body>
</html>Top
5 楼sunnyfigo(sunnyfigo)回复于 2003-06-03 20:58:07 得分 0
都被他们说完了Top
6 楼xjy521(笑剑影)回复于 2003-06-03 21:30:23 得分 0
9494
都被他们说完了Top
7 楼carrysilence(jafler)回复于 2003-06-04 09:33:27 得分 0
特别感谢 linuxsun999() ( ) 信誉:100
因为直接使用你的程序不用调试就通过了。^_^
此外感谢所有参与帮助我的朋友们。
祝大家愉快。
现在好happy诶。
^_^Top



