檢查了一些貼子對於mssql資料庫一般可以採用這樣的語句：
<%
select top 50 * from sometable order by newid()
%>
但是如果是access資料庫的話似乎沒有什麼好的解決方法。
方法一：有人用如下**以記錄總數為極大值來首先提取出指定數量的隨機數，然後以這些隨機數做為記錄id。
<%
dim n,j
dim su()
dim a,b,k
b=myrs.recordcount
randomize
redim su(index_n)
su(1)=int((b * rnd) + 1)
for n=2 to index_n
a=int((b * rnd) + 1)
for j=1 to n
do while a=su(j)
a=int((b* rnd) + 1)
j=1
loop
next
su(n)=a
next
%>
這種方式有一些問題，就是當id不是連續的話，有可能某些隨機數不存在id序列當中。另外id的最大值與總的記錄值不一定相等，這樣有些記錄id會永遠被忽略。
方法二：有人採用一條sql語句解決此問題：
<%
select top 50 * from table order by int(rand()*50)
%>
如果這條語句可行的話是個不錯的方法。我測試這條語句並沒有通過，如果有人知道是哪有問題請告訴我，非常感謝。
方法三：有這樣一種方法，我覺的不錯：
<%
yourstr="*1*3*4*6*12*...."
sql="select top 10 * form yourdb where instr('*'&id&'*','"&yourstr&"')<>0"
%>
yourstr可以生成隨機數多一點大於所限定抽取的隨機數為好，這樣可以排除記錄不足的情況。
方法四：
<%
n=10 '取任意10條記錄
set rs = server.createobject ("adodb.recordset")
sql = "select * from table"
rs.open sql,conn,1,1
count=rs.recordcount '記錄總數
if count<>empty then
randomize
for i=1 to n '迴圈n次
num=fix(rnd*count) 'num便是隨機產生的記錄行數，用fix()，使其不會大於count值
rs.move num '移到改隨機行
response.write rs(0) '出該條記錄
rs.movefirst '別忘了再把指標移到第一條
next
end if
rs.close
set rs=nothing
%>
asp連線sql資料庫,access資料庫字串
asp連線sqlserver資料庫字串 set connsql server.createobject adodb.connection strsql provider sqloledb.1 password y ht1986 persist security info true user id s...
asp連線access資料庫例項
asp是微軟的伺服器端動態指令碼語言，使用它可以輕鬆處理與access資料庫的連線。使用asp來連線access，需要用到微軟的ado元件，不熟悉的可以去網上搜尋一下。下面使用乙個例項來演示連線過程 set conn server.createobject adodb.connection 建立乙個...
asp鏈結access資料庫筆記
自己學習asp.net已經有一年半的時間了，但是看到現在還是有很多 用的是asp，於是不得不回到看看asp的 問同事那邊要了乙個asp的 1是為了自己更好的學習asp 而是學習黑客技術，學習如果攻，哈哈你一定想錯了，因為你會攻了才會防，防才是我真正的目的。1 2 連線資料庫開始 3dim conn,...