';if($cssfile!=''){$htmlheadst.='';}else{$htmlheadst.='';}$htmlheadst.='

';if(!isset($_POST)){$htmldisret=$htmlheadst.'Form Variables not Valid

';$htmldisret.='

Please contact the site owner.

The current version of php on this site does not appear to support the required form variables.

';echo $htmldisret;exit;}foreach($configvars as $Value){if(isset($_POST[$Value])){if (get_magic_quotes_gpc()){$Value=stripslashes($Value);$Value=trim($Value);}else{$Value=trim($Value);}if($delemail==''||$Value!='delemail'){$$Value=$_POST[$Value];}if(isset($nopostvars[$Value])){unset($_POST[$Value]);}}}if($alphasort=='true'){ksort($_POST);}$FORM1_PHP=$_SERVER['PHP_SELF'];if(isset($_POST['form_url'])){$FORM1_URL=$_POST['form_url'];$urlparts=parse_url($FORM1_URL);$FORM1_HOST=$urlparts['host'];$FORM1_HOST_SCH=$urlparts['scheme'];}elseif(isset($_SERVER['HTTP_REFERER'])){$FORM1_URL=$_SERVER['HTTP_REFERER'];$urlparts=parse_url($FORM1_URL);$FORM1_HOST=$urlparts['host'];$FORM1_HOST_SCH=$urlparts['scheme'];}if(!isset($FORM1_HOST) || $FORM1_HOST==NULL||$FORM1_HOST==''){$FORM1_HOST=$_SERVER['SERVER_NAME'];}if(!isset($FORM1_URL) || $FORM1_URL==NULL||$FORM1_URL==''){$FORM1_URL=$FORM1_HOST.$FORM1_PHP;}$urlparts=parse_url($FORM1_HOST);$cksch=$urlparts['scheme'];if(empty($cksch)||$cksch==false){if(empty($FORM1_HOST_SCH)||$FORM1_HOST_SCH==false){$FORM1_HOST='http://'.$FORM1_HOST;}else{$FORM1_HOST=$FORM1_HOST_SCH.'://'.$FORM1_HOST;}}$FORM1_HOST=strtolower($FORM1_HOST);if(isset($_POST['multipage'])){$mpage=true;if(!isset($_SESSION['Form1']['form1_urlf'])){$_SESSION['Form1']['form1_urlf']=$FORM1_URL;}}else{$mpage=false;}if(isset($_SESSION['Form1']['form1_urlf'])){$form1_urlf=$_SESSION['Form1']['form1_urlf'];}else{$form1_urlf=$FORM1_URL;}$addsession='';if(SID){$FORM1_URL_parts = (explode('?',$FORM1_URL));$FORM1_URL_part=$FORM1_URL_parts[0];$form1_urlf_parts = (explode('?',$form1_urlf));$form1_urlf_part=$form1_urlf_parts[0];$FORM1_PHP_parts = (explode('?',$FORM1_PHP));$FORM1_PHP_part=$FORM1_PHP_parts[0];$addsession='?'.strip_tags(SID);$FORM1_URL_SESS=$FORM1_URL_part.$addsession;$form1_urlf_SESS=$form1_urlf_part.$addsession;$FORM1_PHP_SESS=$FORM1_PHP_part.$addsession;}else{$FORM1_URL_SESS=$FORM1_URL;$form1_urlf_SESS=$form1_urlf;$FORM1_PHP_SESS=$FORM1_PHP;}if($accesspass!=''){if((isset($_SESSION['accesspassin'])&&$_SESSION['accesspassin']== $accesspass)||(isset($_POST['accesspassin'])&&$_POST['accesspassin']==$accesspass)||(isset($_POST['accesscode'])&&$_POST['accesscode']==$accesspass)){if(!isset($_SESSION['accesspassin'])){$_SESSION['accesspassin'] = $accesspass;}}else{$htmldisret=$htmlheadst.'Access Code Required';$htmldisret.='




';$htmldisret.='Please submit your access code to continue.

';echo $htmldisret;exit;}}if($valdomainsin=="'+regdom+'"){$valdom=true;}else{$valdom=false;}$valdomains = (explode(',',$valdomainsin));foreach($valdomains as $valdomain){$codeUse = 0;$chAll = '';$userNameEsc = $valdomain;$userNameEsc = rawurldecode($userNameEsc);for ($chUsePos=0;$chUsePos < strlen($userNameEsc);$chUsePos++){$chUse = ord($userNameEsc[$chUsePos]);$chEnDe = $chUse^ord($domxorcode[$codeUse]);$chAll .= chr($chEnDe);$codeUse =($codeUse+1)%strlen($domxorcode);}$valdomain=rawurldecode($chAll);$valdomain=strtolower($valdomain);if(strpos($FORM1_HOST,$valdomain)!==false&&strlen($valdomain)>3){$valdom=true;break;}}if(empty($FORM1_HOST)){$valdom=true;}$defrequired=trim($defrequired);$lastcomma=strrchr($defrequired,',');if($lastcomma==','){$usestrlen=strlen($defrequired)-1;$defrequired = substr($defrequired,0,$usestrlen);}if($defrequired!=''){$defreqs = (explode(',',$defrequired));}else{$defreqs=NULL;}if(!empty($setform1url)){$FORM1_URL=$setform1url;}if($rtflink=='true'){$rtfs='

Return to Form

';$rtfj='

Return to Form

';}else{$rtfs='

';$rtfj='

';}if($rtflink=='true'){$rtfss='

Return to Form

';$rtfsj='

Return to Form

';}else{$rtfss='

';$rtfsj='

';}$CntPost=count($_POST);if($CntPost>0 && !isset($_POST['form1next']) &&!isset($_POST['htmldisnext'])&&!isset($_POST['accesspassin'])){$form1_urlf_parts = (explode('?',$form1_urlf));$form1_urlf=$form1_urlf_parts[0];if($resultname!=''){$oporders=NULL;$oppluss=NULL;$opminuss=NULL;$opmultiplys=NULL;$opdivides=NULL;$execorder=trim($execorder);if($execorder!=''){$oporders = (explode(',',$execorder));}$defplus=trim($defplus);if($defplus!=''){$oppluss = (explode(',',$defplus));}$defminus=trim($defminus);if($defminus!=''){$opminuss = (explode(',',$defminus));}$defmultiply=trim($defmultiply);if($defmultiply!=''){$opmultiplys = (explode(',',$defmultiply));}$defdivide=trim($defdivide);if($defdivide!=''){$opdivides = (explode(',',$defdivide));}$runresult=0;if(is_array($oporders)){foreach($oporders as $oporder){if(isset($_POST[$oporder])){$opval=$_POST[$oporder];if(is_numeric($opval)){if (is_array($oppluss)&&in_array($oporder, $oppluss)){$runresult=$runresult+$opval;}elseif (is_array($opminuss)&&in_array($oporder, $opminuss)){$runresult=$runresult-$opval;}elseif (is_array($opmultiplys)&&in_array($oporder, $opmultiplys)){$runresult=$runresult*$opval;}elseif (is_array($opdivides)&&in_array($oporder, $opdivides)){$runresult=$runresult/$opval;}}}}}$tempArray = array($resultname => $runresult);$_POST = array_merge ($_POST, $tempArray);}if(isset($_SESSION['Form1'])){$prepost=$_SESSION['Form1'];$_POST = array_merge($prepost,$_POST);}if(isset($_POST['multipage'])){unset($_POST['multipage']);}$_SESSION['Form1'] = $_POST;$delemail =preg_replace("/(\r\n|\n|\r|\x0A|\x0D|\x0D\x0A)/i",'',$delemail);if($delemail==''&&isset($delemailname)&&isset($delemaildomain)){$delemail=$delemailname.'@'.$delemaildomain;}$delemails = (explode(',',$delemail));if(is_array($delemails)){foreach($delemails as $delemaileach){$delemaileach=trim($delemaileach);if (!ereg('^[-!#$%&\'*+\\./0-9=?A-Z^_`a-z{|}~]+'.'@'.'[-!#$%&\'*+\\/0-9=?A-Z^_`a-z{|}~]+\.'.'[-!#$%&\'*+\\./0-9=?A-Z^_`a-z{|};~]+$',$delemaileach)){$htmldisret=$htmlheadst.'Delivery Email Address Not Valid';if($jsreturn=='true'){$htmldisret.=$rtfj;}else{$htmldisret.=$rtfs;}$htmldisret.='

Please contact the site owner.

The Delivery Email Address '.$delemaileach.' does not appear to be valid.

Please provide only valid delivery email addresses in the configuration variable or field.

';echo $htmldisret;exit;}}$delemail1=trim($delemails[0]);$delemail1 =preg_replace("/(\r\n|\n|\r|\x0A|\x0D|\x0D\x0A)/i",'',$delemail1);}else{$htmldisret=$htmlheadst.'Delivery Email Address Missing';if($jsreturn=='true'){$htmldisret.=$rtfj;}else{$htmldisret.=$rtfs;}$htmldisret.='

Please contact the site owner.

A Delivery Email Address appears to be missing.

Please provide at least one delivery email address in the configuration variable or field.

';echo $htmldisret;exit;}$filealls = (explode(',',$fileallow));if($breakoff=='true'){$breaktype=' ';}else{$breaktype=$usemesseol;}$formin=NULL;$formcsv=NULL;$formmulti=NULL;$formmultihtml=NULL;$htmldata=NULL;$csvdata=NULL;$xmldata=NULL;$filedata=NULL;$reqck=NULL;$emailcc=NULL;$subjectin='';$emailin=NULL;$firstnamein=NULL;$lastnamein=NULL;$dbdatas=NULL;if(!isset($mysqluse)){$mysqluse='false';}if(!isset($gmuse)){$gmuse='false';}if($mysqluse=='true'||$gmuse=='true'){$dbdatas=array();}if($smtpserver!=''){ini_set('SMTP', $smtpserver);ini_set('sendmail_from', $delemail1);}$excludecnt=0;foreach($_POST as $Name=>$Value){$Name=trim($Name);if(!empty($excludeval)&&!empty($excludemax)){if(strpos($Value,$excludeval)!==false){$excludecnt++;}if($excludecnt>$excludemax){exit();}}if(is_array($Value)){foreach($Value as $formName=>$formValue){if (get_magic_quotes_gpc()){$formValue=stripslashes($formValue);$formValue=trim($formValue);}else{$formValue=trim($formValue);}$formmulti .="$formValue, ";}$Value=$formmulti;}else{if (get_magic_quotes_gpc()){$Value=stripslashes($Value);$Value=trim($Value);}else{$Value=trim($Value);}}if($Name==trim($defemailcopy)){$emailcc=$Value;}if(is_array($defreqs)){$defreqsnum=0;foreach($defreqs as $defreq){if($defreq!=""&&$Name==trim($defreq)){if($Value===NULL || $Value==''){$reqck='fail';}else{$defemps = (explode(',',$asempty));if(is_array($defemps)){foreach($defemps as $defemp){if($defemp!=""&&$Value==trim($defemp)){$reqck='fail';break;}}}}unset($defreqs[$defreqsnum]);$defreqs=array_values($defreqs);break;}$defreqsnum++;}}if(isset($reqck)&&$reqck=='fail'){$Name = ereg_replace ('_', ' ', $Name);$reqck=='reset';if(!$requrl){$htmldisret=$htmlheadst.'Required Field Input Missing';if($jsreturn=='true'){$htmldisret.=$rtfj;}else{$htmldisret.=$rtfs;}$htmldisret.='

Please use the Return to Form above to return to the form and complete the required field '.$Name.'.

';echo $htmldisret;}else{if($reasonreturn=='true'){$Name=urlencode($Name);header("Location: $requrl?reason=$Name");}else{header("Location: $requrl");}}exit;}if($Name==trim($defemail)){if($Value!=''){$Value =preg_replace("/(\r\n|\n|\r|\x0A|\x0D|\x0D\x0A)/i",'',$Value);$emailin=$Value;}}if($Name==trim($defsubject)&&$Value){$Value =preg_replace("/(\r\n|\n|\r|\x0A|\x0D|\x0D\x0A)/i",'',$Value);$subjectin=$Value;}if($Name==trim($deffirstname)){$Value =preg_replace("/(\r\n|\n|\r|\x0A|\x0D|\x0D\x0A)/i",'',$Value);$firstnamein=$Value;}if($Name==trim($deflastname)){$Value =preg_replace("/(\r\n|\n|\r|\x0A|\x0D|\x0D\x0A)/i",'',$Value);$lastnamein=$Value;}}if(is_array($defreqs)&& count($defreqs)>0){$defreq=$defreqs[0];$defreq = ereg_replace ('_', ' ', $defreq);if(!$requrl){$htmldisret=$htmlheadst.'Required Field Input Missing';if($jsreturn=='true'){$htmldisret.=$rtfj;}else{$htmldisret.=$rtfs;}$htmldisret.='

Please use the Return to Form above to return to the form and complete the required field '.$defreq.'.

';echo $htmldisret;}else{if($reasonreturn=='true'){$Name=urlencode($Name);header("Location: $requrl?reason=$defreq");}else{header("Location: $requrl");}}exit;}if(!isset($emailin)||$emailin==''){$emailin=$delemail1;}if ($emailin!=$delemail1&&!ereg('^[-!#$%&\'*+\\./0-9=?A-Z^_`a-z{|}~]+'.'@'.'[-!#$%&\'*+\\/0-9=?A-Z^_`a-z{|}~]+\.'.'[-!#$%&\'*+\\./0-9=?A-Z^_`a-z{|};~]+$',$emailin)){if(!$ckurl){$htmldisret=$htmlheadst.'Email Address Not Valid';if($jsreturn=='true'){$htmldisret.=$rtfj;}else{$htmldisret.=$rtfs;}$htmldisret.='

The Email Address '.$emailin.' does not appear to be valid.

Please use the Return to Form above to return to the form and provide a valid email address.

';echo $htmldisret;}else{if($reasonreturn=='true'){header("Location: $ckurl?reason=$emailin");}else{header("Location: $ckurl");}}exit();}else{if(!isset($emailin)||$emailin==''){$emailin=$delemail1;}if(!$firstnamein&&!$lastnamein){$from_email=$emailin;}elseif(!$lastnamein){$firstnameine = ereg_replace (',', ' ', $firstnamein);$from_email="$firstnameine<$emailin>";}elseif(!$firstnamein){$lastnameine = ereg_replace (',', ' ', $lastnamein);$from_email="$lastnameine<$emailin>";}else{$firstnameine = ereg_replace (',', ' ', $firstnamein);$lastnameine = ereg_replace (',', ' ', $lastnamein);$from_email="$firstnameine $lastnameine<$emailin>";}if($smtpserver!=''){$from_email=$delemail1;}foreach($_POST as $Name=>$Value){$Name=trim($Name);if(!in_array($Name,$noDisplays)&&(ucfirst($Name)==$Name||$firstupper!='true'||($gmuse=='true'&&(ereg('^cs[0-9]_*',$Name))))){$NameXML = $Name;$Name = ereg_replace ('_', ' ', $Name);$NameHTML=htmlentities($Name);$NameHTML=nl2br($NameHTML);$formmulti ='';if(is_array($Value)){$formin .="$Name: $breaktype";foreach($Value as $formName=>$formValue){if (get_magic_quotes_gpc()){$formValue=stripslashes($formValue);$formValue=trim($formValue);}else{$formValue=trim($formValue);}$formmulti .="$formValue, ";}$formin .="$formmulti".$usemesseol.$usemesseol;if($htmlemail=='true'||$htmldisplay=='true'){$formmultiHTML=htmlentities($formmulti);$formmultiHTML=nl2br($formmultiHTML);$htmldata.="$NameHTML$formmultiHTML";}if($csvfile!=''){$csvdata.="\"$formmulti\",";}if($xmlfile!=''){$xmldata.="<$NameXML>$formmulti";}if($mysqluse=='true'||$gmuse=='true'){$dbdatas[$NameXML]=$formmulti;}}else{if (get_magic_quotes_gpc()){$Value=stripslashes($Value);$Value=trim($Value);}else{$Value=trim($Value);}if($showempty=='true'||$Value!=NULL){$formin .=$Name.":".$breaktype.$Value.$usemesseol.$usemesseol;if($htmlemail=='true'||$htmldisplay=='true'){$ValueHTML=htmlentities($Value);$ValueHTML=nl2br($ValueHTML);$htmldata.="$NameHTML$ValueHTML";}}if($csvfile!=''){$csvdata.="\"$Value\",";}if($xmlfile!=''){$xmldata.="<$NameXML>$Value";}if($mysqluse=='true'||$gmuse=='true'){$dbdatas[$NameXML]=$Value;}}}}if(is_numeric($timeoffset)&&$timeoffset!=0){$timepro=gmdate("D, d M Y H:i:s",time()+3600*$timeoffset)." Local";$timedb=gmdate("Y-m-d H:i:s",time()+3600*$timeoffset);}else{$timepro=gmdate("D, d M Y H:i:s",time())." GMT/UTC";$timedb=gmdate("Y-m-d H:i:s",time());}$htmldisdat=$htmldata;if($htmlemail=='true'){$htmldata.="Processed$timepro";}if($xmlfile!=''){$xmldata.="$timepro";}if($mysqluse=='true'||$gmuse=='true'){$dbdatas['Processed']=$timedb;}$formin .="Processed: $timepro".$usemesseol.$usemesseol;if($csvfile!=''){$csvdata.="\"$timepro\",";}if($usehttpvars=="true"&&$_SERVER){$httpvars=array("HTTP_USER_AGENT"=>"User Browser","REMOTE_ADDR"=>"User IP Address","SERVER_ADDR"=>"Form1 PHP Server IP","SERVER_NAME"=>"Form1 PHP Server Name");$formin .="Variables -".$usemesseol;if($htmlemail=='true'){$htmldata.="__________Variables";}if($xmlfile!=''){$xmldata.="";}foreach($httpvars as $httpvar=>$httpdesc){$formin .="$httpdesc ($httpvar): $_SERVER[$httpvar] ".$usemesseol;if($htmlemail=='true'){$htmldata.="$httpdesc ($httpvar)$_SERVER[$httpvar] ";}if($csvfile!=''){$csvdata.="\"$_SERVER[$httpvar]\",";}if($xmlfile!=''){$xmldata.="<$httpvar>$_SERVER[$httpvar]";}if($mysqluse=='true'||$gmuse=='true'){$dbdatas[$httpvar]=$_SERVER[$httpvar];}}$formin .="Form1 PHP Script (PHP_SELF): $FORM1_PHP ".$usemesseol."Form1 URL Domain: $FORM1_HOST ".$usemesseol."Form1 URL (HTTP_REFERER): $form1_urlf ".$usemesseol.$usemesseol;if($htmlemail=='true'){$htmldata.="Form1 PHP Script (PHP_SELF)$FORM1_PHP";$htmldata.="Form1 URL Domain$FORM1_HOST";$htmldata.="Form1 URL (HTTP_REFERER)$form1_urlf";}if($csvfile!=''){$csvdata.="\"$FORM1_PHP\",\"$FORM1_HOST\",\"$form1_urlf\",";}if($xmlfile!=''){$xmldata.="$FORM1_PHP$FORM1_HOST$form1_urlf";}if($mysqluse=='true'||$gmuse=='true'){$dbdatas['PHP_SELF']=$FORM1_PHP;$dbdatas['Domain']=$FORM1_HOST;$dbdatas['HTTP_REFERER']=$form1_urlf;}$formin .=$usemesseol;if($xmlfile!=''){$xmldata.="";}}if($usecookvars=="true"&&$_COOKIE){$formin .="Cookies -".$usemesseol;if($htmlemail=='true'){$htmldata.="__________Cookies";}if($xmlfile!=''){$xmldata.="";}foreach($_COOKIE as $Name=>$Value){if (get_magic_quotes_gpc()){$Value=stripslashes($Value);$Value=trim($Value);}else{$Value=trim($Value);}$Value=urlencode($Value);$formin .="$Name: $Value".$usemesseol;if($htmlemail=='true'){$ValueHTML=htmlentities($Value);$htmldata.="$Name$ValueHTML";}if($csvfile!=''){$csvdata.="\"$Value\",";}if($xmlfile!=''){$xmldata.="<$Name>$Value";}if($mysqluse=='true'||$gmuse=='true'){$dbdatas[$Name]=$Value;}}if($xmlfile!=''){$xmldata.="";}}$from_email=trim(stripslashes($from_email));$formin=trim(stripslashes($formin));$subjectin=trim(stripslashes($subjectin));$curs=time();if(is_numeric($regst)){if($regst<$curs){header("Location: http://www.softswot.com/FormBuildExp.php?FORM1_HOST=$FORM1_HOST&FORM1_URL=$FORM1_URL");exit();}else{$evalr = round(($regst - $curs)/(24*60*60), 2);$formin .=$usemesseol.$usemesseol.$usemesseol."powered by Form1 software, available free for evaluation from www.softswot.com.";$formin .=$usemesseol."Evaluation Only. Evaluation period expires in $evalr days.".$usemesseol;if($htmlemail=='true'){$htmldata.="powered by Form1 software, available free for evaluation from www.softswot.com.";$htmldata.="Evaluation Only. Evaluation period expires in $evalr days.";}}}elseif($valdom!=true){$headredir="http://www.softswot.com/FormBuildDom.php?FORM1_HOST=$FORM1_HOST&FORM1_URL=$FORM1_URL";header("Location: $headredir");exit();}if($verifybody!=''){$formin .=$usemesseol.$usemesseol."Verification Code: $verifybody".$usemesseol;if($htmlemail=='true'){$htmldata.="__________Verification Code$verifybody";}if($mysqluse=='true'||$gmuse=='true'){$dbdatas['Verification']=$verifybody;}}if($htmldisplay=='true'&&!isset($_POST['htmldissend'])){$htmldisdat=$htmlheadst.$subjectin.'

'.$htmldisdat;if($jsreturn=='true'){$htmldisdat.='';}else{$htmldisdat.='

';}$htmldisdat.='

';$htmldisdat.='';$htmldisdat.='

';}else{$htmldisdat.='

';$htmldisdat.='';$htmldisdat.='

';}$htmldisdat.='

';foreach($_POST as $Name=>$Value){if(is_array($Value)){$formmultihtml ='';foreach($Value as $formName=>$formValue){$formValue=trim($formValue);$formmultihtml .="$formValue, ";}$Value=$formmultihtml;}else{$Value=trim($Value);}$NameHTML=htmlentities($Name);$ValueHTML=htmlentities($Value);$htmldisdat.='';}$FORM1_URLHTML=htmlentities($FORM1_URL);$htmldisdat.='';if($mpage==true){$htmldisdat.='

';$htmldisdat.='';echo $htmldisdat;exit;}if($mpage!=true){if($htmlemail=='true'){$htmldata='

'.$htmldata;$htmldata.='

';}if($xmlfile!=''){$xmldata=''.$xmldata;$xmldata.='';}$mysqlfail=false;if($mysqluse=='true'){$MYSQLName='';$MYSQLValue='';$mysqlfieldnames = array();$skipfields = (explode(',',$mysqlfieldskip));$connection = @mysql_connect($mysqlservername,$mysqlusername,$mysqluserpassword);if(@mysql_select_db($mysqldatabase,$connection)){$sql = "SHOW COLUMNS FROM $mysqltable";$result = @mysql_query($sql);while ($row = @mysql_fetch_array($result)){$testfieldname=$row["Field"];$testfieldname=trim($testfieldname);$skipck='use';if(is_array($skipfields)){foreach($skipfields as $skipfield){if($skipfield!=""&&$testfieldname==trim($skipfield)){$skipck='skip';break;}}}if($skipck!='skip'){$mysqlfieldnames[] = $testfieldname;}}foreach($mysqlfieldnames as $mysqlfieldname){if(isset($dbdatas[$mysqlfieldname])){$Value=$dbdatas[$mysqlfieldname];if(get_magic_quotes_gpc()){$Value= stripslashes($Value);}$Value=mysql_real_escape_string($Value);$Value=trim($Value);if($Value==''){$Value=$mysqlemptyvalue;}}else{$Value=$mysqlemptyvalue;}$MYSQLName.="$mysqlfieldname, ";$MYSQLValue.="'$Value', ";}$MYSQLName = rtrim($MYSQLName, ", ");$MYSQLValue = rtrim($MYSQLValue, ", ");$sql = "INSERT INTO $mysqltable ($MYSQLName) VALUES ($MYSQLValue)";$result =@mysql_query($sql);if(!$result){$mysqlfail=true;}@mysql_close($connection);}else{$mysqlfail=true;}}$arxheaders = $emcont.$useeol;if($htmlemail=='true'||$xmlfile!='' ||$csvfile!='' || ($deffileatt!='' && isset($_FILES[$deffileatt]) && is_file($_FILES[$deffileatt]['tmp_name']))){if(($deffileatt!='' && isset($_FILES[$deffileatt]) && is_file($_FILES[$deffileatt]['tmp_name']))){set_magic_quotes_runtime(0);$fileatt = $_FILES[$deffileatt]['tmp_name'];$fileatttype = $_FILES[$deffileatt]['type'];$fileattname = $_FILES[$deffileatt]['name'];if(filesize($fileatt)>$filemaxsize){$htmldisret=$htmlheadst.'Maximum File Size Exceeded';if($jsreturn=='true'){$htmldisret.=$rtfj;}else{$htmldisret.=$rtfs;}$htmldisret.='

The maximum allowable upload file size is '.$filemaxsize.' bytes.

The size of '.$fileattname.' is '.filesize($fileatt).' bytes.

Please use the Return to Form above to return to the form and submit a smaller file.

';echo $htmldisret;exit;}else{$typeok=false;if(is_array($filealls)){foreach($filealls as $fileall){if($fileall==$fileatttype){$typeok=true;break;}}}if($typeok==false){$htmldisret=$htmlheadst.'File Type Not Allowed';if($jsreturn=='true'){$htmldisret.=$rtfj;}else{$htmldisret.=$rtfs;}$htmldisret.='

The file type of your upload file is '.$fileatttype.'.

This file type is not allowed for upload.

Please use the Return to Form above to return to the form and submit a different file type.

';echo $htmldisret;exit;}else{if (is_uploaded_file($fileatt)){$file = fopen($fileatt,'rb');$filedata = fread($file,filesize($fileatt));fclose($file);}else{$htmldisret=$htmlheadst.'File Upload Error';if($jsreturn=='true'){$htmldisret.=$rtfj;}else{$htmldisret.=$rtfs;}$htmldisret.='

The file upload failed.

Please use the Return to Form above to return to the form and resubmit.

';echo $htmldisret;exit;}}}}$semi_rand = md5(time());$mime_boundary = "==Multipart_Boundary_$semi_rand==";$xheaders = "MIME-Version: 1.0".$useeol."Content-Type: multipart/mixed;boundary=\"".$mime_boundary."\"".$useeol;$message = "This is a multi-part message in MIME format.".$useeol;$mimelast="";if(isset($htmldata)){$mimelast="html";}if(isset($filedata)){$mimelast="attach";}if(isset($csvdata)){$mimelast="csv";}if(isset($xmldata)){$mimelast="xml";}if(isset($htmldata)){$message.= $useeol."--".$mime_boundary.$useeol;$message.="Content-Type: text/html".$useeol;$message.="Content-Transfer-Encoding: 7bit".$useeol;$message.=$useeol.$htmldata.$useeol;if($mimelast=="html"){$message.=$useeol."--".$mime_boundary."--".$useeol;}}else{$message.=$useeol."--".$mime_boundary.$useeol;$message.="Content-Type: text/plain".$useeol;$message.="Content-Transfer-Encoding: 7bit".$useeol;$message.=$useeol.$formin.$useeol;}if(isset($filedata)){$filedata = chunk_split(base64_encode($filedata));$message.= $useeol."--".$mime_boundary.$useeol;$message.="Content-Type: $fileatttype;name=\"$fileattname\"".$useeol;$message.="Content-Disposition: attachment;filename=\"$fileattname\"".$useeol;$message.="Content-Transfer-Encoding: base64".$useeol;$message.=$useeol.$filedata.$useeol;if($mimelast=="attach"){$message.=$useeol."--".$mime_boundary."--".$useeol;}}if(isset($csvdata)){$csvdata = chunk_split(base64_encode($csvdata));$message.= $useeol."--".$mime_boundary.$useeol;$message.="Content-Type: text/csv;name=\"$csvfile\"".$useeol;$message.="Content-Disposition: attachment;filename=\"$csvfile\"".$useeol;$message.="Content-Transfer-Encoding: base64".$useeol;$message.=$useeol.$csvdata.$useeol;if($mimelast=="csv"){$message.=$useeol."--".$mime_boundary."--".$useeol;}}if(isset($xmldata)){$xmldata = chunk_split(base64_encode($xmldata));$message.= $useeol."--".$mime_boundary.$useeol;$message.="Content-Type: text/xml;name=\"$xmlfile\"".$useeol;$message.="Content-Disposition: attachment;filename=\"$xmlfile\"".$useeol;$message.="Content-Transfer-Encoding: base64".$useeol;$message.= $useeol.$xmldata.$useeol;if($mimelast=="xml"){$message.=$useeol."--".$mime_boundary."--".$useeol;}}$formin=$message;}else{$xheaders = $arxheaders;}$xheaders .="From: $from_email".$useeol;if(isset($emailcc)){$xheaders.="CC: $emailin".$useeol;}if(isset($emailbcc)){$xheaders.="BCC: $emailbcc".$useeol;}$xheaders.="Reply-To: $from_email".$useeol."Return-path: $emailin".$useeol."X-Mailer: PHP/" . phpversion();if($verifysubject!=''){$subjectin .= " $verifysubject";}$gmfail=false;if($gmuse=='true'){if($gmemail==''){$gmemail=$delemail;}$gmsubject=$subjectin;if($gmusecontenttype=="true"){$gmheaders ="Content-Type: application/x-gm-impdata".$useeol;$gmto = "<$gmemail>";}else{$gmheaders =$emcont.$useeol;$gmto = "\"{\$GM-WEBIMPORT\$}\"<$gmemail>";}$gmheaders.="From: $gmemail".$useeol;$gmheaders.="Reply-To: $gmemail".$useeol."Return-path: $gmemail".$useeol."X-Mailer: PHP/" . phpversion();$gmform = "[Instructions]".$usemesseol."SaveThis=Web Import File".$usemesseol;$gmformcs= $usemesseol."[ContSupp]".$usemesseol;$dataMk=false;$dataSt=false;$dataCS=false;foreach($dbdatas as $Name=>$Value){if(ereg('DataStart',$Name)){$dataMk=true;}if(ereg('^cs[0-9]_*',$Name)){$dataCS=true;}}if ($dataMk==false){$gmform=$gmform.$usemesseol."[Data]".$usemesseol;}foreach($dbdatas as $Name=>$Value){if($dataMk==true && $dataSt==false){if(ereg('DataStart',$Name)){$dataSt=true;$gmform = $gmform.$usemesseol."[Data]".$usemesseol;}else{if(ereg('^cs[0-9]_*',$Name)){$gmformcs .= $Name.'='.$Value.$usemesseol;}else{$gmform.=$Name.'='.$Value.$usemesseol;}}}else{if (ereg('^cs[0-9]_*',$Name)){$gmformcs.=$Name.'='.$Value.$usemesseol;}else{$gmform.=$Name.'='.$Value.$usemesseol;}}}if($dataCS==true){$gmform.=$formcs;}if(!@mail($gmto,$gmsubject,$gmform,$gmheaders)){$gmfail=true;}}if(($gmuse!='true'&&$mysqluse!='true')||(isset($sendonlyiferror)&&$sendonlyiferror!='true')||$mysqlfail==true||(isset($gmsendonly)&&$gmsendonly!='true')||$gmfail==true){if($mysqlfail==true){$subjectin='Error MYSQL '.$subjectin;}if($gmfail==true){$subjectin='Error GoldMine '.$subjectin;}$mailok=@mail($delemail,$subjectin,$formin,$xheaders);}else{$mailok=true;}if($mailok){if(isset($autoresponse)){$autoresponse=trim(stripslashes($autoresponse));if($autoresponse!=""){$arxheaders .="From: $delemail1".$useeol."Reply-To: $delemail1".$useeol."Return-path: $delemail1".$useeol."X-Mailer: PHP/" . phpversion();@mail($emailin,$subjectin,$autoresponse,$arxheaders);}}if(!$thankurl){$htmldisret=$htmlheadst.'Thank You - Form Delivered';if($jsreturn=='true'){$htmldisret.=$rtfsj;}else{if($rtflink=='true'){$htmldisret.='

Return to Form

';}else{$htmldisret.='

';}}$htmldisret.='

Your form has been delivered.

';echo $htmldisret;}else{if($reasonreturn=='true'){header("Location: $thankurl?reason=$form1_urlf");}else{header("Location: $thankurl");}}session_unset();session_destroy();exit();}else{if(!$errurl){$htmldisret=$htmlheadst.'Form Delivery Error';if($jsreturn=='true'){$htmldisret.=rtfsj;}else{$htmldisret.=rtfss;}$htmldisret.='

Your form has not been delivered.

Please use the Return to Form above to return to the form and resubmit.

';echo $htmldisret;}else{header("Location: $errurl");}exit();}}}} /* #### Below here is standard html. You can adjust the html as required. You can also copy the code from here up (including the ?> following this comment) and paste it at the top (above the html tag and any document type tags) of any html form page. All forms must be valid html and follow the guidelines provided in the help file. */?> Contact Recovery Nation
 
 
Quick Links
 

FAQs

What is Sexual Addiction?
What is Love Addiction?
What is Porn Addiction?
What is Health Based Recovery?
What role do the 12 Steps Play?

 


 

Contact Us

 

Online Form:

 

This form has been moved. You can access it here:

 

Online Contact Form

 

 

  

 
Copyright © 2001-2008. RecoveryNation.com. All Rights Reserved.