<%@LANGUAGE="VBSCRIPT"%> <% set rsBanner = Server.CreateObject("ADODB.Recordset") rsBanner.ActiveConnection = MM_ELEDATA_STRING rsBanner.Source = "SELECT * FROM BANNERS " rsBanner.CursorType = 3 rsBanner.CursorLocation = 2 rsBanner.LockType = 1 rsBanner.Open() rsBanner_numRows = 0 'the following codes are added to rotate the banners: Dim rndMax rndMax = CInt(rsBanner.RecordCount) rsBanner.MoveFirst Dim rndNumber Randomize Timer rndNumber = Int(RND * rndMax) rsBanner.Move rndNumber 'end of codes. %> <% set RsHeadlines = Server.CreateObject("ADODB.Recordset") RsHeadlines.ActiveConnection = MM_ELEDATA_STRING RsHeadlines.Source = "SELECT * FROM Headlines WHERE archive =0 ORDER BY Headline_ID DESC" RsHeadlines.CursorType = 0 RsHeadlines.CursorLocation = 2 RsHeadlines.LockType = 3 RsHeadlines.Open() RsHeadlines_numRows = 0 %> <% Dim Repeat1__numRows Repeat1__numRows = 6 Dim Repeat1__index Repeat1__index = 0 RsHeadlines_numRows = RsHeadlines_numRows + Repeat1__numRows %> <% ' *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters ' create the list of parameters which should not be maintained MM_removeList = "&index=" If (MM_paramName <> "") Then MM_removeList = MM_removeList & "&" & MM_paramName & "=" MM_keepURL="":MM_keepForm="":MM_keepBoth="":MM_keepNone="" ' add the URL parameters to the MM_keepURL string For Each Item In Request.QueryString NextItem = "&" & Item & "=" If (InStr(1,MM_removeList,NextItem,1) = 0) Then MM_keepURL = MM_keepURL & NextItem & Server.URLencode(Request.QueryString(Item)) End If Next ' add the Form variables to the MM_keepForm string For Each Item In Request.Form NextItem = "&" & Item & "=" If (InStr(1,MM_removeList,NextItem,1) = 0) Then MM_keepForm = MM_keepForm & NextItem & Server.URLencode(Request.Form(Item)) End If Next ' create the Form + URL string and remove the intial '&' from each of the strings MM_keepBoth = MM_keepURL & MM_keepForm if (MM_keepBoth <> "") Then MM_keepBoth = Right(MM_keepBoth, Len(MM_keepBoth) - 1) if (MM_keepURL <> "") Then MM_keepURL = Right(MM_keepURL, Len(MM_keepURL) - 1) if (MM_keepForm <> "") Then MM_keepForm = Right(MM_keepForm, Len(MM_keepForm) - 1) ' a utility function used for adding additional parameters to these strings Function MM_joinChar(firstItem) If (firstItem <> "") Then MM_joinChar = "&" Else MM_joinChar = "" End If End Function %> :::::::: 3 Elephants :::::::: Elephant Shop ::::::
3Elephants Virtual Shop
*
* *

*
*
* *

wheel of lifeElephant Shop

Interactive Wheel of Life

The eight sections on the Wheel of Life show how in balance your life is.
A full circle represents total satisfaction with your life.
Click to View the demo version of 3elephants Virtual Office Wheel of Life
If you would like to purchase a customised version with your own text and website colours,

Please Contact: webmaster@3elephants.com

3elephants Recruitment Software Solutions
The Recruitment People JOB - .ASP Recruitment / Employment Manager Software
JOB - .ASP Recruitment/Employment Manager Software

Full source code .ASP (Active Server Pages) software features include flexible design & branding, multi-company listings, secure logins, the ability for candidates to upload CV and send applications for listed job offers and much more.


JOB .ASP Employment Software creates a flexible, dynamic, high functionality web site using the latest technology. Quickly and easily create a highly scalable digital business solution and enable a recruitment business to strengthen their competitive advantage. Software designed to the highest quality standards, ensuring that the professional nature of your business is reflected on the web. Flexible template based application, can be tailored to reflect both your branding and your individual priorities for the content of the site.

Features at a Glance
Web Site Features

  • Dynamic Homepage
  • Theme Changer
  • Quick Job Search
  • Apply Online
  • Dynamic News
  • Link Listing
Dynamic Homepage
Give a dynamic feel to your web site by presenting the very latest job vacancies, links and news on the homepage.

Theme Changer
Give a new dynamic feel to your web site by presenting your users the option to change the design and colours of your web site

Quick Job Search
Job seekers can quickly locate suitable job vacancies using the integrated job search.

Apply Online
Online application forms make it easy for job seekers to apply. Submitted applications are automatically sent to the advertiser.

Dynamic News
News is posted onto the web site using a fast and intuitive data-entry system. This gives you full control over your news, enabling you to add pictures and use a full word like editor, edit, delete and Archive news with the minimum of effort.

Link Listing
Links are posted onto the web site using a fast and intuitive data-entry system. This gives you full control over your advertised links, enabling you to add, edit and remove jobs with the minimum of effort.
Back-office Features

  • Secure Login
  • Job Posting
  • Edit Meta Tag & Generation
  • Admin Set Up
  • Edit Web Site Settings
  • *Advertiser Set Up and Job Posting
  • *Banner Administrator

Secure Login
Secure Login area ensures your advertisers and your content is well protected.

Job posting
Job adverts are posted onto the web site using a fast and intuitive data-entry system. This gives your advertisers and you full control over the adverts, enabling the administrator to add, edit and remove jobs with the minimum of effort.

Edit Meta Tag & Generation
Ensure top placement in a major search engines and get plenty of traffic, fully customised Meta Tags generated online.

Admin Set Up
Easily add your company administrators and advertisers via the easy data-entry system.

Edit Web Site Settings
Easy data-entry system for general web site settings.

Advertiser Set Up and Job Posting
Quickly add advertisers, view, edit or delete via data-entry system

Banner Administrator
Rotating Banner easy adds rotating banners to your web site with full administration includes individual banner hit counter.
Available Options & Prices
We offer a number of options to suite your business needs from full source code to a full custom design and installation.

Standard Edition
This version of the software is appropriate if a centralised department manages recruitment, all recruitment staff can access all jobs and applications within the back office system.
To Basket
£180

Multi-Company Edition - Plug In
Multi-Company plug in software is appropriate if the recruitment process is decentralised and requires multiple company listings, Advertisers only see their own when they log into the back office system.
To Basket
£25

Banner - Plug In
Rotating Banner Plug In Software easy adds rotating banners to your web site with full administration includes individual banner hit counter.
To Basket
£20

Developer Multiple Licence
Use JOB .ASP Recruitment Manager Software to create an unlimited number of recruitment web sites for your customers idea for the web design business.
To Basket
£799

Custom Design £550 Upwards
JOB .ASP Recruitment Manager Software custom tailored design and installation of the software. Using JOB We can create a highly scalable digital business solution that is easy to navigate, and enable your business to strengthen its competitive advantage. Including free world-class commercial grade supported MS Windows 2003 Internet hosting for 1 Year.
Please contact us for details
View Basket


Comming Soon @ 3Elephants Virtual Shop
Web templates, Wallpapers, Database Applications and Free downloads.
 
 


* * **
<% While ((Repeat1__numRows <> 0) AND (NOT RsHeadlines.EOF)) %>
" class="mainmenulinks"><%=(RsHeadlines.Fields.Item("Title").Value)%>
<% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 RsHeadlines.MoveNext() Wend %>

*
*
navigation
<% rsBanner.Close() %> <% RsHeadlines.Close() %>