<%@ LANGUAGE="VBSCRIPT"%> Books & Videos By Companions of the Naval Order of the United States <% If (Request.Form("name") = "") Then %>
Back
Naval Order of the United States
Post Office Box 2714
Merrifield, VA 22116-2741
NavalOrder@aol.com
Separator bar
Naval Order Job Submission Form

Please provide the information requested below:



Your Name:


Your Address:


City:


State:


Zip Code:


Phone:


Fax:


Work Phone:


E-mail:


Web Site:


Place your employment desires below:

Include position title, salary, range, and location, as well as education,
experience, special skills that are required. (Please limit to no more than 150 words)




The Naval Order homepage is managed under the direction of CAPT James F. Brooke III, USNR (Ret.), Past Commander General.
Produced courtesy of Marlene Fox-McIntyre and Athene, Inc.
This page was last updated January 8, 2002
© 1999 - 2002 Naval Order of the United States. All rights reserved.
<% Else strName = Request.Form("name") strAddress = Request.Form("address") strCity = Request.Form("city") strState = Request.Form("state") strZip = Request.Form("zip") strPhone = Request.Form("phone") strFax = Request.Form("fax") strWphone = Request.Form("wphone") strEmail = Request.Form("email") strWsite = Request.Form("wsite") strMessage = Request.Form("message") strClientText = sampText strClientName = strFirstname & vbTab & strLastname strFilePath = Server.MapPath("jobs.txt") Set objFSO = Server.CreateObject("Scripting.FileSystemObject") Set objTextStream = objFSO.OpenTextFile(strFilePath, 8) objTextStream.WriteLine(strName) objTextStream.WriteLine(strAddress) objTextStream.WriteLine(strCity) objTextStream.WriteLine(strState) objTextStream.WriteLine(strZip) objTextStream.WriteLine(strPhone) objTextStream.WriteLine(strFax) objTextStream.WriteLine(strWphone) objTextStream.WriteLine(strEmail) objTextStream.WriteLine(strWsite) objTextStream.WriteLine(strMessage) objTextStream.Close Set objTextStream = Nothing Set objFSO = Nothing %>

Job Listing Recorded

Thank you, <%=strName %>, for the information.

Click here to view listings.

<% End If %>