专注于互联网--专注于架构

最新标签
网站地图
文章索引
Rss订阅
很久没用ACCESS了只是看到经常碰到有人问如何返回随机记录问题所以就贴了上来随便看看 <!--# virtual=\"/adovbs.inc\"--> <% Dim objConn Dim objRst Dim strSQL Dim strConnection Dim str Dim str1 Dim cnt Dim cnt1 Dim rndMax Dim R [阅读全文] [PDF]
<% \' Moving to random record - Steven Jones\' Extension If Not(记录集名称.bof and 记录集名称.eof) Then \' re the cursor to the beginning If (记录集名称.CursorType > 0) Then 记录集名称.MoveFirst Else 记录集名称.Requery End If 记录集名称_totalrn = -1 记录集名 [阅读全文] [PDF]
1 共2条 分1页