<% if Session("LoginStatus")<>"yes" then response.Redirect("noauthority.asp") end if %>
SMALL CYCLADES MANAGER >LINKS MANAGER>INSERT NEW ENTRY
<% FUNCTION fixme(theString) fixme=REPLACE(theString,"'","`") END FUNCTION desc=request.Form("desc") coder=request.Form("coder") descen=request.Form("descen") link=request.Form("link") key=request.Form("key") keyen=request.Form("keyen") atype=request.Form("type") apriority=request.Form("priority") 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="INSERT INTO `links` ( `id` , `link` , `england` , `greece` , `desc` , `descen` , `keywords` , `keywordsen` , `priority` , `photo` , `vtype` , `type`) VALUES ('', '" & fixme(link) & "','yes', 'yes', '" & fixme(desc) & "', '" & fixme(descen) & "', '" & fixme(key) & "', '" & fixme(keyen) & "', '" & fixme(apriority) & "', 'no','" & fixme(coder) & "','" & fixme(atype) & "');" myconnection.execute sql %> NEW ENTRY COMPLETED
>>LINKS MANAGER
>>MAIN MENU