%
If Not session("admin_loggedin" & strSUnique) = Session.SessionID then Response.Redirect "default.asp"
%>
There are no payment transaction records in database.
" If Request.Form("flag") = "1" then If Request.Querystring.Count > 0 then If Request.Querystring.Item(1) = "all" then objConn.Execute("DELETE FROM " & tablPfx & "Plog;") Response.Redirect "admin_paylog.asp" End If Else If Len(Request.Form("C1")) > 0 then For each ID in request("C1") strRemoveID = strRemoveID & " OR ID = " & ID Next strRemoveID = Replace(strRemoveID, "OR", "", 1, 1, vbTextCompare) End If If len(strRemoveID) > 0 then strSQL = "DELETE FROM " & tablPfx & "Plog WHERE(" & strRemoveID & ");" objConn.Execute(strSQL) Response.Redirect "admin_paylog.asp" End If End If End If Dim totalPage, totalRecords, displayRecords strPlog = "SELECT " & tablPfx & "Plog.* FROM " & tablPfx & "Plog ORDER BY pdate DESC;" rs.PageSize = pp rs.CacheSize = pp rs.CursorLocation = 3 rs.Open strPlog, strConn, 0, 1 If rs.EOF then Response.Write msgEmptyLog Else %>