<% if Session("LoginStatus")<>"yes" then response.Redirect("noauthority.asp") end if %>
SMALL CYCLADES MANAGER >REAL ESTATE (EN) MANAGER>VIEW/MODIFY ENTRIES
<% FUNCTION fixme(theString) fixme=REPLACE(theString,"'","`") END FUNCTION shorty=request.Form("short") shortygr=request.Form("shortgr") lonqnews=request.Form("long") lonqnewsgr=request.Form("longgr") hdd=request.form("hd") titlerr=request.form("titler") titlerrgr=request.form("titlergr") price=request.form("price") hdd=request.form("hd") priority=request.form("priority") prtype=request.form("prtype") island=request.form("island") look=request.form("look") telephone=request.Form("telephone") mobile=request.Form("mobile") fax=request.form("fax") email=request.form("email") alt=request.form("alt") altgr=request.form("altgr") 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 sql="UPDATE `estateen` SET `title` = '" & fixme(titlerr) & "',`titlegr` = '" & fixme(titlerrgr) & "',`ektasi` = '" & fixme(shorty) & "',`ektasigr` = '" & fixme(shortygr) & "',`descr` = '" & fixme(lonqnews) & "',`descrgr` = '" & fixme(lonqnewsgr) & "',`price` = '" & fixme(price) & "',`alt` = '" & fixme(alt) & "',`altgr` = '" & fixme(altgr) & "',`priority` = '" & fixme(priority) & "',`type` = '" & fixme(prtype) & "',`nisi` = '" & fixme(island) & "',`lookingfor` = '" & fixme(look) & "',`telephone` = '" & fixme(telephone) & "',`mobile` = '" & fixme(mobile) & "',`fax` = '" & fixme(fax) & "',`email` = '" & fixme(email) & "' WHERE `id` = " & hdd myconnection.execute sql %> CHANGE COMPLETE ON ENTRY NO <% response.Write (hdd) %>
>>VIEW/ MODIFICATE REAL ESTATE (EN)
>>REAL ESTATE (EN) MANAGER
>>MAIN MENU