<%@language=vbscript%> <% Option Explicit Response.Expires = -1000 If isnull(Session("LoginID")) AND isempty(Session("LoginID")) Then Response.Redirect("default.asp?MSG=NOTLOGGED") End If Dim rsFeatures, strGetFeatures %> <% Set rsFeatures = Server.CreateObject("ADODB.Recordset") strGetFeatures = "SELECT FeatureID, FeatureTitle, FeatureDesc, FeatureImage, FeatureActive FROM tblFeatures WHERE FeatureID = " & Request("FID") & "" 'Response.Write(strGetFeatures) Set rsFeatures = oConn.Execute(strGetFeatures) %>

Edit Feature
These features will appear on the features page of the Jericho site.

If you have any problems with this section, please contact Web Site Support.

"> <% If NOT isempty(Request("MSG")) OR isnull(Request("MSG")) Then %> <% End If %>
<% If Request("MSG") = "LINKPOSTED" Then %>

NOTE: Your feature has been entered into the database

<% End If %>
Title: " size="50" maxlength="255" ID="Text1">
Description:
Image: " maxlength="255" ID="Text2">
Do you want to make this feature active now?    <% If rsFeatures("FeatureActive") = True Then %> <% Else %> <% End If %>