Offshore Jobs! Immediate Openings! All Skills! USA / Overseas! Work Month / Home Month! Turn Work Into An Adventure!

^fname^,

I wanted to touch base with you again and see how the job search is going. More jobs are being advertised online than ever before. The work is out there and plenty of it. I try and add 12-15 new jobs a week. If you don't find the particular job you are looking for, let me know and I'll do some specific searching to see what I can find.

NOW is a great time to get in. Recruiters are shorthanded every day for experienced personnel and dependable entry level candidates. These shortages are for jobs in the US, Canada and many foreign locations.

If you are not working at the job of your choice it is not because the jobs are not available!

One of the major parts of this process is establishing a personal one on one contact with recruiters. When you get past all the SPAM, attachment and virus filters and are sure you have a one on one contact with a recruiter, you can make some progress. This is where having a winning resume really pays off.

What did you think of the critique? Was it helpful? I hope so. I think what you are using is not providing you with the results you should be getting. Writing a winning resume is a tough task, even for a professional. It looks easy but turns out to be a challenge of immense proportions. Usually more than what you bargained for. All that and it is still not right.

Or you could try the latest in resume writing software. You see it everywhere you go, especially online. "Write a Winning Resume in 15 Minutes" or some BS like that. Yeah, tell me another one.

No software has been created that can write a better resume than Cpt Ron!

Take the stress off, do yourself a favor and contract my professional services to write a PROFESSIONAL resume for you. It makes all the difference in the world. Using a professional resume will GUARANTEE you more and better job leads AND will be one less thing you have to worry about.

I have years of experience writing job specific, professional oilfield and maritime resumes that have resulted in many people getting hired offshore. You can depend on me to do a great job.

  • If you understand what I have written up to now, we can move on
  • If you do not understand what I have written so far, ASK FOR CLARRIFICATION
  • If you think this is BS, let me know and I will take your name off the job list

Thanks again and good luck!

Cpt Ron
Offshore Guides

Hi, <%=session("PID")%>. Your access level = <%=session("Access_Level")%> 

<% if session("Access_Level") = 10 Then %>

Back to Offshore GuidesOffshore Guides Administration 

1. There are currently <% Dim objRec2 ' recordset object Dim objCommand2 ' command object Dim objParameter2 ' parameter object Dim counter2 ' record counter counter = 0 ' create the objects Set objCommand2 = Server.CreateObject ("ADODB.Command") Set objRec2 = Server.CreateObject ("ADODB.Recordset") ' fill in the command properties objCommand2.ActiveConnection = strConnectacc objCommand2.CommandText = "employeesall" objCommand2.CommandType = adCmdStoredProc ' now open it Set objRec2 = objCommand2.Execute ' now loop throuth the records. While Not objRec2.EOF counter=counter+1 objRec2.MoveNext Wend Response.Write counter ' now close and clean up objRec2.Close Set objRec2 = Nothing Set objCommand2 = Nothing Set objParameter2 = Nothing %> employees in the database.

<% Set Cm = Server.CreateObject("ADODB.Command") Cm.ActiveConnection = strConnectacc Cm.CommandType = 1 %>
Search the Employees Database
You must enter at least 1 search criteria!!!
SORT ORDER  
Job
Country                Add New Job
Education
Yrs Experience
Age
Status
Last Name
Email  
Phone #  
Cell Phone #  
SUBSCRIBERS  
RESUME BUYERS  
PRIVATE  
Duplicate Entry  
Keyword Search
   
<% end if %> <% if (session("Access_Level") = 10) or (session("Access_Level") = 20) Then %>
2. There are currently <% Dim objRec3 ' recordset object Dim objCommand3 ' command object Dim objParameter3 ' parameter object Dim counter3 ' record counter counter = 0 ' create the objects Set objCommand3 = Server.CreateObject ("ADODB.Command") Set objRec3 = Server.CreateObject ("ADODB.Recordset") ' fill in the command properties objCommand3.ActiveConnection = strConnectacc objCommand3.CommandText = "employercount" objCommand3.CommandType = adCmdStoredProc ' now open it Set objRec3 = objCommand3.Execute ' now loop throuth the records. While Not objRec3.EOF counter=counter+1 objRec3.MoveNext Wend Response.Write counter ' now close and clean up objRec3.Close Set objRec3 = Nothing Set objCommand3 = Nothing Set objParameter3 = Nothing %> employers in the database.

Sort By
Order by top usage

<% end if %> <% if (session("Access_Level") = 10) or (session("Access_Level") = 20) Then %>
3. Search Jobs


<% Set Cm = Server.CreateObject("ADODB.Command") Cm.ActiveConnection = strConnectacc Cm.CommandType = 1 %> <% 'Open Data Connection Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open strConnectacc %>

Choose a category:
 
<% end if %> <% if session("Access_Level") = 10 Then %>
4. Send Newsletters

<% 'Count added by Michael V Feranda '3/2/07 12:57 AM 'Switch to the active conn Set cmd = Server.CreateObject("ADODB.Command") Set cmd.ActiveConnection = Conn 'Def the SP cmd.CommandText = "OSG_Database_Totals" cmd.CommandType = adCmdStoredProc 'Set up your params Set objParam = cmd.CreateParameter("@Mem_Count",adInteger,adParamOutput,4) Cmd.Parameters.Append objParam Set objParam = cmd.CreateParameter("@Sub_Count",adInteger,adParamOutput,4) Cmd.Parameters.Append objParam Set objParam = cmd.CreateParameter("@Res_Count",adInteger,adParamOutput,4) Cmd.Parameters.Append objParam Set objParam = cmd.CreateParameter("@NonRes_Count",adInteger,adParamOutput,4) Cmd.Parameters.Append objParam Set objParam = cmd.CreateParameter("@PEmp_Count",adInteger,adParamOutput,4) Cmd.Parameters.Append objParam Set objParam = cmd.CreateParameter("@EmpAg_Count",adInteger,adParamOutput,4) Cmd.Parameters.Append objParam 'Do it. cmd.Execute 'Put your params to vars Mem_Count = cmd.Parameters("@Mem_Count") Sub_Count = cmd.Parameters("@Sub_Count") Res_Count = cmd.Parameters("@Res_Count") NonRes_Count = cmd.Parameters("@NonRes_Count") PEmp_Count = cmd.Parameters("@PEmp_Count") EmpAg_Count = cmd.Parameters("@EmpAg_Count") 'Close everything up Set cmd = Nothing %>
<% Set Cm = Server.CreateObject("ADODB.Command") Cm.ActiveConnection = strConnectacc Cm.CommandText = "SELECT * FROM one_time_letter_send_date WHERE LetterType = 'members'" Cm.CommandType = 1 Set Rs1 = Cm.Execute %> <% Rs1.Close Set Rs1=Nothing %>

4a. to <%=Mem_Count%> members 

 edit
Last Processing Date: <%=Rs1("LastSendDate")%>
Subject
Send Test To:
<% Set Cm = Server.CreateObject("ADODB.Command") Cm.ActiveConnection = strConnectacc Cm.CommandText = "SELECT * FROM one_time_letter_send_date WHERE LetterType = 'subscribers'" Cm.CommandType = 1 Set Rs1 = Cm.Execute %> <% Rs1.Close Set Rs1=Nothing %>

4b. to <%=Sub_Count%> subscribers: (<%=Res_Count%> Res, <%=NonRes_Count%> Non Res)

 edit
Last Processing Date: <%=Rs1("LastSendDate")%>
Subject
Send Test To:
<% Set Cm = Server.CreateObject("ADODB.Command") Cm.ActiveConnection = strConnectacc Cm.CommandText = "SELECT * FROM one_time_letter_send_date WHERE LetterType = 'primary_employers'" Cm.CommandType = 1 Set Rs1 = Cm.Execute %> <% Rs1.Close Set Rs1=Nothing %>

4c. to <%=PEmp_Count%> primary employers

 edit
Last Processing Date: <%=Rs1("LastSendDate")%>
Subject
Send Test To:
<% Set Cm = Server.CreateObject("ADODB.Command") Cm.ActiveConnection = strConnectacc Cm.CommandText = "SELECT * FROM one_time_letter_send_date WHERE LetterType = 'employment_agencies'" Cm.CommandType = 1 Set Rs1 = Cm.Execute %> <% Rs1.Close Set Rs1=Nothing %>

4d. to <%=EmpAg_Count%> employment agencies

 edit
Last Processing Date: <%=Rs1("LastSendDate")%>
Subject
Send Test To:
<% end if %> <% if session("Access_Level") = 10 Then %>
5. Daily / Weekly Processing Links:

<% Set Cm = Server.CreateObject("ADODB.Command") Cm.ActiveConnection = strConnectacc Cm.CommandText = "SELECT * FROM daily_processing WHERE process_type = 'Active'" Cm.CommandType = 1 Set Rs1 = Cm.Execute %> <% Rs1.Close Set Rs1=Nothing %>
Current
Number 1

  • Run Process on Pending Resumés (Auto Activate)

  • Send letters to new ACTIVE Resumés

USE / USN
FE / FN

Run Pending Process for Active, Send Letter
Last Processing Date: <%=Rs1("last_run_date")%>
<% Set Cm = Server.CreateObject("ADODB.Command") Cm.ActiveConnection = strConnectacc Cm.CommandText = "SELECT * FROM daily_processing WHERE process_type = 'Hold Run'" Cm.CommandType = 1 Set Rs1 = Cm.Execute %> <% Rs1.Close Set Rs1=Nothing %> <% Set Cm = Server.CreateObject("ADODB.Command") Cm.ActiveConnection = strConnectacc Cm.CommandText = "SELECT * FROM daily_processing WHERE process_type = 'Hold Run Letters'" Cm.CommandType = 1 Set Rs1 = Cm.Execute %> <% Rs1.Close Set Rs1=Nothing %>
Number 2

  • Run Process on Pending
    Resumés (Auto Hold)

  • Send letters to ON HOLD Resumés

1 E / 1 N
2 E / 2 N
3 E / 3 N
4 E / 4 N

Run Pending Process for ON HOLD
Send Letter 1
Last Processing Date: <%=Rs1("last_run_date")%>
<% Set Cm = Server.CreateObject("ADODB.Command") Cm.ActiveConnection = strConnectacc Cm.CommandText = "SELECT * FROM daily_processing WHERE process_type = 'Hold Run'" Cm.CommandType = 1 Set Rs1 = Cm.Execute %> <% Rs1.Close Set Rs1=Nothing %> <% Set Cm = Server.CreateObject("ADODB.Command") Cm.ActiveConnection = strConnectacc Cm.CommandText = "SELECT * FROM daily_processing WHERE process_type = 'Hold Run Letters'" Cm.CommandType = 1 Set Rs1 = Cm.Execute %> <% Rs1.Close Set Rs1=Nothing %>
Number 3

  • Run Process on Pending
    Resumés (Auto Hold)

  • Send letters to ON HOLD Resumés

1 E / 1 N
2 E / 2 N
3 E / 3 N
4 E / 4 N

Send ON HOLD Letters 2, 3, 4, 1
Last Processing Date: <%=Rs1("last_run_date")%>
<% Set Cm = Server.CreateObject("ADODB.Command") Cm.ActiveConnection = strConnectacc Cm.CommandText = "SELECT * FROM daily_processing WHERE process_type = 'File Update'" Cm.CommandType = 1 Set Rs1 = Cm.Execute%>

Number 4

  • Request for file update (required every 60 days)

 Edit
Last Processing Date: <%=Rs1("last_run_date")%>
Run Process
<% Rs1.Close Set Rs1=Nothing %>


<% end if %> <% if session("Access_Level") = 10 Then %>
6. Email Templates:

  • New Member Confirmation Letter - goes out immediately after submission of a new resumé file.

  • New Member 1st AUTO sales letter - goes out 4 days after non paying member is made active.

  • Resume Mailer - goes out when direct accesss subscribers send their resumé to any
    employer who has a job listed on this site.

  • Paying subscriber 1st AUTO letter - goes out 4 days after member has been made a subscriber.

  • Employer Confirmation Letter - goes out immediately after an employer registers for the
    14 day free trial.

  • Subscription Customer - thank you and instruction letter.

  • Resumé Customer - thank you and instruction letter.
<% end if %> <% if session("Access_Level") = 10 Then %>
7. Email List:

<% end if %>