<% 'Call UserAuth(Session("id")) '### 권한 체크(회원 로그인을 안했으면 돌아가기) Dim idx, userAge, subject, writeDate, contents, fileName1, fileSize1, fileName2, fileSize2, hit, branchCode Dim SQL, RS, tableName 'If Len(Session("simple_name"))+Len(Session("user_id")) < 1 Then ' RESPONSE.WRITE ExecJavaAlert("로그인후 이용해주세요.",0) ' RESPONSE.End 'End If tableName = "TB_CSCENTER_GIFT" '### DB 테이블명 idx = Trim(Request("idx")) SQL = "SELECT userId, idx, userAge, subject, writeDate, contents, fileName1, fileSize1, fileName2, fileSize2, fileName3, fileSize3, hit, branchCode," SQL = SQL & " (SELECT MAX(idx) FROM " & tableName & " WHERE idx < t1.idx ) as previdx, (SELECT MIN(idx) FROM " & tableName & " WHERE idx > t1.idx) as nextidx FROM " & tableName & " t1" SQL = SQL & " WHERE idx = " & idx Set RS = Dbcon.Execute(SQL) idx = RS("idx") uesrId = RS("userId") userAge = RS("userAge") subject = RS("subject") contents = RS("contents") contents = Replace(contents, chr(13) & chr(10), "
") fileName1 = RS("fileName1") fileSize1 = RS("fileSize1") fileName2 = RS("fileName2") fileSize2 = RS("fileSize2") fileName3 = RS("fileName3") fileSize3 = RS("fileSize3") writeDate = RS("writeDate") hit = RS("hit") branchCode = RS("branchCode") previdx = RS("previdx") nextidx = RS("nextidx") '조회수 증가 SQL = "UPDATE " & tableName & " SET hit = " & hit + 1 SQL = SQL & " WHERE idx = " & idx Dbcon.Execute(SQL) RS.Close Set RS = Nothing %>

Home
고객만족센터
고객선물함

제목	<%=subject%>
<%=contents%> <% If fileName1 <> "" Then Response.Write " " End If If fileName2 <> "" Then Response.Write " " End If If fileName3 <> "" Then Response.Write " " End If %>

<% If Session("admin_div") > 0 Or Trim(Session("user_id")) = uesrId Then %> <% End If %> <% If previdx <> "" Then%> <% END If %> <% If nextidx <> "" Then%><% END If %>