<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Dim rsapplicant Dim rsapplicant_numRows Set rsapplicant = Server.CreateObject("ADODB.Recordset") rsapplicant.ActiveConnection = MM_konek_STRING rsapplicant.Source = "SELECT emailad, password, lastname, firstname, Birthdate, religion, address, contactno, status, gender, educlevel, yeargrad, skills FROM tbapplicant" rsapplicant.CursorType = 0 rsapplicant.CursorLocation = 2 rsapplicant.LockType = 1 rsapplicant.Open() rsapplicant_numRows = 0 %> <% ' *** Validate request to log in to this site. MM_LoginAction = Request.ServerVariables("URL") If Request.QueryString<>"" Then MM_LoginAction = MM_LoginAction + "?" + Request.QueryString MM_valUsername=CStr(Request.Form("emailad")) If MM_valUsername <> "" Then MM_fldUserAuthorization="" MM_redirectLoginSuccess="user.asp" MM_redirectLoginFailed="index.asp" MM_flag="ADODB.Recordset" set MM_rsUser = Server.CreateObject(MM_flag) MM_rsUser.ActiveConnection = MM_konek_STRING MM_rsUser.Source = "SELECT emailad, password" If MM_fldUserAuthorization <> "" Then MM_rsUser.Source = MM_rsUser.Source & "," & MM_fldUserAuthorization MM_rsUser.Source = MM_rsUser.Source & " FROM tbapplicant WHERE emailad='" & Replace(MM_valUsername,"'","''") &"' AND password='" & Replace(Request.Form("password"),"'","''") & "'" MM_rsUser.CursorType = 0 MM_rsUser.CursorLocation = 2 MM_rsUser.LockType = 3 MM_rsUser.Open If Not MM_rsUser.EOF Or Not MM_rsUser.BOF Then ' username and password match - this is a valid user Session("MM_Username") = MM_valUsername If (MM_fldUserAuthorization <> "") Then Session("MM_UserAuthorization") = CStr(MM_rsUser.Fields.Item(MM_fldUserAuthorization).Value) Else Session("MM_UserAuthorization") = "" End If if CStr(Request.QueryString("accessdenied")) <> "" And false Then MM_redirectLoginSuccess = Request.QueryString("accessdenied") End If MM_rsUser.Close Response.Redirect(MM_redirectLoginSuccess) End If MM_rsUser.Close Response.Redirect(MM_redirectLoginFailed) End If %> MIRABEL SERVICES CORPORATION
register now.. company information. web developer information.
 
Password:
 
Today is

Company's Mission

To build a good business partnership with our clients by helping them find competitive and reliable employees.
To help our Employees improve their special skills by giving them hands-on training and teaching them to develop it.
Offer a well-compensated job and refer exceptional workers for regularization.
Help our workers attain financial soundness.

Company's Vision

To let God expand our territory as an agency which is built by Trust and honesty so we may provide a competent and solid means of support both to our Clients and workers in the guest of Stability and life enhancement.

Message from the General Manager

The Mirabel Services Corporation is an established institution and a competitive company engaging in manpower services, this corporate entity has been known for quality of service and for years we are contributing to society a reliable source of employment.

We do our part by practicing competency as an employer and we aptly comply with the government applicable laws. We are updated with all labor standards benefits ..read more
USER LOG-IN
E-mail:
Password:
 
new user? >>register here
>apply to your prefered job instantly
>notify about job through e-mail
>secured and trusted
THE COMPANY PROFILE  

The Mirabel Services Corporation is an established institution and a competitive company engaging in manpower services, this corporate entity has been known for quality of service and for years we are contributing to society a reliable source of employment.

We do our part by practicing competency as an employer and we aptly comply with the government applicable laws. We are updated with all labor standards benefits and remittances in accordance with the existing labor laws, rules and regulations for and in respect to the working masses.>>read more
For comments, suggestion and recommendation email us at [email protected]
Mirabel Services Corporation©2007. All rights reserved
Hosted by www.Geocities.ws

<% rsapplicant.Close() Set rsapplicant = Nothing %> 1