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

ASPʵÏÖÓïÒô·ÖʱÎʺò

<bgsound src="wen.mid" loop="0">
  <% dim weh
  If Time >=#1:00:00 AM# And Time < #6:00:00 PM# Then
   weh = "<bgsound src="1.mid" loop="0">"
  Else If Time >#6:00:00 AM# And Time < #9:00:00 PM#
   weh = "<bgsound src="2.mid" loop="0">"
   Else If Time >#9:00:00 AM# And Time < #12:00:00 PM#
   weh = "<bgsound src="3.mid" loop="0">"
  Else If Time >#12:00:00 AM# And Time < #14:00:00 PM#
   weh = "<bgsound src="4.mid" loop="0">"
  Else If Time >=#14:00:00 AM# And Time < #17:00:00 PM#
   weh = "<bgsound src="4.mid" loop="0">"
  Else If Time >=#17:00:00 AM# And Time < #19:00:00 PM#
   weh = "<bgsound src="5.mid" loop="0">"
  Else If Time >=#19:00:00 AM# And Time < #24:00:00 PM#
   weh = "<bgsound src="6.mid" loop="0">"
  End If
  %>
  <%=wen %>
  
  ÉÏÃæµÄ X.MID ÊǵÄÎʺòÓïÒô 


Ïà¹ØÎĵµ£º

ASPº¯ÊýÓï·¨ËÙ²é±í


Abs £¨ÊýÖµ£©
¾ø¶ÔÖµ¡£Ò»¸öÊý×ֵľø¶ÔÖµÊÇËüµÄÕýÖµ¡£¿Õ×Ö·û´® (null) µÄ¾ø¶ÔÖµ£¬Ò²ÊÇ¿Õ×Ö·û´®¡£Î´³õʼ»¯µÄ±äÊý£¬Æä¾ø¶ÔΪ 0
Àý×Ó£ºABS(-2000)
½á¹û£º2000
Array £¨ÒÔ¶ºµã·Ö¸ôµÄÊý×éÔªËØ£©
Array º¯Êý´«»ØÊý×éÔªËصÄÖµ¡£
Àý×Ó£º
A=Array(1,2,3)
B=A(2)
½á¹û£º 2
˵Ã÷£º±äÁ¿£ÂΪ£ÁÊý×éµÄµÚ¶þ¸öÔªËصÄÖµ¡£
£Ás ......

ASPÓ¦ÓÃÖ®FSO×é¼þÖ®Îļþ²Ù×÷´óÈ«


'ʹÓÃFSOÐÞ¸ÄÎļþÌض¨ÄÚÈݵĺ¯Êý
Function FSOchange(filename,Target,String)
Dim objFSO,objCountFile,FiletempData
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objCountFile = objFSO.OpenTextFile(Server.MapPath(filename),1,True)
FiletempData = objCountFile.ReadAll
objCountFi ......

ASPÖÐÊ®´ó³£ÓóÌÐò´úÂë.£ºµÚÈý½Ú¡´ÎÒµÄÐĵáµ

ÔÚInterDevÖÐʵÏÖÍøÉϹºÎïÍƳµ(1)
  
¡¡±¾ÎĽ«½éÉÜÔÚInterDevÖÐʵÏÖÍøÉÏÉ̵깺Îï³µ¹¦Äܵķ½·¨£¬¾ßÌå²½ÖèÈçÏ£º
¡¡¡¡Ò»¡¢ Êý¾Ý¿â½á¹¹£º
¡¡¡¡²úÆ·Êý¾Ý±í(Products): ´æ·Å²úÆ·ÐÅÏ¢
²úÆ·Ãû  ProductName
²úÆ·±àºÅ ProductID
µ¥¼Û Price
·ÖÀà±àºÅ CategoryID
¡¡¡¡ Cart£º¹ºÎï³µÊý¾Ý±í£¬ÁÙʱ´æ·Å¿Í»§µÄ¶ ......

ASPÖÐÊ®´ó³£ÓóÌÐò´úÂë.£ºµÚÁù½Ú¡´ÎÒµÄÐĵáµ

ÓÃASPʵÏÖÖ§³Ö¸½¼þµÄEMailϵͳ(1)
  
¡¡¡¡´ó¼Ò¾­³£Ì½ÌÖʹÓÃasp£¬¶ø²»Ê¹ÓÃÆäËû×齨ÄÜ·ñʵÏÖÎļþµÄÉÏ´«£¬´Ó¶ø¿ª·¢³öÖ§³ÖÓʼþ¸½¼þµÄÓʼþϵͳ£¬´ð°¸ÊÇ¿ÉÒԵġ£
¡¡¡¡ÒÔÏÂÊÇ·¢ËÍÓʼþµÄÒ³Ã棬ÓʼþµÄÕʺÅÊÇÔ±¹¤ºÅ£¬¼ÙÉèÊÇ5λµÄÊý×Ö£¬sendmail.aspµ±È»ÊÇÔںϷ¨µÇ½ºó²ÅÄܹ»¿´µ½µÄ
£¼html£¾
£¼head£¾
£¼meta http-eq ......

ASPÖÐÊ®´ó³£ÓóÌÐò´úÂë.£ºµÚ°Ë½Ú¡´ÎÒµÄÐĵáµ

ÓÃASPʵÏÖÖ§³Ö¸½¼þµÄEMailϵͳ(2)
  
¡¡¡¡²»¹ýÕâ½ö½öÖ»Êǵõ½ÁË·¢ËÍÕßµÄipµØÖ·ºÍmacµØÖ·£¬¶øÇÒ½ûÖ¹Óû§×Ô¼º¸ü¸Ä×Ô¼ºipµØÖ·µÄ´úÂ룬ÒòΪÎÒÃǵÄϵͳÊÇÐèÒª¶Ô¸öÈËÐÞ¸ÄipµÄÐÐΪ½øÐнûÖ¹µÄ¡£
£¼%
strIP = Request.ServerVariables("REMOTE_ADDR")
Set net = Server.CreateObject("wscript.network")
Set sh = S ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ