% Dim fso, MyFile, FileName, TextLine Set fso = CreateObject("Scripting.FileSystemObject") FileName = Server.MapPath("App_data/opening_careers_date.txt") Set MyFile = fso.OpenTextFile(FileName, 1) TextLine = MyFile.ReadAll() MyFile.close appdate = split(TextLine,"-") dim d1,d2 d1 = CDate(appdate(0)) d2 = CDate(appdate(1)) If not (d1<= now and now =< d2) then Response.Redirect("careers.asp") End If %>
| العربية | Home Page | Feedback | Site map | Careers | Mail Login | |||||
|
|||||
|
|
Opening Vacancies Job Title : GL Accountant Closing Date: 31/3/2010 Department: Finance & Credit Department
Job Title : Credit Analyst-Commercial Credit Closing Date: 31/3/2010 Department: Credit Department
|
||||
|
|||||
|
|||||
|
Loan
Calculator | Feedback
| Email
this page | Print
this page | External
Publication | Useful
links ------------------------------------------------------------------------------------------ |
|||||
| All contents © copyright 2005 Oman Development Bank(SAOC). All rights reserved. |
|||||