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

asp È¡µÃ·´ÈÕÆÚ

<%
function dt(v)
dim dy
dy=31
Marr=array(4,6,9,11)
yyyy=Year(Date())
mm=Month(Date())
dd=Day(Date())
if mm=2 then
 if yyyy mod 400 or (yyyy mod 4=0 and yyyy mod v0=0) then
  dy=29 
 else
  dy=28
 end if 
else 
 for i=0 to 3
 if Marr(i)=mm then
 dy=30
 exit for 
 end if
 next
end if
if dd-v<=0 then
 if Month(Date())-1<=0 then
 dt=(Year(Date())-1)&"-"&(12-(Month(Date())-1))&"-"&(dy-abs(dd-v))&" 00:00:00"
 else
 dt=(Year(Date()))&"-"&(12-(Month(Date())-1))&"-"&(dy-abs(dd-v))&" 00:00:00"
 end if
else
dt=(Year(Date()))&"-"&(Month(Date()))&"-"&(dd-v)&" 00:00:00"
end if
end function
%>
<body>
<%
response.Write(dt(4))µ÷ÓÃ
%>


Ïà¹ØÎĵµ£º

c# ÑéÖ¤Âë×é¼þ ¿Évb£¬asp£¬netµ÷ÓÃ

      ½ñÌ칫˾ҪÇóÓÃC#д¸öÑéÖ¤Âë×é¼þ£¬ÈÃasp¿ÉÒÔµ÷Óã¬ÔÚÍøÉÏÕÒÁËÒ»¶Ñ×ÊÁÏ£¬ÖÕÓÚ¸øÎÒ¸ø¸ã³öÀ´ÁË£¬ÒòΪ±¾È˵ÚÒ»´Îд×é¼þ£¬Ò²ÊǵÚÒ»´Î·¢±íÎÄÕ£¬ËùÓпÉÄÜ˵µÄ²»ÊǺܺ㬴ó¼ÒÇë¼ûÁ¡£
      csdnÉÏÓÐÕâôƪÎÄÕ£¬Ïëѧϰд×é¼þµÄ¿ÉÒÔÈ¥¿´¿´£ºhttp://blog.csdn.net/KimmKi ......

asp¶ÁÈ¡Îı¾ÄÚÈÝ

'**************************************************    
'º¯ÊýÃû£ºFSOFileRead    
'×÷ ÓãºÊ¹ÓÃFSO¶ÁÈ¡ÎļþÄÚÈݵĺ¯Êý    
'²Î Êý£ºfilename ----ÎļþÃû³Æ    
'·µ»ØÖµ£ºÎļþÄÚÈÝ    
'************** ......

asp 11ÖÐÁ¬½ÓÊý¾Ý¿âµÄ·½·¨

¡¡ASPÁ¬½ÓÊý¾Ý¿âµÄ11ÖÖ·½·¨——±¾ÎÄ×ܽáÁËʹÓÃASPÁ´½Ó¸÷ÖÖÊý¾Ý¿âµÄ·½·¨£º
¡¡¡¡1.AccessÊý¾Ý¿âµÄDSN-lessÁ¬½Ó·½·¨:
set adocon=Server.Createobject("adodb.connection")
adoconn.Open"Driver={Microsoft Access Driver(*.mdb)};DBQ="& _
Server.MapPath("Êý¾Ý¿âËùÔÚ·¾¶")
¡¡¡¡2.Access OLE DBÁ¬½Ó·½·¨£ ......

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ºÅ