% Dim idx, area, subject, writeDate, hit, gotopage Dim SQL, RS, tableName Dim page, totalpage, i, listnum, fileName Dim strNew Dim field, keyWord Dim sortName, sortValue Dim bgImg If Session("admin_div") <> "1" Then Response.Write "" Response.End End If gotopage = Trim(Request("gotopage")) field = Trim(Request("field")) keyWord = Trim(Request("keyWord")) keyWord = InjectionDefender(keyWord) 'ÀÎÁ§¼Ç °ø°Ý ¹æ¾î sortName = Trim(Request("sortName")) sortValue = Trim(Request("sortValue")) tableName = "TB_MODEL" '### DB Å×À̺í¸í fileName = "model.asp?field=" & field & "&keyWord=" & keyWord '### ÇöÀç ÆÄÀϸí Call CheckAuth(userId, mode) '### Á¢±Ù ±ÇÇÑ Ã¼Å© If gotopage = "" Then gotopage = 1 Else gotopage = Cint(gotopage) End If %>