<% 'Call UserAuth(Session("id")) '### 권한 체크(회원 로그인을 안했으면 돌아가기) Dim idx, categoryName, subject, contents, writeDate, hit Dim fileName1, fileSize1, fileName2, fileSize2, fileName3, fileSize3, view_href Dim SQL, RS, tableName Dim gotopage, totalpage, i, listnum, fileName Dim strNew, filePath Dim field, keyWord gotopage = Trim(Request("gotopage")) search_category = Request("search_category") searchString = Request("searchString") searchString = InjectionDefender(searchString) '인젝션 공격 방어 tableName = "TB_CSCENTER_GIFT" '### DB 테이블명 filePath = "/data/" & tableName If gotopage = "" Then gotopage = 1 Else gotopage = Cint(gotopage) End If If search_category <> "" And searchString <> "" Then search_qry = " and "&search_category&" like '%"&searchString&"%'" End If SQL = "SELECT idx, subject, contents, fileName1, fileName2, fileName3, writeDate, hit, branchCode FROM " & tableName & " A where 1=1 " & search_qry SQL = SQL & " ORDER BY writeDate DESC" Set RS = Dbcon.Execute(SQL) RS.PageSize = 9 '페이지당 리스트 수 totalpage = RS.PageCount '총 페이지 수 i=1 %>
유앤아이 고객만족센터

  • Home
  • 고객만족센터
  • 고객선물함
    <% If RS.eof Then %>
  • 자료가 없습니다.
    • <% Else RS.AbsolutePage = gotopage '지정된 페이지로 현재 위치 이동 listnum = RS.RecordCount-(gotopage-1)*RS.PageSize Do Until RS.eof Or i > RS.PageSize idx = RS("idx") subject = RS("subject") : If Len(subject) > 29 Then subject = Left(subject, 28) & ".." : contents = RS("contents") : If Len(contents) > 100 Then contents = Left(contents, 100) & ".." : fileName1 = RS("fileName1") fileName2 = RS("fileName2") fileName3 = RS("fileName3") writeDate = DateValue(RS("writeDate")) branch_Code = RS("branchCode") hit = RS("hit") view_href = "cscenter02_view.asp?idx=" & idx '새글 New 아이콘 표시 If GetNewBoardTime(24, RS("writeDate")) = True Then strNew = "" Else strNew = "" End If %>
  • <%=subject%>
    <%=Left(subject, 18)%> >
    • <% i = i + 1 listnum = listnum - 1 RS.MoveNext Loop End If RS.Close Set RS = Nothing %>
<% Set listNum = New PageNavi listNum.Initial "cscenter02.asp?vUserId="&vUserId&"&branchCode="&branchCode&"&vSid1="&vSid1&"&vSid2="&vSid2,10,gotopage,totalpage,search_category,searchString,optionstr,"","" listNum.pagePrint Set listNum = nothing %> <% If Session("admin_div") > 0 Then %> 글쓰기 <% End If %>