Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö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ȫѡ´úÂë


<script language="javascript">
function CheckAll(form)
{ ///¶¨Ò庯Êýcheckall,²ÎÊýΪform
for (var i=0;i<form.elements.length;i++)
///Ñ­»·,form.elements.lengthµÃµ½±íµ¥ÀïµÄ¿Ø¼þ¸öÊý
{
///°Ñ±íµ¥ÀïµÄÄÚÈÝÒÀÒÀ¸¶¸øeÕâ¸ö±äÁ¿
var e = form.elements[i];
if (e.name != 'chkall')
e.checked = for ......

aspºÍmysql·ÖÒ³´úÂë

 <!--#include file="zheboconn.asp"-->
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=GB2312" />
<title>aspºÍmysql·ÖÒ³´úÂë</title>
<style type="text/css">
<!--
.STYLE3 {
 fon ......

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.NETÒ³ÃæÉúÃüÖÜÆÚºÍasp.netÓ¦ÓóÌÐòÉúÃüÖÜÆÚ

Ò³ÃæÉúÃüÖÜÆÚ
Ò³ ÃæÉúÃüÖÜÆÚÖ´ÐÐһϵÁв½Öè£ºÒ³ÃæµÄ³õʼ»¯¡¢ÊµÀý»¯¿Ø¼þ¡¢»¹Ô­ºÍά»¤×´Ì¬¡¢ÔËÐÐʼþ´¦Àí³ÌÐò´úÂë¡¢³ÊÏÖ¡£ÎªÁËÔÚºÏÊʵĽ׶ÎÖ´ÐÐËùÐèµÄ´úÂ룬ËùÒÔÒª¶ÔÒ³ÃæÉúÃü ÖÜÆÚ·Ç³£ÊìϤ¡£ÔÚÒ³ÉúÃüÖÜÆÚµÄ¸÷¸ö½×¶Î£¬Ò³Ãæ»áÖð¸öÒý·¢¶¨ÒåµÄʼþ£¬Í¨¹ý¶Ô´úÂ뿪·¢£¬ÔÚÒ³ÃæµÄÉúÃüʼþÖÐÖ´ÐÐÎÒÃÇËùÐèÒªµÄ³ÌÐò
Ò³ÉúÃüÖÜÆÚ½×¶Î
1¡ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ