"
myText = myText + ""
myText = myText + " | Date: | " + TodaysDate + vbCrLf
myText = myText + " |
| Job Code: | " + JobCode + vbCrLf
myText = myText + " |
" + vbCrLf
myText = myText + "Personal Information
"
myText = myText + ""
myText = myText + "| First name: | " + FirstName + vbCrLf
myText = myText + " |
| M.I.: | " + MIName + vbCrLf
myText = myText + " |
| Last name: | " + LastName + vbCrLf
myText = myText + " |
| Previous names: | " + PreviousNames + vbCrLf
myText = myText + " |
| Prefered name: | " + PreferedName + vbCrLf
myText = myText + " |
| Address: | " + PersonalAddress + vbCrLf
myText = myText + " |
| City: | " + PersonalCity + vbCrLf
myText = myText + " |
| State: | " + PersonalState + vbCrLf
myText = myText + " |
| Zip: | " + PersonalZip + vbCrLf
myText = myText + " |
| Phone: | " + PersonalPhone + vbCrLf
myText = myText + " |
| Email: | " + Email + vbCrLf
myText = myText + " |
| Cell phone: | " + PersonalCell + vbCrLf
myText = myText + " |
| Best time to be reached: | " + PersonalReach + vbCrLf
myText = myText + " |
" + vbCrLf
myText = myText + "How did you hear about us?
"
myText = myText + "
" + PersonalHear
myText = myText + "
"
myText = myText + "What position are you applying for?
"
myText = myText + "
" + PersonalApplying
myText = myText + "
"
myText = myText + "What are the ideal working hours for you?
"
myText = myText + "
" + PersonalHours
myText = myText + "
"
myText = myText + "If accepted for employment, when could you start?
"
myText = myText + "
" + PersonalStart
myText = myText + "
"
myText = myText + "Have you ever been convicted of a felony, misdemeanor or any other offense other than a minor traffic violation?
"
myText = myText + "
" + PersonalConvicted
myText = myText + "
"
myText = myText + "If so, please explain:
"
myText = myText + "
" + PersonalConvictedExplain
myText = myText + "
"
myText = myText + "Education
"
myText = myText + "High School
"
myText = myText + ""
myText = myText + "| School name: | " + EducationHS + vbCrLf
myText = myText + " |
| Years completed | " + EducationHSYC + vbCrLf
myText = myText + " |
| Course of study | " + EducationHSCS + vbCrLf
myText = myText + " |
| Graduate?: | " + EducationHSG + vbCrLf
myText = myText + " |
| Degree/Diploma: | " + EducationHSD + vbCrLf
myText = myText + " |
" + vbCrLf
myText = myText + "College
"
myText = myText + ""
myText = myText + "| School name: | " + EducationC + vbCrLf
myText = myText + " |
| Years completed | " + EducationCYC + vbCrLf
myText = myText + " |
| Course of study | " + EducationCCS + vbCrLf
myText = myText + " |
| Graduate?: | " + EducationCG + vbCrLf
myText = myText + " |
| Degree/Diploma: | " + EducationCD + vbCrLf
myText = myText + " |
" + vbCrLf
myText = myText + "College (secondary)
"
myText = myText + ""
myText = myText + "| School name: | " + EducationC2 + vbCrLf
myText = myText + " |
| Years completed | " + EducationC2YC + vbCrLf
myText = myText + " |
| Course of study | " + EducationC2CS + vbCrLf
myText = myText + " |
| Graduate?: | " + EducationC2G + vbCrLf
myText = myText + " |
| Degree/Diploma: | " + EducationC2D + vbCrLf
myText = myText + " |
" + vbCrLf
myText = myText + "Other
"
myText = myText + ""
myText = myText + "| School name: | " + EducationO + vbCrLf
myText = myText + " |
| Years completed | " + EducationOYC + vbCrLf
myText = myText + " |
| Course of study | " + EducationOCS + vbCrLf
myText = myText + " |
| Graduate?: | " + EducationOG + vbCrLf
myText = myText + " |
| Degree/Diploma: | " + EducationOD + vbCrLf
myText = myText + " |
" + vbCrLf
myText = myText + "Military Experience
"
myText = myText + ""
myText = myText + "
"
myText = myText + "| Branch of Service: | " + MilitaryBranch + vbCrLf
myText = myText + " |
| Dates: Begin/End | " + MilitaryDates + vbCrLf
myText = myText + " |
| Rank at Discharge | " + MilitaryRank + vbCrLf
myText = myText + " |
| Duties/Accomplishments: | " + MilitaryDuties + vbCrLf
myText = myText + " |
" + vbCrLf
myText = myText + ""
myText = myText + "
"
myText = myText + "| Branch of Service: | " + MilitaryBranch2 + vbCrLf
myText = myText + " |
| Dates: Begin/End | " + MilitaryDates2 + vbCrLf
myText = myText + " |
| Rank at Discharge | " + MilitaryRank2 + vbCrLf
myText = myText + " |
| Duties/Accomplishments: | " + MilitaryDuties2 + vbCrLf
myText = myText + " |
" + vbCrLf
myText = myText + "Present and Previous Employment History
"
myText = myText + ""
myText = myText + "
"
myText = myText + "| Company Name: | " + PECompanyName + vbCrLf
myText = myText + " |
| Position: | " + PECompanyPosition + vbCrLf
myText = myText + " |
| Address: | " + PECompanyAddress + vbCrLf
' NURD: Commented out by NURD on 01/23/2006 as requested by hireVision
' NURD: Only commented out in the case that hireVision finds a use for this at a later time, yo.
' myText = myText + " |
| Supervisor: | " + PECompanySupervisor + vbCrLf
' myText = myText + " |
| Phone: | " + PECompanyPhone + vbCrLf
' myText = myText + " |
| Email: | " + PECompanyEmail + vbCrLf
' myText = myText + " |
| Fax: | " + PECompanyFax + vbCrLf
myText = myText + " |
" + vbCrLf
myText = myText + "Please give us a brief description of your major job duties and responsibilities.
"
myText = myText + "
" + PECompanyDuties
myText = myText + "
"
myText = myText + ""
myText = myText + "
"
myText = myText + "| Start date: | " + PECompanySD + vbCrLf
myText = myText + " |
| End date: | " + PECompanyED + vbCrLf
myText = myText + " |
" + vbCrLf
myText = myText + "Reason for leaving
"
myText = myText + "
" + PECompanyRFL
myText = myText + "
"
myText = myText + ""
myText = myText + "
"
myText = myText + "| Starting salary: : | " + PECompanySS + vbCrLf
myText = myText + " |
| Ending salary: | " + PECompanyES + vbCrLf
myText = myText + " |
| May we contact this employer for a reference? | " + PECompanyContact + vbCrLf
myText = myText + " |
" + vbCrLf
myText = myText + "
"
myText = myText + ""
myText = myText + "
"
myText = myText + "| Company Name: | " + PECompanyName2 + vbCrLf
myText = myText + " |
| Position: | " + PECompanyPosition2 + vbCrLf
myText = myText + " |
| Address: | " + PECompanyAddress2 + vbCrLf
' NURD: Commented out by NURD on 01/23/2006 as requested by hireVision
' NURD: Only commented out in the case that hireVision finds a use for this at a later time, yo.
' myText = myText + " |
| Supervisor: | " + PECompanySupervisor2 + vbCrLf
' myText = myText + " |
| Phone: | " + PECompanyPhone2 + vbCrLf
' myText = myText + " |
| Email: | " + PECompanyEmail2 + vbCrLf
' myText = myText + " |
| Fax: | " + PECompanyFax2 + vbCrLf
myText = myText + " |
" + vbCrLf
myText = myText + "Please give us a brief description of your major job duties and responsibilities.
"
myText = myText + "
" + PECompanyDuties2
myText = myText + "
"
myText = myText + ""
myText = myText + "
"
myText = myText + "| Start date: | " + PECompanySD2 + vbCrLf
myText = myText + " |
| End date: | " + PECompanyED2 + vbCrLf
myText = myText + " |
" + vbCrLf
myText = myText + "Reason for leaving
"
myText = myText + "
" + PECompanyRFL2
myText = myText + "
"
myText = myText + ""
myText = myText + "
"
myText = myText + "| Starting salary: : | " + PECompanySS2 + vbCrLf
myText = myText + " |
| Ending salary: | " + PECompanyES2 + vbCrLf
myText = myText + " |
| May we contact this employer for a reference? | " + PECompanyContact2 + vbCrLf
myText = myText + " |
" + vbCrLf
myText = myText + "
"
myText = myText + ""
myText = myText + "
"
myText = myText + "| Company Name: | " + PECompanyName3 + vbCrLf
myText = myText + " |
| Position: | " + PECompanyPosition3 + vbCrLf
myText = myText + " |
| Address: | " + PECompanyAddress3 + vbCrLf
' NURD: Commented out by NURD on 01/23/2006 as requested by hireVision
' NURD: Only commented out in the case that hireVision finds a use for this at a later time, yo.
' myText = myText + " |
| Supervisor: | " + PECompanySupervisor3 + vbCrLf
' myText = myText + " |
| Phone: | " + PECompanyPhone3 + vbCrLf
' myText = myText + " |
| Email: | " + PECompanyEmail3 + vbCrLf
' myText = myText + " |
| Fax: | " + PECompanyFax3 + vbCrLf
myText = myText + " |
" + vbCrLf
myText = myText + "Please give us a brief description of your major job duties and responsibilities.
"
myText = myText + "
" + PECompanyDuties3
myText = myText + "
"
myText = myText + ""
myText = myText + "
"
myText = myText + "| Start date: | " + PECompanySD3 + vbCrLf
myText = myText + " |
| End date: | " + PECompanyED3 + vbCrLf
myText = myText + " |
" + vbCrLf
myText = myText + "Reason for leaving
"
myText = myText + "
" + PECompanyRFL3
myText = myText + "
"
myText = myText + ""
myText = myText + "
"
myText = myText + "| Starting salary: : | " + PECompanySS3 + vbCrLf
myText = myText + " |
| Ending salary: | " + PECompanyES3 + vbCrLf
myText = myText + " |
| May we contact this employer for a reference? | " + PECompanyContact3 + vbCrLf
myText = myText + " |
" + vbCrLf
myText = myText + "Additional Information
"
myText = myText + "Dates:
"
myText = myText + "
" + AdditionalDates
myText = myText + "
"
myText = myText + "Explanation:
"
myText = myText + "
" + AdditionalExplanation
myText = myText + "
"
myText = myText + "Dates:
"
myText = myText + "
" + AdditionalDates2
myText = myText + "
"
myText = myText + "Explanation:
"
myText = myText + "
" + AdditionalExplanation2
myText = myText + "
"
myText = myText + ""
myText = myText + "
"
myText = myText + "| Signature: | " + Signature + vbCrLf
myText = myText + " |
| Signature date: | " + SignatureDate + vbCrLf
myText = myText + " |
" + vbCrLf
myText = myText + ""
Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ServerAddress = "127.0.0.1:25"
JMail.ISOEncodeHeaders = False
JMail.Sender = "webmaster@hirevisiongroup.com"
JMail.AddRecipient "applyonline@hirevisiongroup.com"
JMail.Subject = "Online InterApp Submission from " & fullname
JMail.HTMLBody = myText
JMail.Priority = 1
JMail.Execute
'Set JMail = Server.CreateObject("JMail.SMTPMail")
'JMail.ServerAddress = "127.0.0.1:25"
'JMail.ISOEncodeHeaders = False
'JMail.Sender = "webmaster@hirevisiongroup.com"
'JMail.AddRecipient "applyonline@hirevisiongroup.com"
'JMail.Subject = "Online InterApp Submission from " & fullname
'JMail.HTMLBody = myText
'JMail.Priority = 1
'JMail.Execute %>