<% nof_rootDir="../" nof_scriptDir="scripts" nof_debug=false nof_sitePath = GetSitePath(nof_rootDir) function GetSitePath(RootDir) Dim relPath relPath = split(RootDir, "/") forwardSteps = UBound(relPath) - 1 if forwardSteps = 0 and relPath(0) = "." then forwardSteps = -1 GetSitePath = Server.MapPath(".") for idx=0 to forwardSteps GetSitePath = Left(GetSitePath, inStrRev(GetSitePath, "\") - 1) next GetSitePath = GetSitePath & "\" end function %> <% function FileExists(ByVal file, ByVal sitePath, ByVal scriptDir) dim fso, filePath on error resume next Set fso = Server.CreateObject("Scripting.FileSystemObject") filePath = sitePath & scriptDir & "\" & file FileExists = fso.FileExists(filePath) set fso = nothing end function %> Submit an RFP
CWA_SectionType_SubmitRFP
<% if FileExists("rememberValues.js", nof_sitePath, nof_scriptDir) then %>
Company<% if Len(request("1169601345877_CompanyErrImg")) > 0 then response.write "" end if %>
First name<% if Len(request("1169601345877_firstNameErrImg")) > 0 then response.write "" end if %>
Last name<% if Len(request("1169601345877_lastNameErrImg")) > 0 then response.write "" end if %>
Address<% if Len(request("1169601345877_addressErrImg")) > 0 then response.write "" end if %>
Zip<% if Len(request("1169601345877_zipErrImg")) > 0 then response.write "" end if %>
City<% if Len(request("1169601345877_cityErrImg")) > 0 then response.write "" end if %>
County<% if Len(request("1169601345877_countyErrImg")) > 0 then response.write "" end if %>
State<% if Len(request("1169601345877_stateErrImg")) > 0 then response.write "" end if %>
Country<% if Len(request("1169601345877_countryErrImg")) > 0 then response.write "" end if %>
Phone<% if Len(request("1169601345877_phoneErrImg")) > 0 then response.write "" end if %>
Email<% if Len(request("1169601345877_emailErrImg")) > 0 then response.write "" end if %>
Upload<% if Len(request("1169601345877_fileuploadErrImg")) > 0 then response.write "" end if %>
Comment<% if Len(request("1169601345877_commentErrImg")) > 0 then response.write "" end if %>
<% if Len(request("1169601345877_SubmitErrImg")) > 0 then response.write "" end if %>
<%=request("1169601345877_Errors")%>
<% Response.Write "" else if nof_debug then Response.Write "Could not include the file `" & nof_sitePath & nof_scriptDir & "\" & "rememberValues.js`." else Response.Write "

An error occured. Please contact the site administrator.

" Response.Write "

Error code: 103

" end if end if %>

 © 2001 - 2006 Claggett Wolfe Associates

CWA_Section_AboutUs02

 

CWA_Header_Top_30
CWA_Header_Top_15
CWA_Header_Top_29
CWA_Header_Top_28
CWA_Header_Top_27
CWA_Header_Top_13
CWA_Header_Top_11
CWA_Header_Top_26
CWA_Header_Top_25
CWA_Header_Top_24
CWA_Header_Top_23
CWA_Header_Top_22
CWA_Header_Top_21
CWA_Header_Top_20
CWA_Header_Top_19
CWA_Header_Top_18
CWA_Header_Top_17
CWA_Header_Top_16
CWA_Header_Top_09
CWA_Header_Top_07
CWA_Header_Top_05
CWA_Header_Top_03
CWA_Header_Top_01