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

ÈçºÎÓÃaspÊä³öÈÕÆÚºÍÐÇÆÚ

 µÚÒ»ÖÖ·½·¨:
<%
    d = date()
 response.write d&"&nbsp;&nbsp;&nbsp;&nbsp;"&WeekdayName(Weekday(d))
    %>
Êä³öÑùʽ:2004-5-7    ÐÇÆÚÎå
***********************************************************************************
µÚ¶þÖÖ·½·¨:
<%=FormatDateTime(date, vbLongDate)%><%
    d = date()
 response.write "&nbsp;&nbsp;&nbsp;&nbsp;"&WeekdayName(Weekday(d))
    %>
Êä³öÑùʽ:2004Äê5ÔÂ7ÈÕ    ÐÇÆÚÎå
************************************************************************************************************
µÚÈýÖÖ·½·¨:
////////////µÚÒ»²½:°ÑÏÂÃæÓï¾ä·ÅÔÚ¶¥²¿.
<%
'ÈÕÆÚº¯Êý
sub datetime
dat=int(datediff("d",dateserial(2000,8,27),now) mod 7)
response.write(formatdatetime(now,1))&"&nbsp;"
select case dat
case 0
 response.write "ÐÇÆÚÌì"
case 1
 response.write "ÐÇÆÚÒ»"
case 2
 response.write "ÐÇÆÚ¶þ"
case 3
 response.write "ÐÇÆÚÈý"
case 4
 response.write "ÐÇÆÚËÄ"
case 5
 response.write "ÐÇÆÚÎå"
case 6
 response.write "ÐÇÆÚÁù"
end select
end sub
%>
/////////////////////µÚ¶þ²½:°ÑÏÂÃæÒ»¾ä¼ÓÔÚÒªÏÔʾµÄµØ·½¼´¿É
<%datetime%>
******************************************************************************************************************88
/////²úÉúËæ»úº¯Êý1µ½10Ö®¼ä
<%
    Randomize()
    response.write Round(RND()*10)
    %>


Ïà¹ØÎĵµ£º

¾ÓÖУ¬±í¸ñ¿í¶È——ASP¸ñʽ

Ò»¡¢Ð޸ĸñʽ£ºµ÷Õû±íÍ·¾Ó×ó£»
 <!--Ô­À´¸ñʽ-->
/*˵Ã÷£º°ÑÕû¸ö±íÍ·ºÍÒ³ÃæÄÚÈݾÓÖУ¬µ±Ò³ÃæÄÚÈݽϳ¤Ê±£¬±íÍ·Ò²¾ÓÖУ¬¿´ÆðÀ´Ïñ±íÍ·´íλ¡£*/
<div style="position: absolute;top:3px;">
<center>
<!--#include file="inc/glfcd.inc"-->
<br>
    ±êÌâ
</br& ......

AccessÊý¾Ý¿âÖвéѯÊý×éÀàÐÍ×ֶεÄASP´úÂëSQLÓï·¨

 ½ñÌìÔÚÐÞ¸ÄÒÔǰ¿ª·¢µÄÒ»¸öÍøÕ¾µÄʱºòÓöµ½Ò»¸öÎÊÌ⣬ÒòΪ¹¦ÄܵÄÐèÒª£¬ÒÔǰµÄÒ»¸öÊý×ÖÀàÐÍ×ֶθıäΪÎı¾×ֶΣ¬ÒòΪÕâ¸ö×Ö¶ÎÐèÒª°üº¬¶à¸öÀà±ðµÄID£¬ÒÔǰÕâ¸ö×Ö¶ÎÖ»¶ÔÓ¦Ò»¸öIDµÄ¡£
ÍøÕ¾ÊÇASP VBÓïÑԵģ¬Êý¾Ý¿âʹÓõÄÊÇAccess
ÐÞ¸ÄÊý¾ÝÀàÐÍÖ®ºóǰ̨µÄ²éѯ´úÂë¾Í²»ÄÜʹÓÃÖîÈçxID=1ÕâÖÖÌõ¼þÁË¡£ÓÉÓÚÏÖÔÚ¸Ã×ֶαäΪÎı¾ÀàÐ ......

¼òÒ×ASPÎļþ»º´æ¼¼Êõ

 ×¢Ò⣺ϵͳÐèÒªFSOȨÏÞ¡¢XMLHTTPȨÏÞ
ϵͳ°üÀ¨Á½¸öÎļþ£¬Æäʵ¿ÉÒԺϲ¢ÎªÒ»¸ö¡£Ö®ËùÒÔ·ÖΪÁ½¸öÊÇÒòΪ²¿·Öɱ¶¾Èí¼þ»áÒòΪÀï±ßº¬ÓÐFSO¡¢XMLHTTP²Ù×÷¶ø±»ÈÏΪÊǽű¾Ä¾Âí¡£
µ÷ÓÃʱ£¬ÐèÒªÔÚASPÒ³ÃæµÄ×îÉϱ߰üº¬Ö÷Îļþ£¬È»ºóÔÚϱßдÏÂÒÔÏ´úÂë
Set MyCatch=new CatchFile
MyCatch.Overdue=60*5      &n ......

asp jspʵս´úÂë

 Ì½Ë÷Èí¼þ¹¤×÷ÊÒ³¤ÆÚרҵ³Ð½ÓÖÐСÐÍÉÌÒµÈí¼þ»òÍøÕ¾£¬×îÓŻݵļ۸ñºÍ¸ßÖÊÁ¿µÄ·þÎñÆÚ´ýÄúµÄ»Ý¹Ë£¡
±¾¹¤×÷ÊÒ³Ð½Ó JSP ASP  VB  PB  LotusNotes µÈÓïÑÔÒªÇóµÄÓ¦ÓÃϵͳ¿ª·¢ÒµÎñ
java jspʵսԴ³ÌÐò´úÂë:
                ......

ASPÓÃADODB.StreamдUTF

Function WriteToUTF(content,sFilen)'contentÎªÌæ»»ºóµÄ×Ö·û´®,filenameΪÉú³ÉµÄÎļþÃû
 dim objStream 
   Set objStream = Server.CreateObject("ADODB.Stream")  
     With objStream  
     .Open  
 &nb ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ