function CheckForm()
{
var f = document.forms[0];
if(f.FieldName.value == "")
{
alert("Please enter a name for this field.");
f.FieldName.focus();
return false;
}
if(isNaN(f.Size.value) || f.Size.value == "")
{
alert("Please enter a size for this field.");
f.Size.focus();
f.Size.select();
return false;
}
if(isNaN(f.Min.value) || f.Min.value == "")
{
alert("Please enter a minimum length for this field.");
f.Min.focus();
f.Min.select();
return false;
}
if(isNaN(f.Max.value) || f.Max.value == "")
{
alert("Please enter a maximum length for this field.");
f.Max.focus();
f.Max.select();
return false;
}
return true;
}
';
break; # end case 'shorttext'
case 'longtext':
$FORM_ITEMSX[$FORM_NOT_REQUIRED_ITEM . "Default Value"]="textarea|DefaultValue:46:5:".$Field["DefaultValue"];
$HELP_ITEMS["DefaultValue"]["Title"] = "Default Value";
$HELP_ITEMS["DefaultValue"]["Content"] = "Should this field contain some text by default? If so, enter that text in this box.";
if(!$Field['AllValues']) $Field['AllValues']='40,5';
list($width,$height)=explode(',',$Field['AllValues']);
$FORM_ITEMSX[$FORM_REQUIRED_ITEM . "Width"]="textfield|Width:4:4:$width";
$HELP_ITEMS["Width"]["Title"] = "Width";
$HELP_ITEMS["Width"]["Content"] = "How wide should this text box be? 30 is the default width of a multiline text box on a web page.";
$FORM_ITEMSX[$FORM_REQUIRED_ITEM . "Height"]="textfield|Height:4:4:$height";
$HELP_ITEMS["Height"]["Title"] = "Height";
$HELP_ITEMS["Height"]["Content"] = "How high should this text box be? 5 is the default height of a multiline text box on a web page.";
$OUTPUT .= '
';
break; # end case 'longtext'
case 'datebox':
if (!$Field['AllValues']) $Field['AllValues'] = 'day,month,year,1970,' . date("Y");
list($first, $second, $third, $startyr, $endyr) = explode(',',$Field['AllValues']);
$FORM_ITEMSX[$FORM_NOT_REQUIRED_ITEM . "Default Value"]="textfield|DefaultValue:30:44:".str_replace(':', '$$COLON$$', $Field["DefaultValue"]);
$HELP_ITEMS["DefaultValue"]["Title"] = "Default Value";
$HELP_ITEMS["DefaultValue"]["Content"] = "Should we select a date by default?
Use day:month:year - eg 31:12:1999";
$FORM_ITEMSX[$FORM_REQUIRED_ITEM . "Display Order (First)"]="textfield|First:30:44:".$first;
$HELP_ITEMS["First"]["Title"] = "Date Display";
$HELP_ITEMS["First"]["Content"] = "Type in the order you wish to use to display the date.
Use \'day\' \'month\' \'year\'";
$FORM_ITEMSX[$FORM_REQUIRED_ITEM . "Display Order (Second)"]="textfield|Second:30:44:".$second;
$HELP_ITEMS["Second"]["Title"] = "Date Display";
$HELP_ITEMS["Second"]["Content"] = "Type in the order you wish to use to display the date.
Use \'day\' \'month\' \'year\'";
$FORM_ITEMSX[$FORM_REQUIRED_ITEM . "Display Order (Third)"]="textfield|Third:30:44:".$third;
$HELP_ITEMS["Third"]["Title"] = "Date Display";
$HELP_ITEMS["Third"]["Content"] = "Type in the order you wish to use to display the date.
Use \'day\' \'month\' \'year\'";
$FORM_ITEMSX[$FORM_REQUIRED_ITEM . "Start Year"]="textfield|StartYr:30:44:".$startyr;
$HELP_ITEMS["StartYr"]["Title"] = "Start Year";
$HELP_ITEMS["StartYr"]["Content"] = "What year should we start the drop down with?";
$FORM_ITEMSX[$FORM_NOT_REQUIRED_ITEM . "End Year"]="textfield|EndYr:30:44:".$endyr;
$HELP_ITEMS["EndYr"]["Title"] = "End Year";
$HELP_ITEMS["EndYr"]["Content"] = "What year should we end the drop down with? Leave blank for this year.";
$OUTPUT .= '
';
break; # end case 'datebox'
case 'checkbox':
$FORM_ITEMSX[$FORM_REQUIRED_ITEM . "Default Status"]="select|DefaultValue:1:0->Unchecked;CHECKED->Checked:".$Field["DefaultValue"];
$HELP_ITEMS["DefaultValue"]["Title"] = "Default Value";
$HELP_ITEMS["DefaultValue"]["Content"] = "Should this checkbox be unchecked (not ticked) or checked (ticked) by default?";
$FORM_ITEMSX[$FORM_NOT_REQUIRED_ITEM . "Label"]="textfield|AllValues:30:44:".$Field["AllValues"];
$HELP_ITEMS["AllValues"]["Title"] = "Label";
$HELP_ITEMS["AllValues"]["Content"] = "Any text you enter here will appear as a label next to this checkbox.";
$OUTPUT .= '
';
break; # end case 'checkbox'
case 'dropdown':
case 'multicheckbox':
if ($Field['FieldType'] == 'dropdown') {
$FORM_ITEMSX[$FORM_NOT_REQUIRED_ITEM . "Default Value"]="textfield|DefaultValue:50:44:".$Field['DefaultValue'];
} else {
$FORM_ITEMSX[$FORM_REQUIRED_ITEM . "Default Status"]="select|DefaultValue:1:0->Unchecked;CHECKED->Checked:".$Field['DefaultValue'];
$HELP_ITEMS["DefaultValue"]["Title"] = "Default Value";
$HELP_ITEMS["DefaultValue"]["Content"] = "Should this checkbox be unchecked (not ticked) or checked (ticked) by default?";
}
$FORM_ITEMSX['-2']='spacer|
';
$vals=explode(';',$Field['AllValues']);
$i=1;
foreach($vals as $val){
if($val) {
list($sys,$lab)=explode('->',$val);
if($i < 3)
{
$FORM_ITEMSX[$FORM_REQUIRED_ITEM . "Value $i"]="textfield|Value[$i]:30:44:" . str_replace(':', '$$COLON$$', $sys);
$FORM_ITEMSX[$FORM_REQUIRED_ITEM . "Label $i"]="textfield|Label[$i]:30:44:" . str_replace(':', '$$COLON$$', $lab);
}
else
{
$FORM_ITEMSX[$FORM_NOT_REQUIRED_ITEM . "Value $i"]="textfield|Value[$i]:30:44:" . str_replace(':', '$$COLON$$', $sys);
$FORM_ITEMSX[$FORM_NOT_REQUIRED_ITEM . "Label $i"]="textfield|Label[$i]:30:44:" . str_replace(':', '$$COLON$$', $lab);
}
$i++;
}
}
for($x=$i;$x<($i+5);$x++){
$FORM_ITEMSX[$FORM_NOT_REQUIRED_ITEM . "Value $x"]="textfield|Value[$x]:30:44:";
$FORM_ITEMSX[$FORM_NOT_REQUIRED_ITEM . "Label $x"]="textfield|Label[$x]:30:44:";
}
$OUTPUT .= '
';
break; # end case 'dropdown' && multicheckbox
case 'number':
$FORM_ITEMSX[$FORM_NOT_REQUIRED_ITEM . "Default Value"]="textfield|DefaultValue:100:44:".$Field["DefaultValue"];
$HELP_ITEMS["DefaultValue"]["Title"] = "Default Value";
$HELP_ITEMS["DefaultValue"]["Content"] = "Should this field contain a number by default? If so, enter that number in this box.";
if(!$Field['AllValues']){$Field['AllValues']='30,0,100';}
list($size,$min,$max)=explode(',',$Field['AllValues']);
$FORM_ITEMSX[$FORM_REQUIRED_ITEM . "Size"]="textfield|Size:4:4:$size";
$HELP_ITEMS["Size"]["Title"] = "Size";
$HELP_ITEMS["Size"]["Content"] = "How wide should this box be? 30 is the default width of a box on a web page.";
$FORM_ITEMSX[$FORM_REQUIRED_ITEM . "Minimum Length"]="textfield|Min:4:4:$min";
$HELP_ITEMS["Min"]["Title"] = "Mininum Length";
$HELP_ITEMS["Min"]["Content"] = "Do you require a minimum number of characters for this field? If so, enter the minimum length here, such as \'2\'.";
$FORM_ITEMSX[$FORM_REQUIRED_ITEM . "Maximum Length"]="textfield|Max:4:4:$max";
$HELP_ITEMS["Max"]["Title"] = "Maximum Length";
$HELP_ITEMS["Max"]["Content"] = "Should the text in this field not exceed a certain number of characters? If so, enter the maximum length here, such as \'10\'.";
$OUTPUT .= '
';
break; # end case 'number'
}
$FORM_ITEMS[$FORM_REQUIRED_ITEM . "Required"]="select|Required:1:0->No;1->Yes:".$Field["Required"];
$HELP_ITEMS["Required"]["Title"] = "Required?";
$HELP_ITEMS["Required"]["Content"] = "When filling out your subscription form, does this form have to be completed?";
$FORM_ITEMS=array_merge($FORM_ITEMS, $FORM_ITEMSX);
$FORM_ITEMS["-1"]="submit|Save:1-customfields";
//make the form
$FORM=new AdminForm;
$FORM->title="EditFielde";
$FORM->items=$FORM_ITEMS;
$FORM->action=MakeAdminLink("customfields?Action=SaveField&FieldID=$FieldID");
$FORM->MakeForm("Custom Field Details");
$FORM->output = "Complete the form below to modify this custom subscriber field." . $FORM->output;
$OUTPUT.=MakeBox("Edit Custom Field",$FORM->output);
}
function SaveField()
{
// Save this field to the database
global $FieldID;
global $FieldName;
global $FORM_REQUIRED_ITEMuired;
global $Value;
global $Label;
global $AllValues;
global $DefaultValue;
global $OUTPUT;
global $Width;
global $Height;
global $Size;
global $Min;
global $Max;
global $TABLEPREFIX;
global $CURRENTADMIN;
global $Required;
$Field=mysql_fetch_assoc(mysql_query("SELECT * FROM " . $TABLEPREFIX . "list_fields WHERE FieldID='".addslashes($FieldID)."'"));
$all_vals = "";
$Field = stripslashes_array($Field);
switch($Field['FieldType']){
case 'checkbox':
$all_vals = $AllValues;
break;
case 'dropdown':
case 'multicheckbox':
foreach($Value as $key=>$val){
if($val){$lab=$Label[$key];
$all_vals.=$val.'->'.$lab.';';
}
}
break;
case 'longtext':
$all_vals="$Width,$Height";
break;
case 'shorttext':
case 'number':
$all_vals="$Size,$Min,$Max";
break;
case 'datebox':
$all_vals = $_REQUEST['First'] . ',' . $_REQUEST['Second'] . ',' . $_REQUEST['Third'] . ',' . $_REQUEST['StartYr'] . ',' . $_REQUEST['EndYr'];
break;
}
mysql_query("UPDATE " . $TABLEPREFIX . "list_fields SET FieldName='".addslashes($FieldName)."', Required='".addslashes($Required)."', AllValues='".addslashes($all_vals)."',DefaultValue='".addslashes($DefaultValue)."' WHERE FieldID='".addslashes($FieldID)."'");
$OUTPUT .= MakeSuccessBox("Custom Field Updated Successfully", "The custom field that you created has been saved successfully.", MakeAdminLink("customfields?Action=ListFields"));
}
function ShowAddCustomField1()
{
global $FieldName;
global $FieldType;
global $OUTPUT;
global $HELP_ITEMS;
global $TABLEPREFIX;
global $CURRENTADMIN;
global $FORM_REQUIRED_ITEM, $FORM_NOT_REQUIRED_ITEM;
mysql_query("INSERT INTO " . $TABLEPREFIX . "list_fields SET AdminID='" . addslashes($CURRENTADMIN['AdminID']) . "', FieldType='".addslashes($FieldType)."', FieldName='".addslashes($FieldName)."'");
$FieldID=mysql_insert_id();
$Field=mysql_fetch_assoc(mysql_query("SELECT * FROM " . $TABLEPREFIX . "list_fields WHERE FieldID='".addslashes($FieldID)."'"));
$Field = stripslashes_array($Field);
$FORM_ITEMS[$FORM_REQUIRED_ITEM . "Field Name"]="textfield|FieldName:30:44:".$Field["FieldName"];
$HELP_ITEMS["FieldName"]["Title"] = "Field Name";
$HELP_ITEMS["FieldName"]["Content"] = "The name of this field as it will be shown on your newsletter subscription form. It should be something like \'salary\', \'age\', etc.";
$size = $min = $max = $Width = $Height = $j = 0;
switch($Field['FieldType']) {
case 'shorttext':
$FORM_ITEMSX[$FORM_NOT_REQUIRED_ITEM . "Default Value"]="textfield|DefaultValue:100:44:".$Field["DefaultValue"];
$HELP_ITEMS["DefaultValue"]["Title"] = "Default Value";
$HELP_ITEMS["DefaultValue"]["Content"] = "Should this field contain some text by default? If so, enter that text in this box.";
if(!$Field["AllValues"]){$Field["AllValues"]="30,0,100";}
list($size,$min,$max)=explode(",",$Field["AllValues"]);
$FORM_ITEMSX[$FORM_REQUIRED_ITEM . "Size"]="textfield|Size:4:4:$size";
$HELP_ITEMS["Size"]["Title"] = "Size";
$HELP_ITEMS["Size"]["Content"] = "How wide should this text box be? 30 is the default width of a text box on a web page.";
$FORM_ITEMSX[$FORM_REQUIRED_ITEM . "Minimum Length"]="textfield|Min:4:4:$min";
$HELP_ITEMS["Min"]["Title"] = "Mininum Length";
$HELP_ITEMS["Min"]["Content"] = "Do you require a minimum number of characters for this field? If so, enter the minimum length here, such as \'2\'.";
$FORM_ITEMSX[$FORM_REQUIRED_ITEM . "Maximum Length"]="textfield|Max:4:4:$max";
$HELP_ITEMS["Max"]["Title"] = "Maximum Length";
$HELP_ITEMS["Max"]["Content"] = "Should the text in this field not exceed a certain number of characters? If so, enter the maximum length here, such as \'10\'.";
$OUTPUT .= '
';
break; # end case 'shorttext'
case 'longtext':
$FORM_ITEMSX[$FORM_NOT_REQUIRED_ITEM . "Default Value"]="textarea|DefaultValue:46:5:".$Field["DefaultValue"];
$HELP_ITEMS["DefaultValue"]["Title"] = "Default Value";
$HELP_ITEMS["DefaultValue"]["Content"] = "Should this field contain some text by default? If so, enter that text in this box.";
if(!$Field["AllValues"]){$Field["AllValues"]="40,5";}
list($width,$height)=explode(",",$Field["AllValues"]);
$FORM_ITEMSX[$FORM_REQUIRED_ITEM . "Width"]="textfield|Width:4:4:$width";
$HELP_ITEMS["Width"]["Title"] = "Width";
$HELP_ITEMS["Width"]["Content"] = "How wide should this text box be? 30 is the default width of a multiline text box on a web page.";
$FORM_ITEMSX[$FORM_REQUIRED_ITEM . "Height"]="textfield|Height:4:4:$height";
$HELP_ITEMS["Height"]["Title"] = "Height";
$HELP_ITEMS["Height"]["Content"] = "How high should this text box be? 5 is the default height of a multiline text box on a web page.";
$OUTPUT .= '
';
break; # end case 'longtext'
case 'checkbox':
$FORM_ITEMSX[$FORM_REQUIRED_ITEM . "Default Status"]="select|DefaultValue:1:0->Unchecked;CHECKED->Checked:".$Field["DefaultValue"];
$HELP_ITEMS["DefaultValue"]["Title"] = "Default Value";
$HELP_ITEMS["DefaultValue"]["Content"] = "Should this checkbox be unchecked (not ticked) or checked (ticked) by default?";
$FORM_ITEMSX[$FORM_NOT_REQUIRED_ITEM . "Label"]="textfield|AllValues:30:44:".$Field["AllValues"];
$HELP_ITEMS["AllValues"]["Title"] = "Label";
$HELP_ITEMS["AllValues"]["Content"] = "Any text you enter here will appear as a label next to this checkbox.";
$OUTPUT .= '
';
break; # end case 'checkbox'
case 'dropdown':
case 'multicheckbox':
$FORM_ITEMSX["-2"]="spacer|
";
$i = 1;
if ($Field['FieldType'] == 'dropdown') {
$FORM_ITEMSX[$FORM_NOT_REQUIRED_ITEM . "Default Value"]="textfield|DefaultValue:50:44:".$Field['DefaultValue'];
} else {
$FORM_ITEMSX[$FORM_REQUIRED_ITEM . "Default Status"]="select|DefaultValue:1:0->Unchecked;CHECKED->Checked:".$Field['DefaultValue'];
$HELP_ITEMS["DefaultValue"]["Title"] = "Default Value";
$HELP_ITEMS["DefaultValue"]["Content"] = "Should this checkbox be unchecked (not ticked) or checked (ticked) by default?";
}
for($x=$i;$x<($i+5);$x++){
if($x < 3)
{
$FORM_ITEMSX[$FORM_REQUIRED_ITEM . "Value $x"]="textfield|Value[$x]:30:44:";
$FORM_ITEMSX[$FORM_REQUIRED_ITEM . "Label $x"]="textfield|Label[$x]:30:44:";
}
else
{
$FORM_ITEMSX[$FORM_NOT_REQUIRED_ITEM . "Value $x"]="textfield|Value[$x]:30:44:";
$FORM_ITEMSX[$FORM_NOT_REQUIRED_ITEM . "Label $x"]="textfield|Label[$x]:30:44:";
}
}
$OUTPUT .= '
';
break; # end case 'dropdown'
case 'datebox':
$FORM_ITEMSX[$FORM_NOT_REQUIRED_ITEM . "Default Value"]="textfield|DefaultValue:30:44:";
$HELP_ITEMS["DefaultValue"]["Title"] = "Default Value";
$HELP_ITEMS["DefaultValue"]["Content"] = "Should this field contain some text by default? If so, enter that text in this box.";
$FORM_ITEMSX[$FORM_REQUIRED_ITEM . "Display Order (First)"]="textfield|First:30:44:day";
$HELP_ITEMS["First"]["Title"] = "Date Display";
$HELP_ITEMS["First"]["Content"] = "Type in the order you wish to use to display the date.
Use \'day\' \'month\' \'year\'";
$FORM_ITEMSX[$FORM_REQUIRED_ITEM . "Display Order (Second)"]="textfield|Second:30:44:month";
$HELP_ITEMS["Second"]["Title"] = "Date Display";
$HELP_ITEMS["Second"]["Content"] = "Type in the order you wish to use to display the date.
Use \'day\' \'month\' \'year\'";
$FORM_ITEMSX[$FORM_REQUIRED_ITEM . "Display Order (Third)"]="textfield|Third:30:44:year";
$HELP_ITEMS["Third"]["Title"] = "Date Display";
$HELP_ITEMS["Third"]["Content"] = "Type in the order you wish to use to display the date.
Use \'day\' \'month\' \'year\'";
$FORM_ITEMSX[$FORM_REQUIRED_ITEM . "Start Year"]="textfield|StartYr:30:44:0";
$HELP_ITEMS["StartYr"]["Title"] = "Start Year";
$HELP_ITEMS["StartYr"]["Content"] = "What year should we start the drop down with?";
$FORM_ITEMSX[$FORM_NOT_REQUIRED_ITEM . "End Year"]="textfield|EndYr:30:44:".date("Y");
$HELP_ITEMS["EndYr"]["Title"] = "End Year";
$HELP_ITEMS["EndYr"]["Content"] = "What year should we end the drop down with? Leave blank for this year.";
$OUTPUT .= '
';
break; # end case 'datebox'
case 'number':
$FORM_ITEMSX[$FORM_NOT_REQUIRED_ITEM . "Default Value"]="textfield|DefaultValue:100:44:".$Field["DefaultValue"];
$HELP_ITEMS["DefaultValue"]["Title"] = "Default Value";
$HELP_ITEMS["DefaultValue"]["Content"] = "Should this field contain a number by default? If so, enter that number in this box.";
if(!$Field["AllValues"]){$Field["AllValues"]="30,0,100";}
list($size,$min,$max)=explode(",",$Field["AllValues"]);
$FORM_ITEMSX[$FORM_REQUIRED_ITEM . "Size"]="textfield|Size:4:4:$size";
$HELP_ITEMS["Size"]["Title"] = "Size";
$HELP_ITEMS["Size"]["Content"] = "How wide should this box be? 30 is the default width of a box on a web page.";
$FORM_ITEMSX[$FORM_REQUIRED_ITEM . "Minimum Length"]="textfield|Min:4:4:$min";
$HELP_ITEMS["Min"]["Title"] = "Mininum Length";
$HELP_ITEMS["Min"]["Content"] = "Do you require a minimum number of characters for this field? If so, enter the minimum length here, such as \'2\'.";
$FORM_ITEMSX[$FORM_REQUIRED_ITEM . "Maximum Length"]="textfield|Max:4:4:$max";
$HELP_ITEMS["Max"]["Title"] = "Maximum Length";
$HELP_ITEMS["Max"]["Content"] = "Should the text in this field not exceed a certain number of characters? If so, enter the maximum length here, such as \'10\'.";
$OUTPUT .= '
';
break; # end case 'shorttext'
}
$FORM_ITEMS[$FORM_REQUIRED_ITEM . "Required"]="select|Required:1:0->No;1->Yes:".$Field["Required"];
$HELP_ITEMS["Required"]["Title"] = "Required?";
$HELP_ITEMS["Required"]["Content"] = "When filling out your subscription form, does this field have to be completed?";
$FORM_ITEMS=array_merge($FORM_ITEMS, $FORM_ITEMSX);
$FORM_ITEMS["-1"]="submit|Finish:1-customfields";
//make the form
$FORM=new AdminForm;
$FORM->title="EditFielde";
$FORM->items=$FORM_ITEMS;
$FORM->action=MakeAdminLink("customfields?Action=SaveField&FieldID=$FieldID");
$FORM->MakeForm("Custom Field Details");
$FORM->output = "Complete the form below to finish adding a custom subscriber field." . $FORM->output;
$OUTPUT.=MakeBox("Create Custom Field (Step 2 of 2)",$FORM->output);
}
function ShowAddCustomField() {
global $OUTPUT;
global $HELP_ITEMS;
global $TABLEPREFIX;
global $CURRENTADMIN;
global $FORM_REQUIRED_ITEM, $FORM_NOT_REQUIRED_ITEM;
$EXT = "";
$alltypes = "";
$fieldtypes["shorttext"]="One Line Textbox";
$fieldtypes["longtext"]="Multiline Textbox";
$fieldtypes["dropdown"]="Dropdown List";
$fieldtypes["checkbox"]="Checkbox (Yes/No)";
$fieldtypes["multicheckbox"]="Multiple Checkbox (eg Music Genres)";
$fieldtypes["number"]="Number Textbox (eg Age or Salary)";
$fieldtypes["datebox"]="Date Box";
//add extra field!
$FORM_ITEMS2[$FORM_REQUIRED_ITEM . "Field Name"]="textfield|FieldName:30:44:";
$HELP_ITEMS["FieldName"]["Title"] = "Field Name";
$HELP_ITEMS["FieldName"]["Content"] = "The name of this field as it will be shown on your newsletter subscription form. It should be something like \'salary\', \'age\', etc.";
foreach($fieldtypes as $k=>$n) {
$alltypes.=$k."->".$n.";";
}
$FORM_ITEMS2[$FORM_REQUIRED_ITEM . "Field Type"]="select|FieldType:1:$alltypes";
$HELP_ITEMS["FieldType"]["Title"] = "Field Type";
$HELP_ITEMS["FieldType"]["Content"] = "What type of field should be used to collect your subscribers input for this field?";
$FORM_ITEMS2["-1"]="submit|Next »:1-customfields";
//make the form
$FORM2=new AdminForm;
$FORM2->title="AddCustom";
$FORM2->items=$FORM_ITEMS2;
$FORM2->action=MakeAdminLink("customfields?Action=Add1");
$FORM2->MakeForm("Custom Field Details");
$FORM2->output = "Complete the form below to create a new custom subscriber field.
Click on the \"Next\" button to continue." . $FORM2->output;
$OUTPUT.=MakeBox("Create Custom Field (Step 1 of 2)",$FORM2->output);
$OUTPUT .= '
';
}
function ShowFieldList() {
global $FieldID;
global $OUTPUT;
global $ROOTURL;
global $TABLEPREFIX;
global $CURRENTADMIN;
$RTB = '';
$ListName = 'All Lists';
// If $FieldID isn't empty, it means we need to delete a field
if($FieldID != "")
mysql_query("DELETE FROM " . $TABLEPREFIX . "list_fields WHERE FieldID = '".addslashes($FieldID)."'");
$custom_fields = FetchCustomFields();
$Total = sizeof($custom_fields);
if($Total == 0) {
$RTB .= 'The are currently no custom subscriber fields. Click "Create Custom Field" to create one.
';
} else {
$RTB .= 'Use the form below to review, edit and delete custom subscriber fields.
To create a new field, click on the "Create Custom Field" button below.
';
}
if($Total > 0) {
$RTB .= '
| Field Name | Field Type | Required | Action | |
|
|
' . $r["FieldName"] . ' | ' . $FieldType . ' | ' . $required . ' | '; $RTB.=MakeLink("customfields?Action=Edit&FieldID=" . $r["FieldID"],"Edit") . " "; $RTB.=MakeConfirmBox("customfields?Action=ListFields&FieldID=" . $r["FieldID"],"Delete", "Are you sure you wish to delete this custom field?"); $RTB .= ' |