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
%>
Ïà¹ØÎĵµ£º
Excelµ¼³öº¯Êý
<%
Sub ExportToExcel
Response.ContentType = "application/vnd.ms-Excel"
Response.AddHeader "Content-Disposition", "attachment;Filename=Results.xls"
Response.Write ......
ÊÔÑéÁ˺þã¬ÖÕÓڸ㶨ÁË¡£
Ê×ÏÈ£¬±ØÐëÓдíÎó¼ÌÐø½øÐеÄÉùÃ÷On Error Resume Next
È»ºó³¢ÊÔ¼òÀújmailʵÀý£º
Dim JMail
Set JMail=Server.CreateObject("JMail.Message")
¶ÔʵÀý×ö³öÅжϣ¬Èç¹û×é¼þûÓа²×°³É¹¦£¬ ......
¿ª·¢»·¾³:VS2008
WEB·þÎñÆ÷:IIS7.0
ΪºÎÔÚµ÷ÊÔʱ,¿ÉÕý³£ÏÔʾ±¨±íÄÚÈÝ,¿ÉÉú³Éºó,ÔËÐÐʱ,Ö»ÏÔʾ±¨±í¿ò¼Ü,²¢²»ÄÜÕý³£ÏÔʾ±¨±íÄÚÈÝ.
ÎÒ°Ñä¯ÀÀÆ÷ËùÓÐÏÞÖÆÑ¡ÏȡÏûÁË,»¹ÊÇÒ»ÑùµÄÎÊÌâ,²»ÖªÎªºÎ.ÕýÔÚѰÕÒ´ð°¸................... ......
Èí¼þÃû³Æ£º·ç¶É¿Æ¼¼ASPÍøÉϹºÎïϵͳ v0912-26
Èí¼þ´óС£º7069k
ÔËÐл·¾³£ºASP/Access
Èí¼þÀà±ð£ºµç×ÓÉÌÎñ
Èí¼þÊÚȨ£ºÃâ·Ñ
¿ª·¢É̼Ò: ·ç¶É¿Æ¼¼
¹Ù·½ÍøÕ¾£ºhttp://www.chinammc.com
ÑÝʾµØÖ·£ºhttp://demo01.chinammc.com
ÏÂÔØµØÖ·: http://w ......
ÔÚ·þÎñÆ÷ÉÏÉú³É¶¯Ì¬ÄÚÈÝÊÇʹÓÃASP×îÖ÷ÒªµÄÔÒòÖ®Ò»£¬ËùÒÔÎÒÃÇÑ¡ÔñµÄµÚÒ»¸ö²âÊÔÏîÄ¿ÊÇÈ·¶¨°Ñ¶¯Ì¬ÄÚÈÝ·¢Ë͵½Ó¦´ðÁ÷ʹÓÃʲô·½·¨×îºÃ¡£»ù±¾µÄÑ¡ÔñÓÐÁ½ÖÖ£¨ÒÔ¼°ËüÃǵÄһЩ±ä»¯£©£ºÊ¹ÓÃÄÚǶASP±ê¼Ç£¬Ê¹ÓÃResponse.WriteÓï¾ä¡£
¡¡¡¡ Ϊ²âÊÔÕâЩ²»Í¬µÄ·½·¨£¬ÎÒÃÇ´´½¨ÁËÒ»¸ö¼òµ¥µÄASPÒ³Ãæ£¬Ò³ÃæÏȶ¨ÒåһЩ±äÁ¿È»ºó°ÑËüÃDzåÈëµ½±í¸ ......