|
Server : Apache/2.4.62 System : FreeBSD fbsdweb2.web.rcn.net 14.1-RELEASE FreeBSD 14.1-RELEASE releng/14.1-n267679-10e31f0946d8 GENERIC amd64 User : www ( 80) PHP Version : 8.3.8 Disable Function : NONE Directory : /domains/efusion1/ |
Upload File : |
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="Connections/Void.asp" -->
<%
'*********************************
'* ADVANCED MAIL *
'*********************************
deleteProgressMail session.SessionID
'*********************************
'* ADVANCED MAIL *
'*********************************
'*********************************
'* *
'* ADVANCED MAIL *
'* http://www.DwZone.it *
'* *
'*********************************
server.ScriptTimeout = 5400
Dim RG_altVal, RG_columns, RG_Cong, RG_dbValues, RG_dbValuesTmp, RG_delim, RG_editCmd, RG_editQuery, RG_editQueryTmp, RG_emptyVal, RG_Ext, RG_Extensions, RG_fields, RG_FieldValueTmp, RG_FileDel, RG_FileExt, RG_formVal, RG_FS, RG_i, RG_L, RG_Len, RG_Max, RG_Name, RG_New, RG_newName, RG_Num, RG_Path, RG_Rec, RG_ret, RG_Save, RG_tableValues, RG_tableValuesTmp, RG_tst, FileMatch
Dim RG_Connection, RG_editColumn, RG_recordId, Form, editAction, editRedirectUrl, RG_Files, RG_formName, UploadType, ParamVal, ParamList, MaxFieldNumber, TmpVal, x, y, Key, ProgressBar, RG_typeArray, RG_z, UploadStatus, NumFile, RG_MailParameter
Dim OnLoadStart,ProgressMail,RG_BodyText,BodyFromFile,ImagesList,FilesList,StrSql,ReplaceList,sendAllFilesInFolder,sendAllFilesType,Rs,Parametri,SendMailID,Risposta,Cong,TotalMail,NumMail,TimeStart,Mailer,MailPar_1,MailPar_2,MailPar_3,MailPar_4,MailPar_5,FromName,FromMail, ReplyName, ReplyMail, ToName, ToMail, CcList, BccList, ReturnReceipt, MailFormat, Priority, MailObject, Message,Cc,Bcc,Comando,Conn,Fs,TempFolder,TempFileName,retStr,Risp,IsMailSend,newPage,ListToReplace,valori,ListFile,Folder,File,ListImage,UploadID,StatusFile,NewFileName,VerLen,VerExt,ItemCounter,Ris,FileToDelete,separ,ThisPage,tmpFile,LineaFile
Dim tmpField_Name(), tmpValue_Name(), tmpField_Size(), tmpValue_Size(), QtyRecord, ParamVal_AdvMail, TotalFileSize, NoSendFileExceed, UploadMailError, valueToRedirectSend, MaxFieldNumberAdv, newPassword
OnLoadStart = "0"
if OnLoadStart = "0" then
Set Form = New ASPForm
UploadID = Form.NewUploadID
end if
ProgressBar = ""
ProgressMail = ""
editRedirectUrl = "contact-thanks.asp"
RG_Files = "@_@_@0@_@_@ @_@_@ @_@_@/"
RG_formName = "form1"
RG_MailParameter = "6@@@_@@@_@@@smtp.rcn.com@@@_@@@_@@@ @@@_@@@_@@@ @@@_@@@_@@@ @@@_@@@_@@@ @@@_@@@_@@@FUSION@@@_@@@_@@@[email protected]@@@_@@@_@@@ @@@_@@@_@@@ @@@_@@@_@@@Name_First@_form_@@@@_@@@_@@@Email@_form_@@@@_@@@_@@@ @@@_@@@_@@@[email protected],[email protected]@@@_@@@_@@@ @@@_@@@_@@@1@@@_@@@_@@@2@@@_@@@_@@@Thank You for Contacting FUSION@@@_@@@_@@@0@@@_@@@_@@@1@@@_@@@_@@@ @@@_@@@_@@@1@@@_@@@_@@@-1@@@_@@@_@@@us-ascii;20127;US-ASCII@@@_@@@_@@@@@@_@@@_@@@@@@_@@@_@@@1@@@_@@@_@@@post@@@_@@@_@@@0@@@_@@@_@@@ @@@_@@@_@@@0@@@_@@@_@@@ @@@_@@@_@@@0@@@_@@@_@@@0@@@_@@@_@@@ @@@_@@@_@@@0@@@_@@@_@@@"
RG_BodyText = " "
BodyFromFile = "contact-email.asp"
UploadType = "AdvancedMail"
ImagesList = ""
FilesList = ""
RG_Connection = MM_Void_STRING
ReplaceList = "#Company#;Company@_form_@|#Email#;Email@_form_@|#Job_Title#;Job_Title@_form_@|#Name_First#;Name_First@_form_@|#Name_Last#;Name_Last@_form_@|#Needs#;Needs@_form_@|#Needs#;Needs@_form_@|#Needs#;Needs@_form_@|#Needs#;Needs@_form_@|#Needs#;Needs@_form_@|#Needs#;Needs@_form_@|#Needs#;Needs@_form_@|#Needs#;Needs@_form_@|#Needs#;Needs@_form_@|#Needs#;Needs@_form_@|#Needs#;Needs@_form_@|#Needs#;Needs@_form_@|#OtherNeedsDetails#;OtherNeedsDetails@_form_@|#Phone#;Phone@_form_@"
sendAllFilesInFolder = ""
sendAllFilesType = 0
UploadStatus = ""
NumFile = 0
if OnLoadStart = "-1" then
StrSql = ""
Set Rs = Server.CreateObject("ADODB.RecordSet")
BodyFromDynamicPage = ""
IsMailSend = SendMail()
Set RS = nothing
response.write(getRedirectForMail(IsMailSend))
response.end
else
if len(Request.QueryString("UploadID"))>0 then
Form.UploadID = Request.QueryString("UploadID")
end if
if (Request.QueryString <> "") Then
editAction = CStr(Request.ServerVariables("SCRIPT_NAME")) & "?" & Request.QueryString & "&UploadID=" & UploadID
else
editAction = CStr(Request.ServerVariables("SCRIPT_NAME")) & "?UploadID=" & UploadID
End If
Const fsCompletted = 0
If Form.State = fsCompletted Then
StrSql = ""
if UploadFormRequest("DW_Form_Name") = "form1" then
if Form.State = 0 then
verifyUserExists()
if RG_Files <> "" then
setExtraData()
setParamVal()
setParamVal_AdvMail()
Form.Files.Save
end if
Set Rs = Server.CreateObject("ADODB.RecordSet")
BodyFromDynamicPage = ""
IsMailSend = SendMail()
Set RS = nothing
response.write(getRedirectForMail(IsMailSend))
response.end
End If
End If
ElseIf Form.State > 10 then
response.write "<br><Font Color=red>Some form error.<br>Error code: " & Form.State & "<br>Error List:<br>0 Form was successfully processed. <br>1 Request method is NOT post <br>2 Zero length request (there are no data in a source form) <br>3 Form is in a middle of process. <br>5 Initial form state <br>11 Boundary of multipart/form-data is not specified. <br>12 Unknown source form (Content-type must be multipart/form-data) <br>15 Client was disconnected before upload was completted.<br>16 Unexpected error from Request.BinaryRead method (ASP error).<br></Font><br>"
End If
End If
function GetFolderName(str): GetFolderName = Ris : end function
%><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>Contact FUSION</title>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<link href="/esfusion.css" rel="stylesheet" type="text/css">
<script src="/SpryAssets/SpryMenuBar.js" type="text/javascript"></script>
<link href="/SpryAssets/SpryMenuBarHorizontal.css" rel="stylesheet" type="text/css" />
</head>
<body bgcolor="#ffffff"><table width="720" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><img src="/assets/spacer.gif" width="1" height="1" border="0" alt=""></td>
<td><img src="/assets/spacer.gif" width="225" height="1" border="0" alt=""></td>
<td><img src="/assets/spacer.gif" width="7" height="1" border="0" alt=""></td>
<td><img src="/assets/spacer.gif" width="30" height="1" border="0" alt=""></td>
<td><img src="/assets/spacer.gif" width="18" height="1" border="0" alt=""></td>
<td><img src="/assets/spacer.gif" width="8" height="1" border="0" alt=""></td>
<td><img src="/assets/spacer.gif" width="71" height="1" border="0" alt=""></td>
<td><img src="/assets/spacer.gif" width="8" height="1" border="0" alt=""></td>
<td><img src="/assets/spacer.gif" width="78" height="1" border="0" alt=""></td>
<td><img src="/assets/spacer.gif" width="9" height="1" border="0" alt=""></td>
<td><img src="/assets/spacer.gif" width="43" height="1" border="0" alt=""></td>
<td><img src="/assets/spacer.gif" width="8" height="1" border="0" alt=""></td>
<td><img src="/assets/spacer.gif" width="64" height="1" border="0" alt=""></td>
<td><img src="/assets/spacer.gif" width="8" height="1" border="0" alt=""></td>
<td><img src="/assets/spacer.gif" width="37" height="1" border="0" alt=""></td>
<td><img src="/assets/spacer.gif" width="8" height="1" border="0" alt=""></td>
<td><img src="/assets/spacer.gif" width="64" height="1" border="0" alt=""></td>
<td><img src="/assets/spacer.gif" width="14" height="1" border="0" alt=""></td>
</tr>
<tr>
<td colspan="18" valign="top"><img src="/assets/apples.jpg" alt="apples" align="right" width="85" height="47" hspace="4" vspace="4" border="0"><img src="/assets/logo.gif" alt="FUSION (tm)" name="logo" width="220" height="47" border="0" align="top"><br>
<img src="/assets/tagline.gif" alt="Helping education companies teach better and sell more." name="tagline" width="485" height="17" hspace="10" vspace="6" border="0" align="texttop"><br>
<div align="right"> <img src="/assets/red.gif" alt="" width="720" height="1" hspace="4" vspace="2"><br>
</div></td>
</tr>
<tr>
<td width="10" align="left" valign="top"> </td>
<td rowspan="2" align="left" valign="top"><br>
<p><span class="h4">FUSION</span><br>
31 Atkinson Lane <br>
Sudbury, MA 01776 <br>
PH: (978) 443-5943 <br>
FX: (978) 443-3316 <a href="mailto:[email protected]">[email protected]</a> </p>
<p><br>
</p>
<h3> </h3>
</td>
<td> </td>
<td colspan="15" align="left" valign="top" bgcolor="#FFFFFF" >
<!--#include virtual="/incl.dropmenus.html" -->
<br>
<br></td>
</tr>
<tr>
<td align="left" valign="top"><img src="/assets/spacer.gif" alt="" width="10" height="100"></td>
<td background="/assets/dots-vert.gif"><img src="assets/spacer.gif" width="20" height="100"></td>
<td colspan="14" align="left" valign="top" bgcolor="#FFFFFF" ><h2>Contact FUSION</h2>
<p>We’re always delighted to discuss potential projects, and there’s no fee or obligation for a preliminary consultation. </p>
<p>Please indicate the nature of your need(s) as best you are able <b>(check as many as apply):</b></p>
<form action="<%=editAction%>" method="POST" enctype="multipart/form-data" name="form1" id="form1" onSubmit="return ProgressBar()">
<p>
<input name="Needs" type="checkbox" id="Needs01" value="Strategic and business planning">Strategic and business planning<br>
<input name="Needs" type="checkbox" id="Needs02" value="New venture assessment ">New venture assessment <br>
<input name="Needs" type="checkbox" id="Needs03" value="New product launch">New product launch <br>
<input name="Needs" type="checkbox" id="Needs04" value="Market and competitive research">Market and competitive research <br>
<input name="Needs" type="checkbox" id="Needs05" value="Media advertising (print or online)">Media advertising (print or online)<br>
<input name="Needs" type="checkbox" id="Needs06" value="Sales lead generation (mail, e-mail, paid search)">Sales lead generation (mail, e-mail, paid search)<br>
<input name="Needs" type="checkbox" id="Needs07" value="Website development/optimization">Website development / optimization<br>
<input name="Needs" type="checkbox" id="Needs08" value="Pricing, volume purchase plans, licensing">Pricing, volume purchase plans, licensing<br>
<input name="Needs" type="checkbox" id="Needs09" value="Event promotion (paid or showcase events and Webinars) ">Event promotion (paid or showcase events and Webinars) <br>
<input name="Needs" type="checkbox" id="Needs10" value="Brand identity and/or value proposition development ">Brand identity and/or value proposition development <br>
<input name="Needs" type="checkbox" id="Needs11" value="Collateral and sales promotion ">Collateral and sales promotion <br>
<input name="Needs" type="checkbox" id="Needs12" value="Teleselling and indirect channels ">Teleselling and indirect channels</p>
<p> <b>Questions, other needs, project particulars:</b><br>
</p>
<table border="0" cellpadding="0" cellspacing="0">
<tr>
<td NOWRAP align="right"> </td>
<td><textarea name="OtherNeedsDetails" id="OtherNeedsDetails" cols="28" rows="4"></textarea>
<br>
<br></td>
</tr>
<tr>
<td NOWRAP align="right"><b>First Name </b></td>
<td><input name="Name_First" type="text" id="Name_First" size="30" maxlength="50"> </td>
</tr>
<tr>
<td align="right"><b>Last Name </b></td>
<td><input name="Name_Last" type="text" id="Name_Last" size="30" maxlength="50"> </td>
</tr>
<tr>
<td align="right"><b>Title </b></td>
<td><input name="Job_Title" type="text" size="30" maxlength="100"> </td>
</tr>
<tr>
<td align="right"><b>Firm </b></td>
<td><input name="Company" type="text" id="Company" size="30" maxlength="100"> </td>
</tr>
<tr>
<td align="right" nowrap><b>Business Phone </b></td>
<td><input name="Phone" type="text" id="Phone" size="30" maxlength="100">
</td>
</tr>
<tr>
<td align="right"><b>E-mail Address </b></td>
<td><input name="Email" type="text" id="Email" size="30" maxlength="100"> </td>
</tr>
<tr>
<td align="right"> </td>
<td><span class="small">We do not share contact information with any third party<br>
</span></td>
</tr>
<tr>
<td align="right"> </td>
<td> </td>
</tr>
<tr>
<td> </td>
<td align="left" nowrap><input name="dwzSubmit" type="submit" value=" Contact FUSION ">
<i> (not active yet) </i></td>
</tr>
</table>
<input type="hidden" name="DW_Form_Name" value="form1">
</form>
</td>
<td align="left" valign="top" bgcolor="#FFFFFF" ><img src="/assets/spacer.gif" alt="" width="10" height="100"></td>
</tr>
<tr>
<td align="left" valign="top"> </td>
<td colspan="16" align="left" valign="top"> </td>
<td align="left" valign="top" bgcolor="#FFFFFF" > </td>
</tr>
<tr>
<td colspan="17" align="right" valign="top" class="margin"><!--#include virtual="/incl.footer2.html" --></td>
<td> </td>
</tr>
</table>
</body>
</html>
<!--#include virtual="/dwzMail/Upload.asp" -->
<!--#include virtual="/dwzMail/AdvancedMail.asp" -->
<!--#include virtual="/dwzMail/UploadAdvanced.asp" -->