Modificare il file:
\iwgallery\admin\users_active.asp
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <!--#include virtual="/iwgallery/Connections/connIWGallery.asp" --> <% if(Request.QueryString("iUser") <> "") then cmdActive__iUser = Request.QueryString("iUser") if(Request.QueryString("nUser") <> "") then cmdActive__nUser = Request.QueryString("nUser") %> <% set cmdActive = Server.CreateObject("ADODB.Command") cmdActive.ActiveConnection = MM_connIWGallery_STRING cmdActive.CommandText = "UPDATE USERS SET USE_ACTIVE = ABS (NOT USE_ACTIVE) WHERE USE_ID = " + Replace(cmdActive__iUser, "'", "''") + " AND USE_NAME = '" + Replace(cmdActive__nUser, "'", "''") + "'" cmdActive.CommandType = 1 cmdActive.CommandTimeout = 0 cmdActive.Prepared = true cmdActive.Execute() %> <% Response.Redirect(Request.ServerVariables("HTTP_REFERER")) %>
[
Íàçàä
]