<% if Session("LoginStatus")<>"yes" then response.Redirect("noauthority.asp") end if %>
<% whichnewa=(request("whichnew")) myDSN="DSN=smallcyclades_com;uid=ferrari;pwd=VXJjMXwm;" set myconnection=server.createobject("adodb.connection") myconnection.open myDSN set ets=server.CreateObject("adodb.recordset") ets.activeconnection=myconnection ets.CursorType=adOpenStatic ets.Pagesize=10 rowcount=0 sql="select * from estategr where id=" & whichnewa ets.open sql,myconnection %>
SMALL CYCLADES MANAGER >REAL ESTATE (GR) MANAGER>VIEW/MODIFY ENTRIES
TITLE
ECTASIS
DESCRIPTION
PRICE
PROPERT TYPE <% select case ets.fields("type") case 1 %> <% case 2%> <% case 3%> <% case 4%> <% end select %>
ISLAND <% select case ets.fields("nisi") case 1 %> <% case 2 %> <% case 3 %> <% case 4 %> <% end select %>
LOOKING FOR <% select case ets.fields("lookingfor") case 1%> <% case 2%> <% end select %>
PRIORITY
>>REAL ESTATE (GR) MANAGER
>>MAIN MENU