Search For A Vacancy Below.

Category	<% set Recordset2 = Server.CreateObject("ADODB.Recordset") Recordset2.ActiveConnection = MM_advancerecruit_STRING Recordset2.Source = "SELECT * FROM jobcategories ORDER BY maincat,Jobcat ASC" Recordset2.CursorType = 0 Recordset2.CursorLocation = 2 Recordset2.LockType = 3 Recordset2.Open() Recordset2_numRows = 0 %> <%Dim sbmaster2 sbmaster2=""%> Select A Sub-Category: <% While ((Repeat1__numRows <> 0) AND (NOT Recordset2.EOF)) %> <% Dim Recordset3__MMColParam Recordset3__MMColParam = Recordset2.Fields.Item("maincat").Value if (Request("MM_EmptyValue") <> "") then Recordset3__MMColParam = Request("MM_EmptyValue") %> <% set Recordset3 = Server.CreateObject("ADODB.Recordset") Recordset3.ActiveConnection = MM_advancerecruit_STRING Recordset3.Source = "SELECT * FROM maincats WHERE maincat = " + Replace(Recordset3__MMColParam, "'", "''") + " ORDER BY maincattitle ASC" Recordset3.CursorType = 0 Recordset3.CursorLocation = 2 Recordset3.LockType = 3 Recordset3.Open() Recordset3_numRows = 0 %> <%cattitle=(Recordset3.Fields.Item("maincattitle").Value)%> <%If sbmaster2 <> (Recordset3.Fields.Item("maincat").Value) Then%> <%=(Recordset3.Fields.Item("maincattitle").Value)%> <%End If%> ">      -- <%=(Recordset2.Fields.Item("jobcat").Value)%> <%sbmaster2=(Recordset2.Fields.Item("maincat").Value)%> <% Recordset3.Close() %> <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 Recordset2.MoveNext() Wend %> <% Recordset2.Close() %>
Keywords (optional)
Position Type	Full-Time Part-Time Permanent Contract