|
Server : Apache/2.4.62 System : FreeBSD fbsdweb2.web.rcn.net 14.1-RELEASE FreeBSD 14.1-RELEASE releng/14.1-n267679-10e31f0946d8 GENERIC amd64 User : www ( 80) PHP Version : 8.3.8 Disable Function : NONE Directory : /domains/highlandlabs/cqi-bin/ALFA_DATA/alfasymlink/root/domains/howardbender2/jobstest/ |
Upload File : |
<%@ Language=VBScript %>
<% option explicit %>
<%
Dim sTitle
sTitle = "Edit School Information"
%>
<%
Dim sUserID
if Request("userid") = "" then
Response.Redirect "default.asp"
else
sUserID = Request("userid")
end if
%>
<!--#include file=DataStore.asp-->
<!--#include file=header.asp-->
<!--#include file=top.asp-->
<div align="center">
<table width="600" cellspacing="0" cellpadding="0" border="0" bgcolor="#FFFFFF">
<tr>
<td width="240" valign="top">
<img src="images/editmyinfo.jpg" border="0" WIDTH="240" HEIGHT="50">
</td>
<td width="180" valign="top">
<table width="100%" cellspacing="0" cellpadding="0" border="0">
<tr>
<td bgcolor="#003399">
<table bgcolor="#003399" width="100%" cellspacing="2" cellpadding="2" border="0">
<tr bgcolor="#003399"><td bgcolor="lightgreen" align="center"><a href="research.asp?userid=<%=request("userid")%>"><font color="brown">Search Resumes</font></a></td></tr>
<tr><td bgcolor="lightgreen" align="center"><a href="schlist.asp?userid=<%=request("userid")%>"><font color="brown">Post New Jobs</font></a></td></tr>
<tr><td bgcolor="lightgreen" align="center"><a href="listjobs.asp?userid=<%=request("userid")%>"><font color="brown">List My Jobs</font></a></td></tr>
<tr><td bgcolor="lightgreen" align="center"><b>Edit My Registration</b></td></tr>
</table>
</td>
</tr>
</table>
</td>
<td width="180" valign="top">
<table width="100%" cellspacing="0" cellpadding="0" border="0">
<tr>
<td bgcolor="#003399">
<table bgcolor="#003399" width="100%" cellspacing="2" cellpadding="2" border="0">
<tr><td bgcolor="#6699FF" align="center"><a href="default.asp">Job Search</a></td></tr>
<tr><td bgcolor="#6699FF" align="center"><a href="login.asp?menu=teacher">My Resume</a></td></tr>
<tr><td bgcolor="#6699FF" align="center"><a href="login.asp?menu=school">For Schools</a></td></tr>
<tr><td bgcolor="#6699FF" align="center"><a href="faqs.asp">FAQs</a></td></tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</div>
<%
Dim objConn 'Connection Object
Dim objRs 'Recordset Object
'create the connection object
Set objConn = Server.CreateObject("ADODB.Connection")
'and open it
if objConn.State = 0 then 'only open if the connection is closed
objConn.Open sConnect
end if
'Create the recordset object
Set objRs = Server.CreateObject("ADODB.Recordset")
'and open the SCHOOL table
objRs.Open "SCHOOL", objConn, 3, 3
'Filter the recordset
objRs.Filter = "manager_id = '" & sUserID & "' AND schoolid=" & Request("schoolid")
'and verify if information has already been saved with this email
if objRs.EOF then
response.write "user not found in database"
else
Response.Write ""
%>
<script language="JavaScript">
<!--
function VerifyData()
{
var msgError="";
// Check for empty field - Name
if (document.frmRegister.txtName.value == "")
{
msgError = msgError + "\n*Name is a required field."
}
// Check for empty field - Address1
if (document.frmRegister.txtAddress1.value == "")
{
msgError = msgError + "\n*Address is a required field."
}
// Check for empty field - City
if (document.frmRegister.txtCity.value == "")
{
msgError = msgError + "\n*City is a required field."
}
// Check for empty field - State
if (document.frmRegister.cboState.value == "")
{
msgError = msgError + "\n*State is a required field."
}
// Check for empty field - Zip Code
if (document.frmRegister.txtZipCode.value == "")
{
msgError = msgError + "\n*Zip Code is a required field."
}
// Check for empty field - Contact Name
if (document.frmRegister.txtContactName.value == "")
{
msgError = msgError + "\n*Contact Name is a required field."
}
// Check for empty field - Contact Email
if (document.frmRegister.txtContactAreaCode.value == "")
{
msgError = msgError + "\n*Area Code is a required field."
}
// Check for empty field - Contact Phone
if (document.frmRegister.txtContactPhone.value == "")
{
msgError = msgError + "\n*Phone is a required field."
}
// Check for empty field - Contact Email
if (document.frmRegister.txtContactEmail.value == "")
{
msgError = msgError + "\n*Email is a required field."
}
//
if (msgError != "")
{
alert("Please fill in all required fields...\n" + msgError)
return false;
}
else
{
return true;
}
}
//-->
</script>
<div align="center">
<table width="600" border="0">
<tr>
<td>
<!-- Address information -->
<br><p align="center"><font color="red"><font size="4" color="red">*</font><font size=2 color=red face=arial><b>Required Information</b></font><br>
<form name="frmRegister" action="regsch.asp?userid=<%=sUserID%>&schoolid=<%=objRs("schoolid")%>" method="post" onSubmit="return VerifyData()">
<table width="100%" border="0" cellspacing="0" cellpadding="5">
<tr>
<td><font size="5" color="red"><b>*</b></font></td>
<td><b>Name:</b></td>
<td><input name="txtName" id="txtName" size="30" type="text" value="<%=objRs("name")%>"></td>
</tr>
<tr>
<td><font size="5" color="red"><b>*</b></font></td>
<td><b>Address:</b></td>
<td><input name="txtAddress1" id="txtAddress1" size="30" type="text" value="<%=objRs("address1")%>"></td>
</tr>
<tr>
<td> </td>
<td> </td>
<td><input name="txtAddress2" id="txtAddress2" size="30" type="text" value="<%=objRs("address2")%>"></td>
</tr>
<tr>
<td><font size="5" color="red"><b>*</b></font></td>
<td><b>City:</b></td>
<td><input name="txtCity" id="txtCity" size="30" type="text" value="<%=objRs("city")%>"></td>
</tr>
<tr>
<td><font size="5" color="red"><b>*</b></font></td>
<td><b>State:</b></td>
<td>
<select name="cboState" id="cboState" size="1">
<OPTION VALUE=1 <%if objRs("state")=1 then Response.Write "SELECTED" else Response.Write ""%>>Alabama</OPTION>
<OPTION VALUE=2 <%if objRs("state")=2 then Response.Write "SELECTED" else Response.Write ""%>>Alaska</OPTION>
<OPTION VALUE=3 <%if objRs("state")=3 then Response.Write "SELECTED" else Response.Write ""%>>Arizona</OPTION>
<OPTION VALUE=4 <%if objRs("state")=4 then Response.Write "SELECTED" else Response.Write ""%>>Arkansas</OPTION>
<OPTION VALUE=5 <%if objRs("state")=5 then Response.Write "SELECTED" else Response.Write ""%>>California</OPTION>
<OPTION VALUE=6 <%if objRs("state")=6 then Response.Write "SELECTED" else Response.Write ""%>>Colorado</OPTION>
<OPTION VALUE=7 <%if objRs("state")=7 then Response.Write "SELECTED" else Response.Write ""%>>Connecticut</OPTION>
<OPTION VALUE=8 <%if objRs("state")=8 then Response.Write "SELECTED" else Response.Write ""%>>Delaware</OPTION>
<OPTION VALUE=9 <%if objRs("state")=9 then Response.Write "SELECTED" else Response.Write ""%>>District of Columbia</OPTION>
<OPTION VALUE=10 <%if objRs("state")=10 then Response.Write "SELECTED" else Response.Write ""%>>Florida</OPTION>
<OPTION VALUE=11 <%if objRs("state")=11 then Response.Write "SELECTED" else Response.Write ""%>>Georgia</OPTION>
<OPTION VALUE=12 <%if objRs("state")=12 then Response.Write "SELECTED" else Response.Write ""%>>Hawaii</OPTION>
<OPTION VALUE=13 <%if objRs("state")=13 then Response.Write "SELECTED" else Response.Write ""%>>Idaho</OPTION>
<OPTION VALUE=14 <%if objRs("state")=14 then Response.Write "SELECTED" else Response.Write ""%>>Illinois</OPTION>
<OPTION VALUE=15 <%if objRs("state")=15 then Response.Write "SELECTED" else Response.Write ""%>>Indiana</OPTION>
<OPTION VALUE=16 <%if objRs("state")=16 then Response.Write "SELECTED" else Response.Write ""%>>Iowa</OPTION>
<OPTION VALUE=17 <%if objRs("state")=17 then Response.Write "SELECTED" else Response.Write ""%>>Kansas</OPTION>
<OPTION VALUE=18 <%if objRs("state")=18 then Response.Write "SELECTED" else Response.Write ""%>>Kentucky</OPTION>
<OPTION VALUE=19 <%if objRs("state")=19 then Response.Write "SELECTED" else Response.Write ""%>>Louisiana</OPTION>
<OPTION VALUE=20 <%if objRs("state")=20 then Response.Write "SELECTED" else Response.Write ""%>>Maine</OPTION>
<OPTION VALUE=21 <%if objRs("state")=21 then Response.Write "SELECTED" else Response.Write ""%>>Maryland</OPTION>
<OPTION VALUE=22 <%if objRs("state")=22 then Response.Write "SELECTED" else Response.Write ""%>>Massachusetts</OPTION>
<OPTION VALUE=23 <%if objRs("state")=23 then Response.Write "SELECTED" else Response.Write ""%>>Michigan</OPTION>
<OPTION VALUE=24 <%if objRs("state")=24 then Response.Write "SELECTED" else Response.Write ""%>>Minnesota</OPTION>
<OPTION VALUE=25 <%if objRs("state")=25 then Response.Write "SELECTED" else Response.Write ""%>>Mississippi</OPTION>
<OPTION VALUE=26 <%if objRs("state")=26 then Response.Write "SELECTED" else Response.Write ""%>>Missouri</OPTION>
<OPTION VALUE=27 <%if objRs("state")=27 then Response.Write "SELECTED" else Response.Write ""%>>Montana</OPTION>
<OPTION VALUE=28 <%if objRs("state")=28 then Response.Write "SELECTED" else Response.Write ""%>>Nebraska</OPTION>
<OPTION VALUE=29 <%if objRs("state")=29 then Response.Write "SELECTED" else Response.Write ""%>>Nevada</OPTION>
<OPTION VALUE=30 <%if objRs("state")=30 then Response.Write "SELECTED" else Response.Write ""%>>New Hampshire</OPTION>
<OPTION VALUE=31 <%if objRs("state")=31 then Response.Write "SELECTED" else Response.Write ""%>>New Jersey</OPTION>
<OPTION VALUE=32 <%if objRs("state")=32 then Response.Write "SELECTED" else Response.Write ""%>>New Mexico</OPTION>
<OPTION VALUE=33 <%if objRs("state")=33 then Response.Write "SELECTED" else Response.Write ""%>>New York</OPTION>
<OPTION VALUE=34 <%if objRs("state")=34 then Response.Write "SELECTED" else Response.Write ""%>>North Carolina</OPTION>
<OPTION VALUE=35 <%if objRs("state")=35 then Response.Write "SELECTED" else Response.Write ""%>>North Dakota</OPTION>
<OPTION VALUE=36 <%if objRs("state")=36 then Response.Write "SELECTED" else Response.Write ""%>>Ohio</OPTION>
<OPTION VALUE=37 <%if objRs("state")=37 then Response.Write "SELECTED" else Response.Write ""%>>Oklahoma</OPTION>
<OPTION VALUE=38 <%if objRs("state")=38 then Response.Write "SELECTED" else Response.Write ""%>>Oregon</OPTION>
<OPTION VALUE=39 <%if objRs("state")=39 then Response.Write "SELECTED" else Response.Write ""%>>Pennsylvania</OPTION>
<OPTION VALUE=40 <%if objRs("state")=40 then Response.Write "SELECTED" else Response.Write ""%>>Rhode Island</OPTION>
<OPTION VALUE=41 <%if objRs("state")=41 then Response.Write "SELECTED" else Response.Write ""%>>South Carolina</OPTION>
<OPTION VALUE=42 <%if objRs("state")=42 then Response.Write "SELECTED" else Response.Write ""%>>South Dakota</OPTION>
<OPTION VALUE=43 <%if objRs("state")=43 then Response.Write "SELECTED" else Response.Write ""%>>Tennessee</OPTION>
<OPTION VALUE=44 <%if objRs("state")=44 then Response.Write "SELECTED" else Response.Write ""%>>Texas</OPTION>
<OPTION VALUE=45 <%if objRs("state")=45 then Response.Write "SELECTED" else Response.Write ""%>>Utah</OPTION>
<OPTION VALUE=46 <%if objRs("state")=46 then Response.Write "SELECTED" else Response.Write ""%>>Vermont</OPTION>
<OPTION VALUE=47 <%if objRs("state")=47 then Response.Write "SELECTED" else Response.Write ""%>>Virginia</OPTION>
<OPTION VALUE=48 <%if objRs("state")=48 then Response.Write "SELECTED" else Response.Write ""%>>Washington</OPTION>
<OPTION VALUE=49 <%if objRs("state")=49 then Response.Write "SELECTED" else Response.Write ""%>>West Virginia</OPTION>
<OPTION VALUE=50 <%if objRs("state")=50 then Response.Write "SELECTED" else Response.Write ""%>>Wisconsin</OPTION>
<OPTION VALUE=51 <%if objRs("state")=51 then Response.Write "SELECTED" else Response.Write ""%>>Wyoming</OPTION>
<OPTION>----------------------------</OPTION>
<OPTION VALUE=52 <%if objRs("state")=52 then Response.Write "SELECTED" else Response.Write ""%>>Alberta, Canada</OPTION>
<OPTION VALUE=53 <%if objRs("state")=53 then Response.Write "SELECTED" else Response.Write ""%>>British Columbia, Canada</OPTION>
<OPTION VALUE=54 <%if objRs("state")=54 then Response.Write "SELECTED" else Response.Write ""%>>Manitoba, Canada</OPTION>
<OPTION VALUE=55 <%if objRs("state")=55 then Response.Write "SELECTED" else Response.Write ""%>>New Brunswick, Canada</OPTION>
<OPTION VALUE=56 <%if objRs("state")=56 then Response.Write "SELECTED" else Response.Write ""%>>Newfoundland, Canada</OPTION>
<OPTION VALUE=57 <%if objRs("state")=57 then Response.Write "SELECTED" else Response.Write ""%>>Northwest Territory, Canada</OPTION>
<OPTION VALUE=58 <%if objRs("state")=58 then Response.Write "SELECTED" else Response.Write ""%>>Nova Scotia, Canada</OPTION>
<OPTION VALUE=59 <%if objRs("state")=59 then Response.Write "SELECTED" else Response.Write ""%>>Ontario, Canada</OPTION>
<OPTION VALUE=60 <%if objRs("state")=60 then Response.Write "SELECTED" else Response.Write ""%>>Prince Edward Island, Canada</OPTION>
<OPTION VALUE=61 <%if objRs("state")=61 then Response.Write "SELECTED" else Response.Write ""%>>Quebec, Canada</OPTION>
<OPTION VALUE=62 <%if objRs("state")=62 then Response.Write "SELECTED" else Response.Write ""%>>Saskatchewan, Canada</OPTION>
<OPTION VALUE=63 <%if objRs("state")=63 then Response.Write "SELECTED" else Response.Write ""%>>Yukon Territory, Canada</OPTION>
<OPTION>----------------------------</OPTION>
<OPTION VALUE=64 <%if objRs("state")=64 then Response.Write "SELECTED" else Response.Write ""%>>Caribbean Islands</OPTION>
<OPTION>----------------------------</OPTION>
<OPTION VALUE=65 <%if objRs("state")=65 then Response.Write "SELECTED" else Response.Write ""%>>Marianas Islands</OPTION>
<OPTION VALUE=66 <%if objRs("state")=66 then Response.Write "SELECTED" else Response.Write ""%>>Guam</OPTION>
</select>
</td>
</tr>
<tr>
<td><font size="5" color="red"><b>*</b></font></td>
<td><b>Zip Code:</b></td>
<td><input name="txtZipCode" id="txtZipCode" size="15" type="text" value="<%=objRs("zip")%>"></td>
</tr>
<!-- Contact information -->
<tr>
<td> </td>
<td><b>Web Site:</b></td>
<td><input name="txtWebSite" id="txtWebSite" size="30" type="text" value="<%=objRs("website")%>"></td>
</tr>
<tr>
<td><font size="5" color="red"><b>*</b></font></td>
<td><b>Contact Name:</b></td>
<td><input name="txtContactName" id="txtContactName" type="text" size="30" value="<%=objRs("contact_name")%>"></td>
</tr>
<tr>
<td><font size="5" color="red"><b>*</b></font></td>
<td><b>Contact Email:</b></td>
<td><input name="txtContactEmail" id="txtContactEmail" type="text" size="30" value="<%=objRs("contact_email")%>"></td>
</tr>
<tr>
<td><font size="5" color="red"><b>*</b></font></td>
<td><b>Contact Phone:</b></td>
<td><input name="txtContactAreaCode" id="txtContactAreaCode" type="text" size="3" maxlength="3" value="<%=objRs("contact_areacode")%>"><input name="txtContactPhone" id="txtContactPhone" type="text" size="10" value="<%=objRs("contact_phone")%>"></td>
</tr>
<tr>
<td> </td>
<td> </td>
<td> </td>
</tr>
<tr>
<td> </td>
<td> </td>
<td><input type="submit" value="Save Information" id="UpdateSchool" name="UpdateSchool"></td>
</tr>
</table>
</form>
</td>
</tr>
</table>
</div>
<%
end if
%>
<!--#include file=footer.asp-->