<% if Session("LoginStatus")<>"yes" then response.Redirect("noauthority.asp") end if %>
SMALL CYCLADES MANAGER >LINK 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 `links` SET `greece` = 'yes' WHERE `id` = " & whichnew else sql="UPDATE `links` SET `greece` = 'no' WHERE `id` = " & whichnew end if myconnection.execute sql %> CHANGE COMPLETE
>>VIEW/ MODIFICATE LINKS
>>LINKS MANAGER
>>MAIN MENU