1.ASP实现怎样横列显示（1横两张）代码总显示错误'loop' 语句缺少 'do'
2.怎么用http语言或者ASP语言实现几张在一个位置的片展通告程序源码自动循环展示？

ASP实现怎样横列显示（1横两张）代码总显示错误'loop' 语句缺少 'do'

       ：<%

       Const RootDir = "" '根目录则留空

       const companyname=""

       Const UpFileType="gif,jpg,bmp,png,swf,doc" '允许的上传文件类型

       Const SaveUpFilesPath="/upload" '存放上传文件的目录

       Const MaxFileSize= '上传文件大小限制:M

       Const picFrame=true '是否加边框

       Const MaxPerPagePhoto=6 '展示,每页几张

       '///////////////////////////////////如果要加,应该在这个位置加上以下代码

       do while not rs.Eof

       '//////////////////////////////////

       rs.movenext

       i=i+1

       if i mod 2=0 then

       response.write"</tr><tr>"

       end if

       '/////////////////////////////////////////////////////////////////这个地方你用了loop ,前面就应该用do while ///

       loop

       '///////////////////////////////////

       Const MaxPerPagejob=2 '职位列表

       Const properpage=9 '每页产品数目

       Const MaxPerPagePhoto1=3

       %>

怎么用http语言或者ASP语言实现几张在一个位置的自动循环展示？

       <img id="imgZone" />

       <script language="javascript">

        var speed = ; // 切换速度（秒）

        var flagrnd = true; // 是否随机切换

        var arrimg = new Array();

        var imglen = ; // 张数

        var curimg = 0; // 当前显示的代号

        for(i = 0; i < imglen; i++)

        { // 初始化

        arrimg[i] = new Image();

        arrimg[i].src = ("images/" + i + ".jpg");

        // 以.jpg,.jpg...放在images文件夹

        }

        function display()

        {

        var nextimg = (++curimg) % imglen;

        if(flagrnd)

        {

        nextimg = Math.floor(Math.random() * imglen);

        }

        changeImg(nextimg);

        setTimeout("display()", speed);

        }

        function changeImg(i)

        {

        var img = document.getElementById("imgZone");

        img.src = arrimg[i].src;

        }

        display();

       </script>