<% if Session("LoginStatus")<>"yes" then response.Redirect("noauthority.asp") end if %>
SMALL CYCLADES MANAGER >SHOP (GR) MANAGER>INSERT NEW ENTRY
<% FUNCTION fixme(theString) fixme=REPLACE(theString,"'","`") END FUNCTION island=request.Form("island") title=request.Form("title") desc=request.form("desc") typer=request.form("type") tel=request.form("tel") priority=request.form("priority") myDSN="DSN=smallcyclades_com;uid=ferrari;pwd=VXJjMXwm;" set myconnection=server.createobject("adodb.connection") myconnection.open myDSN sql="INSERT INTO `shopgr` ( `id` , `priority` , `island` , `title` , `description` , `photo` , `telephone` , `type`) VALUES ('', '" & fixme(priority) & "', '" & fixme(island) &"', '" & fixme(title) & "', '" & fixme(desc) & "', 'no" & "', '" & fixme(tel) & "', '" & fixme(typer) & "');" myconnection.execute sql %> NEW ENTRY COMPLETED
>>SHOP (GR) MANAGER
>>MAIN MENU