<%@ LANGUAGE=VBScript CodePage=936%>
<!--#include file="Inc/Const.asp"-->
<!--#include file="Inc/Sysconn.asp"-->

<!--#include file="Head.asp"-->
<%
'***********************************************************************************
' 產(chǎn)品名稱：CSYS.COM.CN企業(yè)全站管理系統(tǒng)（V2007簡體中文版）
' 聯(lián)系：QQ：61128110　Emial：61128110@163.com
' Copyright 2006 www.csys.com.cn - All Rights Reserved. 
'***********************************************************************************

    Set Rs_Manage=server.Createobject("Adodb.Recordset")
    Sql="Select * from FQA where Work_Flag=1 order by Work_Date desc"
    Rs_Manage.open Sql,Conn,1,1
    Class_Name="常見問題"
	Page_Name=Class_Name & " -- " & Web_Const(0)
    Call Page_Head()
    Call Page_iHead()
    Call Page_nHead()
    %>
    <table width="990" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td width="321" valign="top" bgcolor="#082421"><span>
          <%Call Page_Login()%>
        </span></td>
        <td rowspan="2" valign="top"><table width="100%"  border="0" align="center" cellpadding="0" cellspacing="0">
          <tr>
            <td valign="top" class="TABLE-Main"><div class="page-head">常見問題</div>
                <div class="TABLE-Mainall">
                  <%
             Page_Nexterror=4
            Rs_Manage.PageSize = WorkMax_Class
            totalrec=Rs_Manage.RecordCount 
            iPageSize=Rs_Manage.PageSize
            currentPage=request("page")
            IF currentpage="" THEN
                currentpage=1
            Else
                IF Not isChkInteger(currentPage) THEN response.Redirect "javascript:history.go(-1);"
                    currentpage=clng(currentpage)
                End IF
                IF totalrec mod Cint(iPageSize)=0 THEN
                    n= totalrec \ Cint(iPageSize)
                Else
                    n= totalrec \ Cint(iPageSize)+1
                End IF
                IF Not (Rs_Manage.bof and Rs_Manage.eof) THEN
                    Rs_Manage.MoveFirst
                    IF currentpage > n THEN currentpage = n
                    IF currentpage<1 THEN currentpage=1
                    Rs_Manage.Move (currentpage-1) * Cint(iPageSize)
                    While Not Rs_Manage.Eof And page_count<Cint(iPageSize)
                        page_count=page_count+1
                        %>
                  <div class="work-classcontent"><span style="width:80%;"><img src="Skins/Blue/Tx_Ar4.gif" /> <a href="Worki.asp?Id=<%=Rs_Manage("Work_Id")%>" title="案例名稱：<%=Rs_Manage("Work_Title")%>添加時間：<%=YearDa(Rs_Manage("Work_Date"))%>"><%=gotTopic(Rs_Manage("Work_Title"),26,1)%></a></span><span style="width:20%;"><%=YearDa(Rs_Manage("Work_Date"))%></span></div>
                  <div class="type-height2"></div>
                  <%
                    Rs_Manage.MoveNext
                    Wend 
                End IF
            Rs_Manage.Close
            Set Rs_Manage=Nothing
            Call Page_Next()%>
              </div></td>
            <td width="5"></td>
            <td width="195" align="center" valign="top" class="TABLE-Side"><div class='TABLE-side1'><span class="type-color1">產(chǎn)品搜索</span></div>
                <div class='TABLE-side3'>
                  <%Call page_Search("Products")%>
                </div>
              <div class='TABLE-side1'><span class="type-color1">訂單搜索</span></div>
              <div class='TABLE-side3'>
                <%Call page_Search("ShopCode")%>
              </div></td>
          </tr>
        </table></td>
      </tr>
      <tr>
        <td valign="bottom" bgcolor="#082421" class="leftbg"><img src="Skins/blak/leftad.jpg" width="321" /></td>
      </tr>
    </table>
    <%
    Call Page_iBottom()
    Call Page_Bottom()
    Call CloseConn()
    %>