asp³£ÓõÄÕýÔò±í´ïʽʵÏÖ×Ö·û´®µÄÌæ»»
asp³£ÓõÄÕýÔò±í´ïʽʵÏÖ×Ö·û´®µÄÌæ»»,Ö÷Òª°üÀ¨È¥³ýhtml±êÇ©£¬È¥³ýclass±êÇ©ºÍÈ¥³ýscript±êÇ©µÈ
È¥³ýhtml±êÇ©ÕýÔò<\/*[^<>]*>
Function LoseHtml(ContentStr)
Dim ClsTempLoseStr,RegEx
ClsTempLoseStr = Cstr(ContentStr)
Set RegEx = New RegExp
RegEx.Pattern = "<\/*[^<>]*>"
RegEx.IgnoreCase = True
RegEx.Global = True
ClsTempLoseStr = RegEx.Replace(ClsTempLoseStr,"")
Set RegEx = Nothing
LoseHtml = ClsTempLoseStr
End function
È¥³ýÍøÒ³ÖеÄclass
Function LoseClassTag(ContentStr)
Dim ClsTempLoseStr,RegEx
ClsTempLoseStr = Cstr(ContentStr)
Set RegEx = New RegExp
RegEx.Pattern = "(class=){1,}(""|\'){0,1}\S+(""|\'|>|\s){0,1}"
RegEx.IgnoreCase = True
RegEx.Global = True
ClsTempLoseStr = RegEx.Replace(ClsTempLoseStr,"")
LoseClassTag = ClsTempLoseStr
Set RegEx = Nothing
End Function
Function LoseScriptTag(ContentStr)
Dim ClsTempLoseStr,RegEx
ClsTempLoseStr = Cstr(ContentStr)
Set RegEx = New RegExp
RegEx.Pattern = "(<script){1,}[^<>]*>[^\0]*(<\/script>){1,}"
RegEx.IgnoreCase = True
RegEx.Global = True
ClsTempLoseStr = RegEx.Replace(ClsTempLoseStr,"")
LoseScriptTag = ClsTempLoseStr
Set RegEx = Nothing
End Function
Function LoseIFrameTag(ContentStr)
Dim ClsTempLoseStr,RegEx
ClsTempLoseStr = Cstr(ContentStr)
Set RegEx = New RegExp
RegEx.Pattern = "(<iframe){1,}[^<>]*>[^\0]*(<\/iframe>){1,}"
RegEx.IgnoreCase = True
RegEx.Global = True
ClsTempLoseStr = RegEx.Replace(ClsTempLoseStr,"")
LoseIFrameTag = ClsTempLoseStr
Set RegEx = Nothing
End Function
Function LoseObjectTag(ContentStr)
Dim ClsTempLoseStr,RegEx
ClsTempLoseStr = Cstr(ContentStr)
Set RegEx = New RegExp
RegEx.Pattern = "(<object){1,}[^<>]*>[^\0]*(<\/object>){1,}"
RegEx.IgnoreCase = True
RegEx.Global = True
ClsTempLoseStr = RegEx.Replace(ClsTempLoseStr,"")
LoseObjectTag = ClsTempLoseStr
Set RegEx = Nothing
End Function
Function LoseSpanTag(Conte
Ïà¹ØÎĵµ£º
dim arr(36),xx,tt,tmp
for xx=1 to 36
arr(xx-1)=xx
next
for xx=1 to 5
Randomize
tt=clng((ubound(arr)-xx)*rnd())
response.write(arr(tt) & "<br>")
tmp=arr(tt)
arr(tt)=arr(ubound(arr)-xx)
arr(ubou ......
ajax+asp.net+mssqlʵÏÖµÄajaxÎÞË¢ÐÂÁÄÌìÊÒ£¬Ö§³Öhtml web±à¼Æ÷¡£
ΪÁ˼ӿìËٶȣ¬Ê¹ÓÃÁË´æ´¢¹ý³Ì¡£
asp¼°php°æ±¾Çë¿´ÏÂÃæµÄÎÄÕÂ
ajax+asp+mssqlÎÞË¢ÐÂÁÄÌìÊÒ
ajax+php+mssqlÎÞË¢ÐÂÁÄÌìÊÒ
´ËÀý×ÓÒ²¿ÉÒÔ×÷Ϊmssql´æ´¢¹ý³ÌʹÓõÄʾÀý£¬Èçphpµ÷ÓÃmssqlµÄ´æ´¢¹ý³Ì£¬php»ñÈ¡mssqlÊý¾Ý¿âµÄÊä³ö²ÎÊý¡£
ҪʹÓò»Í¬µÄ¶¯Ì¬Ò³Ãæ£ ......
´ò¿ªFCKEditor/Editor/Filemanager/Connectors/Asp/Commands.aspÎļþ£¬ÐÞ¸ÄFileUploadº¯Êý£¬ÈçÏÂËùʾ£º
Sub FileUpload( resourceType, currentFolder, sCommand )
Dim oUploader
Set oUploader = New NetRube_Upload
oUploader.MaxSize = 0
oUploader.Allowed = ConfigAllowedExtensions.Item( ......
¼ÆËãÈòÄêÖ÷ÒªÊÇΪÁËÅжÏ2Ô·ݵÄÌìÊý£¬Ò»°ãÈòÄê2Ô·ÝÊÇ29Ì죬ƽÄê2Ô·ÝÊÇ28Ìì¡£¼ÆËãÈòÄêµÄËã·¨·Ç³£¼òµ¥£¬¼´£ºÄܱ»400Õû³ý£¬»òÕßÄܱ»4Õû³ý¶ø²»Äܱ»100Õû³ý¡£
Ëã·¨ÈçÏ£º
function isLeapYear(pYear)
set oreg=new RegExp
oreg.Pattern="^\d{4}$"
if n ......
ÔÚ ASP ÖУ¬ÓÐÁ½¸öºÜ³£Óõļ¯ºÏ£¬Ò»¸öÊÇ Request.QueryString£¬ÁíÒ»¸öÊÇ Request.Form¡£ÕâÁ½¸ö¼¯ºÏ¿ÉÒÔ»ñÈ¡ HTML ±íµ¥(HTML Forms) Ìá½»µÄÐÅÏ¢¡£
ÓÐ¹Ø HTML ±íµ¥£¬Çë²Î¼û HTML ½Ì³ÌÖÐµÄ HTML±íµ¥ Ò»Õ¡£
Request.QueryString
HTML ±íµ¥ÖÐµÄ method ÓÐÁ½ÖÖ£¬Ò»ÖÖÊÇ get£¬ÁíÍâÒ»ÖÖÊÇ post¡£µ± HTML ±íµ¥µÄ metho ......