Ò׽ؽØͼÈí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö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ʵÏÖSQL SERVERÊý¾Ý¿âµÄÔ¶³Ì¸üÐÂ

ÓÃASPʵÏÖSQL SERVERÊý¾Ý¿âµÄÔ¶³Ì¸üÐÂ
½­ËÕʡͨÖÝÖ°Òµ¸ß¼¶ÖÐѧ  Áõ¼Æºâ
΢ÈíµÄSQL Server ÊÇÒ»¸ö´óÐ͵ĹØϵÊý¾Ý¿âϵͳ£¬ËüΪÔÚ¸´ÔÓ»·¾³ÏÂÓÐЧµØʵÏÖÖØÒªÉÌÒµÓ¦ÓÃÌṩÁËÒ»¸öÇ¿ÓÐÁ¦µÄ¿Í»§/·þÎñÆ÷ƽ̨¡£Ëü½áºÏMicrosoft Windows NT²Ù×÷ϵͳµÄÄÜÁ¦£¬ÌṩÁËÒ»¸ö°²È«¡¢¿ÉÀ©Õ¹¡¢Ò×¹ÜÀí¡¢¸ß¶ËÐÔÄܵĿͻ§/·þÎñÆ÷Êý¾Ý¿âƽ̨¡£Õ ......

asp jsp´úÂë

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

aspÎÞ×é¼þµÈ±ÈÀýËõ·ÅͼƬ

<%
'//////////// GPS£ºGet Picture Size //////////////
'//////////////ÀûÓÃADODB.stream»ñȡͼƬ³ß´ç//////////////
Class GPS
Dim aso
Private Sub Class_Initialize
Set aso=CreateObject("Adodb.Stream")
aso.Mode=3
aso.Type=1
aso.Open
End Sub
Private Sub Class_Terminate
set aso=nothing
En ......

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

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

¶¯Ì¬ÍøÒ³¿ª·¢——ASPÁ¬½ÓSQL2005Êý¾Ý¿â

 ¶¯Ì¬ÍøÒ³¿ª·¢——ASPÁ¬½ÓSQL2005Êý¾Ý¿â
˵Ã÷£ºa¡¢ÒÔÏÂ×Ö·ûÖÐÊý¾Ý¿âÃûforum£¬Êý¾Ý¿â·þÎñÆ÷ÃûWWW-2443D34E558\SQL2005£¨»òÕß127.0.0.1£©
b¡¢²é¿´sqlÊý¾Ý¿â·þÎñÆ÷Ãû³Æ£º¶ÔÏó×ÊÔ´¹ÜÀíÆ÷->Êý¾Ý¿â->ÓÒ¼üµã»÷×Ô¼º½¨µÄÊý¾Ý¿â->ÊôÐÔ->ȨÏÞ
c¡¢Provider=sqlncliÒ²¿ÉÒÔ,UIDÓë“=”Ö®¼ä²»¿ÉÒÔ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ