ÅжÏÉúФµÄASPʱ¼äº¯Êý
<%
Function Zodiac(birth)
If IsDate(birth) Then
birthyear = Year(birthday)
ZodiacList = Array("ºï", "¼¦", "¹·", "Öí", "Êó", "Å£", "»¢", "ÍÃ", "Áú", "Éß", "Âí", "Ñò")
Zodiac = ZodiacList(birthyear Mod 12)
End If
End Function
%>
Ïà¹ØÎĵµ£º
¿´µ½ÓÐÅóÓÑËµÇ°ÃæÒ»Õ½²µÃû±ØÒª,ÏëÏëҲȷʵ.±¾À´ÊÇûÓдòËã½²ÕâЩ»ù´¡µÄ,Ö»ÊÇÐÐÎÄÆðÀ´Ã»ÓÐÔ¼Êø,¾Íµ´¿ªµ½»ù´¡ÖªÊ¶ÉÏÃæÁË.
´ÓÕâ½Ú¿ªÊ¼,½«»á¸ø´ó¼Ò½éÉÜASPÖеÄÈý´óͨÓÃÀà,Ëü¹á´©ÓÚÎÒËùÉè¼ÆµÄÈý²ã¼Ü¹¹ÖÐ,ÊǶÔASPÓï·¨µÄÀ©Õ¹,¿ÉÒÔÌá¸ßºÜ¶àϸ½Ú´¦ÀíÉϵÄЧÂÊ,¿ÉÒÔËãÊÇÒ»µãµã¿ò¼ÜµÄζµÀ.
& ......
aspÏνÓMssqlµÄ°ì·¨¼°³£¼ûµÄ²î´í
//µÚÒ»ÖÖд·¨£º
MM_conn_STRING = "Driver={SQL Server};server=(local);uid=sa;pwd=;database=infs;"
Set conn = Server.Createobject("ADODB.Connection")
conn.open MM_conn_STRING
SET RS=SERVER.CreateObject("ADOBD.recordset")
SQL="SELECT * from TABLE ORDER BY ID DESC"
R ......
·½·¨Ò» : ½ûÓÃHTML
×î¼òµ¥µÄ·½·¨ÊÇÖ±½Ó½ûÓÃhtml±êÇ©¶ø²»ÓÃÒÆ³ýËüÃÇ. ¿ÉÒÔʹÓÃReplace()º¯Êý. ÀýÈç:
strText = Replace(strText, "<script", "<script", 1, -1, 1)
»òÕßÖ±½Ó½ûÓÃËùÓеÄhtml:
strText = Replace(strText, "<", "<")
ÕâÑù×öËäÈ»ºÜ°²È«,µ«ÏԵò»¹»ÓѺÃ.(Óû§Ìá½»µÄÎı¾»á±äµ ......
ÔÚÎÄÕµ÷ÊÔJavaScript/VB Script½Å±¾³ÌÐò£¨Wscriptƪ£©ÀïÃæ£¬ÓÐÍøÓÑÎÊÎÒÈçºÎµ÷ÊÔASPÀïÃæµÄ½Å±¾³ÌÐò£¬ÎÒ²»ÖªµÀËûÎʵÃÊǵ÷ÊÔASPÍøÒ³ÀïÃæµÄVBScript ASP´úÂ룬»¹ÊÇASP.NETÍøÒ³ÀïÃæµÄJavaScript/VBScript¿Í»§¶Ë´úÂ룬ËùÒÔÎÒ¾ÍÔÚÕâÆªÎÄÕÂÀïÃæÏȽ«µ÷ÊÔASPÍøÒ³ÀïÃæµÄASP´úÂëÕâÖÖÇé¿ö¶¼½âÊÍһϰɡ£
¹À¼ÆASPÕâ¸öÍæÒÕÓõÄÈËÒѾºÜÉÙ ......
±¾»úip[¿Í»§¶Ë]:
request.servervariables("remote_addr")
´ÓÄĸöÒ³Ãæ×ªµ½µ±Ç°Ò³ÃæµÄ£º
Request.ServerVariables("HTTP_REFERER")
µÃµ½±¾Ò³µØÖ·£º
<%="http://" + Request.ServerVariables("SERVER_NAME") + ":" + Request.ServerVariables("SERVER_PORT") + reques ......