📄 adrot.asp

📁 集合了学习asp的100个实例

💻 ASP

字号:

<%@ LANGUAGE = VBScript %>

<%  Option Explicit %>

<HTML>

     <HEAD>

         <TITLE>动态广告条</TITLE>

     </HEAD>

     <BODY BGCOLOR="White" TOPMARGIN="10" LEFTMARGIN="10">

         <FONT SIZE="4">

         <B>动态广告条</B></FONT>

        <center>

        <%

           Dim objAd 

           Set objAd = Server.CreateObject("MSWC.AdRotator")

           %>

           <%= objAd.GetAdvertisement("adrot.txt") %><BR>

</center>

<HR SIZE="1" COLOR="#000000">

<Center><A HREF="AdRot.asp">重新访问本页</A></center>

     </BODY>

</HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -