admin_htmlinfo.asp

官方最新的南方数据v12生成静态商业版。全站生成静态。

<!--#include file="conn.asp"-->
<!--#include file="admin.asp"-->
<!--#include file="../inc/Const.asp" -->
<!--#include file="../inc/config.asp" -->
<!--#include file="Admin_htmlconfig.asp"-->
<link rel="stylesheet" href="Image/Admin_style.css">

<br />
<table width="98%" border="0" cellspacing="0" cellpadding="0" align="center">
  <tr>
    <td width="300"><table width="100%" border="0" cellspacing="0" cellpadding="1">
        <tr>
          <td style="border-bottom: #ccc 1px solid; border-top: #ccc 1px solid; border-left: #ccc 1px solid; border-right: #ccc 1px solid"><img src="Image/Survey_1.gif" width="0" height="16" id="bar_img" name="bar_img" align="absmiddle"></td>
        </tr>
      </table></td>
    <td><span id="bar_txt2" name="bar_txt2" style="font-size:12px; color:red;"></span><span id="bar_txt1" name="bar_txt1" style="font-size:12px">0</span><span style="font-size:12px">%</span></td>
  </tr>
</table>
<%
totalrec=Conn.Execute("select count(*) from 0791idc_Aboutus")(0)
sql="Select * from 0791idc_Aboutus order by ID desc"
Set rshtml=Conn.Execute(sql)
if totalrec=0 then
Detail_Num=0
Else
Detail_Num=1
do while not rshtml.eof
ID=rshtml("ID")
call htmll("","",""&AboutNameDiy&""&Separated&""&ID&"."&HTMLName&"","Aboutus.asp","ID=",ID,"","")
Response.Write "<script>bar_img.width="&Fix((Detail_Num/totalrec)*300)&";"
Response.Write "bar_txt1.innerHTML=""已成功生成静态页"&Detail_Num&"页，完成比例：" & formatnumber(Detail_Num/totalrec*100) & """;</script>"
Response.Flush
rshtml.movenext
Detail_Num=Detail_Num+1
loop
end if
rshtml.close
set rshtml=Nothing
conn.close
set conn=Nothing
%>