Émission de bandeaux de publicité de la régie Comclick en VBScript / ASP Classic

Dans cette exemple

• Le code régie (Comclick) = 1
• Le code éditeur (OSInet) = 2008
• Le code site (osinet.fr) = 1
• Le numéro d'emplacement sur le site = 1

Comclick a disparu en 2008.

<%
'-- Emission des bandeaux de publicite
Private Sub ShowComclickAds
' Le code fourni par CC specifie hspace=""0"", vspace=""0"", bordercolor=""#000000"" dans les "iframe", mais ce n'est pas standard

Response.Write _
  "<tr id=""tdAds"" class=""raw"">" _
  & "<td class=""raw"" width=""468"" style=""background-color: red"" id=""tdComClick"">" _
  & "  <!-- Bandeau Comclick -->"         _
  & "  <iframe title=""Pub"" name=""ccBanner"""         _
  & "    src=""http://fl01.ct2.comclick.com/aff_frame.ct2?id_regie=1&amp;num_editeur=2008&amp;num_site=1&amp;num_emplacement=1"""  _
  & "    height=""60"" width=""468"" marginwidth=""0"" marginheight=""0"""      _
  & "    frameborder=""0"" scrolling=""no"" >" _
  & "    <script type=""text/JavaScript"""    _
  & "      src=""http://fl01.ct2.comclick.com/aff_js_src.ct2?id_regie=1&amp;num_editeur=2008&amp;num_site=1&amp;num_emplacement=1"">" _
  & "      </script>" _
  & "    <noscript><a href=""http://fl01.ct2.comclick.com/click_url.ct2?id_regie=1&amp;num_editeur=2008&amp;num_site=1&amp;num_emplacement=1"" target=""_blank""><img border=""0"" src=""http://fl01.ct2.comclick.com/aff_url.ct2?id_regie=1&amp;num_editeur=2008&amp;num_site=1&amp;num_emplacement=1"" alt="""" /></a></noscript>" _
  & "   </iframe></td>" & vbCRLF
 Response.Write "<td class=""raw"" style=""background-color: green ;"" width=""42"">&nbsp;</td>" & vbCRLF

'-- Vignette Comclick
Response.Write "<td class=""raw"" width=""90"">" _
  & "  <iframe title=""Pub"" name=""ccStamp"""  _
  & "    src=""http://fl01.ct2.comclick.com/aff_frame.ct2?id_regie=1&amp;num_editeur=2008&amp;num_site=1&amp;num_emplacement=2"""  _
  & "    height=""60"" width=""90"" marginwidth=""0"" marginheight=""0"""  _
  & "    frameborder=""0"" scrolling=""no"" >"  _
  & "    <script type=""text/JavaScript"""  _
  & "      src=""http://fl01.ct2.comclick.com/aff_js_src.ct2?id_regie=1&amp;num_editeur=2008&amp;num_site=1&amp;num_emplacement=2"">" _
  & "      </script>" _
  & "    <noscript><a href=""http://fl01.ct2.comclick.com/click_url.ct2?id_regie=1&amp;num_editeur=2008&amp;num_site=1&amp;num_emplacement=2"" target=""_blank""><img border=""0"" src=""http://fl01.ct2.comclick.com/aff_url.ct2?id_regie=1&amp;num_editeur=2008&amp;num_site=1&amp;num_emplacement=2"" alt="""" /></a></noscript>" _
  & "    </iframe>" _
  & "  </td>"       _
  & "</tr>" & vbCRLF
'-- Fin publicités Comclick

  end Sub
%>