Ò»¸öASPÌæ»»º¯ÊýimgÀïÃæ¶àÓàµÄ´úÂë
Ò»¸öASPÌæ»»º¯ÊýimgÀïÃæ¶àÓàµÄ´úÂë
<%
Response.Write(Server.HTMLEncode(FixImg("<img onclick=""if(this.width>screen.width-461) window.open('qq/20082181405371.jpg');"" alt="""" border=""0"" src=""qq/20082181405371.jpg"" />")))
%>
<%
'¹¦ÄÜ:½«IMG´úÂë¸ñʽ»¯Îª<img src="XXX" />¸ñʽ.
Function FixImg(sString)
Dim sReallyDo, regEx, iReallyDo
Dim oMatches, cMatch
Dim tStartTime, tEndTime
If IsNull(sString) Then
FixImg = ""
Exit Function
End If
sReallyDo = sString
On Error Resume Next
sReallyDo = Replace(sReallyDo, vbCr, " ")
sReallyDo = Replace(sReallyDo, vbLf, " ")
sReallyDo = Replace(sReallyDo, vbTab, " ")
sReallyDo = Replace(sReallyDo, "<img ", vbCrLf & "<img ", 1, -1, 1)
sReallyDo = Replace(sReallyDo, "/>", " />", 1, -1, 1)
sReallyDo = ReplaceAll(sReallyDo, "= ", "=", True)
sReallyDo = ReplaceAll(sReallyDo, "> ", ">", True)
sReallyDo = Replace(sReallyDo, "><", ">" & vbCrLf & "<")
sReallyDo = Trim(sReallyDo)
On Error GoTo 0
Set regEx = New RegExp
regEx.IgnoreCase = True
regEx.Global = True
'//È¥³ýonclick,onloadµÈ½Å±¾
regEx.Pattern = "\s[on].+?=([\""|\'])(.*?)\1"
sReallyDo = regEx.Replace(sReallyDo, "")
'//½«SRC²»´øÒýºÅµÄͼƬµØÖ·¼ÓÉÏÒýºÅ
regEx.Pattern = "<img.*?\ssrc=([^\""\'\s][^\""\'\s>]*).*?>"
sReallyDo = regEx.Replace(sReallyDo, "<img src=""$1"" />")
'//ÕýÔòÆ¥ÅäͼƬSRCµØÖ·
regEx.Pattern = "<img.*?\ssrc=([\""\'])([^\""\']+?)\1.*?>"
sReallyDo = regEx.Replace(sReallyDo, "<img src=""$2"" />")
FixImg = sReallyDo
End Function
%>
<%
'¹¦ÄÜ£º·µ»Ø×Ö·û´®£¬ÆäÖÐÖ¸¶¨ÊýÄ¿µÄij×Ó×Ö·û´® È«²¿ ±»Ì滻ΪÁíÒ»¸ö×Ó×Ö·û´®¡£
'À´Ô´£ºhttp://jorkin.reallydo.com/article.ASP?id=406
'ÐèÒªBintº¯Êý:http://jorkin.reallydo.com/article.ASP?id=395
Function ReplaceAll(sExpression, sFind, sReplaceWith, bAll)
If IsNull(sExpression) Then ReplaceAll = "" : Exit Function
If (StrComp(bAll, "True", 1) = 0) Or (CBool(Bint(
Ïà¹ØÎĵµ£º
±éÀúXMLÎĵµ
¶ÔÓÚÏÂÃæµÄÒ»¶ÎXML´úÂ룺
XMLÎĵµÊµÀýbooks.xml£¬ÈçÏÂËùʾ£º
<?xml version="1.0" encoding="gb2312" ?>
<books>
<book status="ÒÑÊÛÍê">
<author>ÆÆÆÆ</author>
<title>XMLÈëÃÅ</title >
</book>
<book statu ......
µÚÒ»ÖÖ£º
'ʹÓÃÊý¾Ý¿âÁ¬½Ó¶ÔÏó²éѯÊý¾Ý¼¯¶ÔÏó£¬Óà set±äÁ¿½ÓÊÕ¡£
set rset1 = conn.execute("select * from productType where id="&request("id"))
'±íʾֻÄÜÈ¡³ö½á¹û¼¯ÀïÃæµÄÖµ£¬µ«ÊDz»ÄÜÈ¡µ½×ܵÄÌõÊýÖ®ÀàµÄ¡£¡£¡£
set rset2 = conn.execute("select top 8 * from productType ......
ÓÉÓÚASP±à³Ì±È½Ï¼òµ¥£¬ËùÒÔÔÚÆóÒµÖÐÓкܶàµÄ¼òµ¥Ó¦Óö¼ÊÇ»ùÓÚÔÚWindows 2000 Server£«ASP£«MSSQLÉϵġ£¶øÕâÒ²ÊÇÆóÒµÏë°ÑÓ¦ÓÃǨÒƵ½Linux»·¾³µÄÆäÖÐÒ»´óÕÏ°¡£ÈôÒª´ïµ½Ç¨ÒƵÄÄ¿µÄ£¬Í¨³£ÓÐÁ½ÖÖ·½Ê½£º
ÒýÓÃ
1¡¢°ÑASP¸ÄPHP£¬MSSQL»»Mysql£¬Ð§¹ûºÃ£¬ÐÔÄÜÎȶ¨£¬¿É¿¿ÐÔÇ¿£¬µ«ºÄ·Ñʱ¼ä±È½Ï¶à£¬·ÑÓñȽϸߣ¬Óû§²»ÈÝÒ×½ÓÊÜ£»
2¡¢È ......
ÌâÍâ»°£ºÈ¥ÄêÖÁ½ñÄêÒÔÀ´£¬Â½Ðøд¹ýһЩԴ´µÄÎÄÕÂÁË£¬ºÜ¶àÊǶÔÔÀ´Ëù×öÏîÄ¿µÄ×ܽᡣËùÒÔ²¢²»ÊǺÜϵͳºÜÈ«Ã棬¶¼ÊÇÕë¶Ôij¸ö֪ʶµã»òÕßij¸ö¾ßÌåÓ¦ÓÃдµÄ£¬ÓÐЩÅóÓѽ¨ÒéÎÒ°Ñ×Ô¼ºµÄÌå»áд³ÉÒ»¸öϵͳµÄ£¬Õâ´ÎËãÊÇÒ»¸ö³¢ÊÔ°É£¬Ð´µÃ²»ºÃµÄµØ·½Çë´ó¼Ò¾¡Á¿Å×Î÷ºìÊÁ²»Òª¶ª×©Í·¡£
Ö®ËùÒÔ°ÑÕâ¸öϵÁнÐ×ö¡¶asp.netÒ¹»°¡·£¬ÊÇÓÐһЩÔÒ ......
³£ÓõÄÖض¨Ïò·½Ê½ÓÐ: 301 redirect, 302 redirect Óë meta fresh£º
ASP ÖУ¬ÎÒÃÇÏ°¹ßʹÓà Response.Redirdect À´ÊµÏÖÒ³ÃæµÄÌøת£¬µ«ÊÇÕâÖÖÌøת·½Ê½µÄ״̬ÊÇ 302 µÄ£¬ÊôÓÚÁÙʱÌøת£¬¶ÔÓÚËÑË÷ÒýÇæÀ´Ëµ£¬ÊÇÒ»ÖÖ²»ÓѺõÄÖض¨Ïò·½Ê½¡£
ASP 3.0 ÖУ¬ÓÐÁËÁíÒ»ÖÖ·½Ê½£¬¼´ Response.Transfer ¡£¹ØÓÚÕâ¸ö£¬¿ÉÒÔ²éѯÏà¹ØµÄÐÅÏ¢¡£
......