2012-04-12
前臺文本編輯器:
 
 
 
 
 
  
  
  
  
  
第二個文本編輯器
前臺文本編輯器修改:
 <%
Dim htmlData
htmlData = rs("q9")
Function htmlspecialchars(str)
 str = Replace(str, "&", "&")
 str = Replace(str, "<", "<")
 str = Replace(str, ">", ">")
 str = Replace(str, """", """)
 htmlspecialchars = str
End Function
%>
 
  
  
第二個修改:
<%
Dim htmlData1
htmlData1 = rs("q11")
Function htmlspecialchars(str)
 str = Replace(str, "&", "&")
 str = Replace(str, "<", "<")
 str = Replace(str, ">", ">")
 str = Replace(str, """", """)
 htmlspecialchars = str
End Function
%>
  
  
   
后臺文本編輯器:
修改頁面
======================  
 <%
Dim htmlData
htmlData = rso("content")
Function htmlspecialchars(str)
 str = Replace(str, "&", "&")
 str = Replace(str, "<", "<")
 str = Replace(str, ">", ">")
 str = Replace(str, """", """)
 htmlspecialchars = str
End Function
%>
 
 
 
 
 
 
 
 
添加頁面
=================
 
 
 
 
 
 
 
 
================================================
上一條:北京網站建設
下一條:網站制作的藝術體現在哪些方面