<%@ LANGUAGE = VBScript %>
<%
Option Explicit
Response.Expires = 0
'On Error Resume Next


Dim intCounter
Dim objitem
%>

<!--#include virtual="asppages/silvi/_include/preheader.inc" -->
<html>
  <head>
    <title>ASP Diverses: HTML-Encode</title>
<!--#include virtual="asppages/silvi/_include/header.inc" -->
</head>

<body>
<p>HTML-Encoding von Zeichen</p>
<table border="1">
<tr><td>Nr</td><td>Zeichen</td><td>HTML-Encoding</td></tr>
<%
For intCounter = 33 To 255 
  response.write("<tr><td>" & intCounter & "</td><td><b>" & Server.HTMLEncode(Chr(intCounter)) & "</b></td><td>" & _
    Server.HTMLEncode(Server.HTMLEncode(Chr(intCounter)))&"</td></tr>" & vbCrLf)
next
%>

</table>
<!--#include virtual="asppages/silvi/_include/inchtmlnachspann.asp" -->
</body>
</html>
Demo: beispiele/090htmlencode.asp

Letzter Update: 26.12.2021 16:48

Zurück zur Liste mit ASP-Beispielen auf  www.ecotronics.ch