asp+access ʵÏÖËæ»ú³öÌâÔõôʵÏÖ
ÏëÓÃasp+access×öÒ»¸öÔÚÏß¿¼ÊÔϵͳ£¬ÇëÎÊÈçºÎʵÏÖËæ»ú´ÓaccessÊý¾Ý¿âÖгéÌâ¶ø²»»áÖØ¸´ÄØ£¿
randomº¯ÊýÓÃÉÏ¡£
Ïë²»ÖØ¸´µÄ»° Ö»ÓÐÓÃÒ»¸öÊý×é±£´æÄãµÄÊÔÌâidÁË
ÿµ±³é³öÒ»¸öid ¾ÍºÍÊý×éÖеÄid±È½Ï Èç¹ûÏàµÈ£¬¾Í²»È¡³öidÁË£¬²»µÈµÄ»° ¾ÍÈ¡³öidÀ´¡£È»ºó°ÑÕâ¸ö²»Öظ´µÄidÌí¼Óµ½ÄǸöÊý×éÖÐ
»òÕßÏñ½ÚÔ¼µãʱ¼ä£º°Ñ³é³öµÄÌâÄ¿id´ÓСµ½´óÅÅÐò£¬È»ºóÈ¡³öÖØ¸´µÄid
·½·¨Ò»£ºÓÐÈËÓÃÈçÏ´úÂëÒԼǼ×ÜÊýΪ¼«´óÖµÀ´Ê×ÏÈÌáÈ¡³öÖ¸¶¨ÊýÁ¿µÄËæ»úÊý£¬È»ºóÒÔÕâÐ©Ëæ»úÊý×öΪ¼Ç¼ID¡£
VBScript´úÂë:
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 5 * from Table1 order by Rnd()*5
¡¡¡¡ÕâÌõÓï¾ä¿ÉÒÔËæ»ú´ÓAccessÊý¾Ý¿âÖÐÉãÈ¡5Ìõ¼Ç¼¡£µ«ÊÇʵ¼Ê²Ù×÷ÖУ¬ÆäÉú³ÉµÄ¼Ç¼½á¹ûÊǹ̶¨µÄ£¬Ê§È¥ÁËËæ»úÉãÈ¡¼Ç¼µÄÒâÒå¡£
¡¡¡¡·½·¨Èý£ºÓÐÕâÑùÒ»ÖÖ·½·¨¡£
¡¡¡¡ÀûÓÃËæ»úÊýÉú³ÉÖ÷¼üµÄ¼Ç¼ID
¡¡¡¡yourstr=
Ïà¹ØÎÊ´ð£º
ÏÖÔÚÕâÉç»á»ù±¾Éϲ»ÐèÒªASP³ÌÐòÔ±ÁË,Ò»ÃæÊÔ,¶¼Òª.NET»òÕßPHP,JSPµÄ,°¥,,,,ASPÕâô²»ÖµÇ®Âð,ѧϰASPÊǸö´íÎóÂð
ûɶ´íÎó Ò»¾ä»°£º¼¼¶à²»Ñ¹Éí
¿¿ASP¶¼»ì²»µ½·¹³ÔÁË ÔÎ ÔÎ
ÎÒµÄÒâ˼ÊǶàѧһÃż¼Êõûɶ´íÎó ......
ÔÏÈÓÐÒ»¸öÏîÄ¿ÊÇÓÃaspдµÄ£¬ÒòΪϵͳÀ©Õ¹£¬ÎÒÏëÌí¼ÓһЩģ¿é»òÍøÒ³£¬ÏëÓÃasp.netд£¬È»ºóÔÚaspÖÐredirectµ½aspxÎļþÖУ¬ÇëÎÊÊÇ·ñ¿ÉÒÔ×öµ½£¬ÈçºÎÔÚIISÖнøÐÐÅäÖá£
ÕâÑù¿ÉÒÔʡȥºÜ¶à¹¤×÷Á¿£¬ÒòΪϵͳÒÔǰÊDZðÈËдµÄ ......
Imports System.ComponentModel
Imports System.Web.UI
Imports System.Web.UI.Design
Imports System.Web.UI.WebControls
Namespace CBDAspNet.WebControls.HTML
''' <summary>
'' ......
ÕâÁ½Ììѧϰ¡¶Delphi¼¼Êõ·½°¸±¦µä¡·Ò»ÊéÖеÚÈýÕ¹ØÓÚÓû§µÇ¼·½°¸µÄÀý×Ó£¬ÀûÓõÄÊÇSQl ServerÊý¾Ý¿âʵÏÖÓû§µÇ¼£¬±àÒëÔËÐж¼Ã»ÎÊÌ⣬¸ÃʵÏֵŦÄÜÒ²¶¼ÊµÏֵĺܺ㬵«ÊÇÆæ¹ÖµÄÊÇ£¬·´¸´ÔËÐÐÒ»¶Îʱ¼äºó£¬ÓÐʱÔڹرÕÕû¸ö ......
ÔÚMSSQLÖУ¬ÎÒÃÇ¿ÉÒÔÒ»´Î²éѯ¶à¸öÊý¾Ý±í²¢¼ÓÈëµ½Êý¾Ý¼¯ÖУ¬ÖмäÖ»ÐèÓ÷ֺŸô¿ª£®È磺
£¢select * from A;select * from B;select * from C£¢,Ìî³äÊý¾Ý¼¯ºóÔÚDSÖоÍÓÐÁËÈýÕÅ±í£®
µ«ÔÚÓÃͬÑùµÄÓï¾ä·ÃÎÊACCESSÊý¾ ......