Sending a PICS label (VB.net)

<%@ Page Language="vb" %>
<html>
   <head>
      <title>Sending a PICS label in ASP.NET</title>
      <script runat="server">
         Sub Page_Load()
            Dim PICSLabel As String
            PICSLabel &= "(PICS-1.1 <http://www.rsac.org/ratingsv01.html> "
            PICSLabel &= "labels on " & Chr(34)
            PICSLabel &= "2001.08.01T06:00-0000" & Chr(34)
            PICSLabel &= " until " & Chr(34)
            PICSLabel &= "2002.02.28T23:59-0000" & Chr(34)
            PICSLabel &= " ratings (V 1 S 2 L 3 N 1))"
            Response.PICS(PICSLabel)
            Message.Text = PICSLabel
         End Sub
      </script>
   </head>
<body>
   <asp:label id="Message" runat="server"/>
</body>
</html>

Sending a PICS label (VB.net) : PICS « Response « ASP.Net

Related examples in the same category