<%SESSION.codepage=932%> <% keyfield = request("keyfield") key = request("key") if request.querystring("page")= "" then page = 1 else page = int(request.querystring("page")) end if set db = server.createobject("adodb.connection") '??? ?? db.open(strConnect) set rs = server.createobject("adodb.recordset") rs.cursortype = 1 if key = "" then rs.Open "SELECT * FROM jppds ORDER BY ref DESC,re_step ASC", db else rs.Open "SELECT * FROM jppds WHERE " & keyfield & " LIKE N'%" & key & "%' ORDER BY ref DESC,re_step ASC", db end if 'rs.open sql,db %> DKAustech Co. LTD,.
 
 
 

Home > 支援センタ > 製品資料室
 
 
No
Title
File
Write
Date
Counter
<% if rs.eof then '?? ??? ??? ?? if_1 %>
Sorry.Content not found
<% else 'if_1 else %> <% rs.PageSize = 11 '???? ?? totalRecord = rs.RecordCount 'chartter_num? ??? ??? lastnum = rs("num") cPage = page if page <> "" Then if cPage < 1 Then cPage = 1 end if else page = 1 cPage = 1 end if rs.AbsolutePage = cPage lastpg = int(((totalRecord -1) / rs.PageSize) + 1) if page > lastpg then page = lastpg end if no=rs.recordcount-((page-1)*rs.pagesize) i=rs.pagesize while not rs.eof and i > 0 title = rs("title") '? ?? ?? if Len(title) >= 24 then title = left(title, 15) & "..." end if %> <% if rs("upfile") <> "" then%> <% else %> <% end if%> <% no=no-1 i=i-1 rs.movenext Wend %>
<%=no%>

<% if rs("re_level")>0 then %> " height="10">  &page=<%=page%>" onfocus='this.blur()' ;><%=title%> <% else %> &page=<%=page%>" onfocus='this.blur()' ;><%=title%> <% end if %>

 
<%=left(rs("writeday"),10)%>
<%=rs("readnum")%>
<% end if 'if_1 end %> <% if SESSION("dongkwang_competence") <> "" then %> <% end if%>
    <% if rs.bof then '?? ??? ??? ?? if_2 %>
     
<% else 'if_2 else %>
<%if key <> "" then %> <% if page>1 then %> <% else %> <% end if %> <%else %> <% if page>1 then %> <% else %> <% end if %> <%end if%>
<% if NoData = False then ViewPageNum = 10 temp1 = int(cpage / ViewPageNum) temp2 = cpage mod ViewPageNum temp3 = int(lastpg / ViewPageNum) endsign = 0 if temp2 = 0 then temp1 = temp1 - 1 end if for i=1 to ViewPageNum pagelist= temp1 * ViewPageNum + i if lastpg < pagelist then endsign=1 exit for end if if cint(pagelist) = cint(cpage) then %> <%=pagelist%> <% else %> <%if key = "" then %> onfocus='this.blur()' ;><%=pagelist%> <%else%> &key=<%=key%>&keyfield=<%=keyfield%> onfocus='this.blur()' ;><%=pagelist%> <%end if%> <% end if next end if %>
<%if key <> "" then %> <% if page < rs.pagecount then%> <% else %> <% end if %> <%else %> <% if page < rs.pagecount then%> <% else %> <% end if %> <%end if%>
<% end if 'if_2 end %> 		  <% if SESSION("dongkwang_competence") <> "" then %> <%end if%>
[AdminMenuPage]