<% if Session("LoginStatus")<>"yes" then response.Redirect("noauthority.asp") end if %>
SMALL CYCLADES MANAGER >HOTELS (EN) MANAGER>ACTIVATE
<% FUNCTION fixme(theString) fixme=REPLACE(theString,"'","`") END FUNCTION active=request("active") whichnew=request("whichnew") myDSN="DRIVER={MySQL ODBC 3.51 Driver}; SERVER=smallcycl.ipowermysql.com; DATABASE=ferrari_default; UID=ferrari;PASSWORD=!antihack!; OPTION=3" set myconnection=server.createobject("adodb.connection") myconnection.open myDSN if active="no" then sql="UPDATE `hotelsen2` SET `active` = 'yes' WHERE `id` = " & whichnew else sql="UPDATE `hotelsen2` SET `active` = 'no' WHERE `id` = " & whichnew end if myconnection.execute sql %> CHANGE COMPLETE ON ENTRY NO <% response.Write (hdd) %>
>>VIEW/ MODIFICATE HOTELS (EN)
>>HOTELS (EN) MANAGER
>>MAIN MENU