<!--#include file="../../Conn.asp"-->
<%
'==================================================================================
'oASK問答系統靜態頁面版
'官方演示站點：http://ask.officexy.com/
'官方支持論壇：http://club.officexy.com/
'聯系人：小楊
'聯系EMail：officexy.com@163.com
'鄭重聲明:
'    ①、免費版本請在程序首頁保留版權信息，并做上本站LOGO友情連接,商業版本無此要求;
'    ②、任何個人或組織不得在授權允許的情況下刪除、修改、拷貝本軟件及其他副本上一切關于版權的信息；
'    ③、Office學院保留此軟件的法律追究權利
'==================================================================================

dim i,rs
Call ask.OpenRS(rs, "select * from askQuestion", rsRead)
Response.write "共有 " & rs.RecordCount & " 個問題需要生成<br><br>"
i=0
while not rs.eof
  i=i+1
  Response.write "<b>第" & i & "個: </b>" & HTMLEncode(rs("title")) & " >>> "
  refreshq(rs("id"))
  response.flush
  rs.movenext
wend
%>