Asp计数器和图片显示

 <% '======== 2006-10-10 Add a counter
            Dim theMaxNumb
            Dim theSql
            Dim execSql
                            
            execSql = "update tEmailServicesVisit set theId = theId + 1"
            conn.Execute(execSql)
            
            theSql         = "select max(theID) as theMaxId from tEmailServicesVisit"
            theMaxNumb     = conn.execute(theSql)(0) 

            Response.Write(theMaxNumb)
%>

 

图片显示

<script language="javascript" runat="server">
    var theCount="223"; // input your counter numb.
    var showNum = "";
    for(i=0; i< theCount.length; i++)
    ...{
        digi = theCount.substr(i,1);
        showNum += "<img src='num//" + digi + ".gif'>";
    }
    document.write(showNum);
</script>