Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

aspÊý×éËæ»úÅÅÐò

Õâ¶Î´úÂëµÄ¹¦ÄÜÊÇ£º½«Ò»¸öÊý×é´òÂÒ˳Ðò£¬ÏÔʾ³öÀ´£¬ÈÃÿһ´ÎÏÔʾµÄ˳Ðò¶¼²»Ò»Ñù¡£
<%
Dim tt
tt=Split("1,2,3,4,5,6",",")
'Ëæ»úÅÅÐò  
leng=UBound(tt)
randomize  
for ii=0 to leng-1  
 b=int(rnd()*leng)  
 temp=tt(b)  
 tt(b)=tt(ii)  
 tt(ii)=temp
Next
 
For i=0 To leng
 response.write tt(i)&"<br>"
next
%>


Ïà¹ØÎĵµ£º

asp¼ì²â¸÷·þÎñÆ÷×é¼þ


ÔõôÓÃaspÅжÏÏÂÃæµÄÐÅÏ¢ÕâÀïÎÒÊÇ¿´µ½¶¯Ì¬ÍøµÄ.
FSOÎļþ¶Áд  √                                   Jmail·¢ËÍÓʼþÖ§³Ö  ×  
CDONTS·¢ËÍÓʼþÖ§³ ......

asp Éú³É¾²Ì¬

<%
Do_Url = "http://"
'Do_Url = Do_Url&Request.ServerVariables("SERVER_NAME")&"/shownews.asp" Ö÷Ŀ¼
aa=Request.Servervariables("url") 'ÐéÄâĿ¼
bb=InstrRev(aa,"/")
cc=left(aa,bb)
Do_Url = Do_Url&Request.ServerVariables("HTTP_HOST")&cc&"index.asp"
call SaveFile("index.h ......

vbºÍaspÈçºÎÓÃremote·ÃÎÊÔ¶³ÌÊý¾Ý¿â

·ÃÎÊÔ¶³ÌÊý¾Ý¿âµÄÇé¿öÓÐÒÔϼ¸ÖÖ£º
1£©·ÃÎÊÔ¶³ÌÊý¾Ý¿âµÄaccessÊý¾Ý¿â
2£©·ÃÎÊÔ¶³ÌmssqlÊý¾Ý¿â»òoracleµÈÆäËû¹ØÏµÊý¾Ý¿â£¬µ«ÊÇÊý¾Ý¿âͨÐŶ˿ڱ»·À»ðǽ×èµ²»òÆäËûÍøÂçÔ­ÒòÔì³ÉÎÞ·¨Ê¹Óøö˿Ú
±¾ÎĽöÔÚwindows2000 advance server,mdac2.8ϲâÊÔͨ¹ý£¬ÆäÓàÌõ¼þ²»±£Ö¤ÄÜÕý³£ÔËÐÐ
ÔÚmdacµÄService ProvidersÖаüÀ¨Microsoft ......

aspÖеÄrs.openÓÚconn.executeµÄÇø±ð

aspÖеÄrs.openÓÚconn.executeµÄÇø±ð
    rs.open sql,conn£ºÈç¹ûsqlÊÇdelete,update,insertÔò»á·µ»ØÒ»¸ö¹Ø±ÕµÄ¼Ç¼¼¯£¬ÔÚʹÓùý³ÌÖв»ÒªÀ´¸örs.closeÔÚÎļþ×îºóÔÙдrs.close
    Öмä¿ÉÒÔÀ´¶à¸ö¼Ç¼¼¯rs1.open sql1,conn£¬×îºóÒ»¿é¹Ø±Õ¼Ç¼¼¯:rs.close rs1.close
    con ......

ASP ¶àͼƬÉÏ´«

1£ºÉÏ´«Ò³Ãæ
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="te ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ