易截截图软件、单文件、免安装、纯绿色、仅160KB

求助ASP随机文章问题,附有代码

求助ASP随机文章问题,我这里要从数据库的很多数据中随机取出一条记录,这里用的是10代表数据库中的前十条随机记录,我现在数据在不断增加,想要自动产生更多的随机记录,我这里有思路,可是实现不了,高手来帮忙。

思路:
1,获取数据库中最后一条记录的ID
2通过此ID代替10产生随机ID,
3通过随机ID查找随机记录


高手附一下代码啊!

代码
<%
randomize
Num=(int(rnd()*10)+1)

dim conn,rs,connstr
connstr="DBQ="+server.mappath("ceshi.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
set rs=server.createobject("adodb.recordset")

sql="select top 10 * from bot where id="&Cint(Num)

rs.open sql,conn,1,3
IF rs.RecordCount = 0 Then

Response.Redirect ("http://hexun.com/yingyu57/")

Else

response.redirect(rs("targetUrl"))

End IF

set rs=nothing
conn.close
set conn=nothing
%>
在MSSql中可以使用NEWID()函数来取随机的行数.
select top 10 * from bot order by NEWID()

但是在access中支持不支持,你可以试一下.

根据楼主的需求写了这个 希望对你帮助

HTML code



Code highlighting produced by Actipro CodeHighlighter (freeware)
http://ww


相关问答:

求一个在线测试系统 asp的 - Web 开发 / ASP

http://www.zgjhjy.com/Test/PrimaryTest/Index.aspx
就是类似以上的在线测试系统,需要有一个后台的,语言是asp的,数据库是access的,还需要能在后台对信息进行添删改查的。谢谢各位了。。。
程序真的很多,不知 ......

asp.net mvc 站点发布碰到问题 - .NET技术 / ASP.NET

服务器现在是。net 2.0的
我现在的项目就是asp.net mvc + linq的,现在服务器的环境配置用不了。
不知道有前辈碰到过这样的问题没。
难道服务器必须要装.net3.5 和 asp.net mvc
请前辈指点
不装你认为你要怎么 ......

如何用ASP读取 XML - Web 开发 / ASP

<?xml version="1.0"?>
<root>
<status>433</status>
<msg>这个是汉字</msg>
<serialno>123</serialno>
</root>
如何用ASP读取 status值 ......

asp数据库问题 - Web 开发 / ASP

各位大虾,我做了一个ASP得通讯录,但是除了查询功能好像其他都有问题,其中添加功能如下,能指导一下我哪里出错了吗?
<html>
<head>
<title>无标题文档</title>
</head>
<b ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号