<%@ Language=VBScript %> Kuwait Culture - Employees Only

Site Search


Employees Only
Academic System
Administration System
Web Mail
Office Calendar
new website  

Employees Only

The multicultural and professional staff of the Cultural Office works with colleges and universities to guide and assist Kuwaiti students attending U.S. and Canadian colleges and universities. The staff maintains contact with students and universities through office visits, Email, telephone and this interactive Website. It is the primary goal of the staff to make the educational and personal experiences of their students positive, safe and successful.

Check Restricted Info
<% If Request.Form("internalInfoBtn") = "Enter" Then Dim idInput Dim pwdInput Dim sqlQuery Dim recordSet Dim checkedPWD idInput = "" pwdInput = "" sqlQuery = "" checkedPWD = "" idInput = Request.Form("employeeID") pwdInput = Request.Form("employeePWD") If(len(idInput)=0 or len(pwdInput)=0 ) Then Response.Write("
Please enter your user ID and Password.
" ) Else sqlQuery = "SELECT user_name, user_pass FROM tbluser " &_ "WHERE user_name ='" & idInput & "'" If(checkPWD(sqlQuery, recordSet)) Then checkedPWD = recordSet(1, 0) If (pwdInput = checkedPWD) Then Response.Write(" Check Memo (10/13/2004)
" ) Response.Write(" Employee Manual
" ) Else Response.Write("you are not allowed to enter.
Please check your ID and Password.
" ) End If Else Response.Write("Please check your user ID and Password and try again.
" ) End If End If End If %>





   2006 Kuwait Cultural Office. All Rights Reserved