<%@ Language=VBScript %>
<% option explicit %>
<% 
	Dim sTitle 
	sTitle = "Checkout"
%>
<!--#include file="_ScriptLibrary/adovbs.inc"-->
<!--#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/payment.jpg" border="0" WIDTH="240" HEIGHT="50">
			<font face=arial size=2 color=brown><b>Your Jobs Are Not Visible Until Payment Has Been Received</b></font>
		</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</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"><a href="schlist.asp?userid=<%=request("userid")%>"><font color="brown">Edit My Registration</font></a></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
Dim rsJobs
Dim rsCart
Dim sUserID, iCount
Dim sSQL
Dim iTotal

sUserID = trim(Request("userid"))

'check that neither fields are empty. if empty redirect to login screen
if sUserID = "" then Response.Redirect "login.asp?menu=school" 

Set objConn = server.CreateObject("ADODB.Connection")	'Connection object
Set rsCart = server.CreateObject("ADODB.Recordset") 	'Recordset object
Set rsJobs = server.CreateObject("ADODB.Recordset")	'Recordset object

'open the connection object
objConn.Open sConnect

'open the CART table
rsCart.Open "CART", objConn, 3, 3

'open the JOB table
rsJobs.Open "SELECT * FROM JOB", objConn, 3, 3

'Filter the recordset
rsCart.Filter = "user_id = '" & sUserID & "'"

If Not rsCart.EOF then rsCart.MoveFirst

iTotal = 0 'Set total to zero
Do While Not rsCart.EOF
	rsJobs.AddNew
	rsJobs("school_id") = rsCart("school_id")
	rsJobs("title") = rsCart("title")
	rsJobs("start_date") = rsCart("start_date")
	rsJobs("expertise")= rsCart("expertise")
	rsJobs("degree_req") = rsCart("degree_req")
	rsJobs("special_qual") = rsCart("special_qual")
	rsJobs("job_description") = rsCart("job_description")
	rsJobs("minsalary") = rsCart("minsalary")
	rsJobs("maxsalary") = rsCart("maxsalary")
	rsJobs("peryrhr") = rsCart("peryrhr")
	rsJobs("contact_name") = rsCart("contact_name")
	rsJobs("contact_areacode") = rsCart("contact_areacode")
	rsJobs("contact_phone") = rsCart("contact_phone")
	rsJobs("contact_email") = rsCart("contact_email")
	rsJobs("date_submitted")= Date()
	rsJobs("graceperiod")= rsCart("graceperiod")
	rsJobs("price") = rsCart("price")
	rsJobs("active")= 0
	rsJobs.Update
	
	iTotal = iTotal + rsCart("price")
	rsCart.MoveNext
Loop
	
	rsJobs.Close
	Set rsJobs = Nothing
		
	'Filter the recordset
	rsCart.Filter = "user_id = '" & sUserID & "'"
	
	if not rsCart.EOF then
		'Count items in Cart
		rsCart.MoveLast
		iCount = rsCart.RecordCount
	else
		iCount=0
	end if	
	
	if not rsCart.EOF then
		objConn.Execute "DELETE * FROM CART"
	end if
	
	
%>

<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft FrontPage 4.0">
<title><%=sTitle%></title>
<style type="text/css">
                A { font-family: verdana; color: #0033FF; font-size: 10pt; text-decoration: none; font-weight: bold}
                A:Hover {font-family: verdana; font-size: 10pt; font-style: bold; text-decoration: underline; color="#000000"}
                TD.title {font-family: trebuchet MS; font-size: 18pt; font-style: normal; color: #990000;font-weight: bold}
                TD {font-family: verdana; font-size: 14pt}
                .name {font-family: verdana; font-weight: bold; color: #FFFFFF;font-size: 14pt}
                .criteria {font-family: arial; font-size: 9pt}
                .qlinks {font-family: arial; font-size: 8pt}
        </style>
</HEAD>
<BODY>
<CENTER><FONT COLOR=red face=arial><H2>Please Print This Page</h2></font></CENTER>
<%
if not rsCart.EOF then
	Response.write "<center><b><font color=""blue"">Your total is " & "</font><font color=""green"">" & FormatCurrency(iTotal) & "</font><p>"
	Response.write "<font color=""blue"">Thank you." & "</font></b></center><p>"
else
	Response.Write "<center>Your Cart is empty.<p><a href=""default.asp"">Home</a></center>"
end if

rsCart.Close
Set rsCart = Nothing

if iTotal <> 0 then
	sSQL = "INSERT INTO TRANSACTION (user_id, amount) VALUES ('" & sUserID & "', " & iTotal & ");"
	objConn.Execute (sSQL)
end if

objConn.Close
Set objConn = Nothing
%>

		<H2><center><FONT face=arial COLOR=black>You have 3 payment options</FONT></center></H2>
		<p></p>

<div align="left">
	<table width="600" cellspacing="0" cellpadding="0" border="0" bgcolor="#FFFFFF">
	<tr>
		<PRE>			<IMG align=bottom height=21 src="images/pingreen.jpg" width="21"
  				NATURALSIZEFLAG="3"><B><FONT COLOR="#a52a2a"> Send a check</FONT></b></pre>
		<BLOCKQUOTE>
	<b><pre>
	               Our address is:
  
                       School Jobs
                       EPICENTER, Inc.
                       4200 Sheridan Street
                       Hyattsville, MD 20782</B>
			</PRE>
		</BLOCKQUOTE>
			<PRE>
			<IMG align=bottom height=21 src="images/pingreen.jpg" width="21"
  	NATURALSIZEFLAG="3"><B><FONT COLOR="#a52a2a"> Send an approved purchase order</FONT></B></PRE>
			<blockquote><pre><B>
	               You can send us your approved 
	               purchase order by postal mail
	               or by FAX. 

	               Our FAX number is 301-864-5617 
			</B></PRE>
			</blockquote>
			<PRE>
			<IMG align=bottom height=21 src="images/pingreen.jpg" width="21"
  	NATURALSIZEFLAG="3"><B><FONT COLOR="#a52a2a"> By credit card transaction</FONT></B></PRE>
		<BLOCKQUOTE><PRE><B>
	              Secure on-line credit card transactions are coming soon.  

	              If you wish to pay by credit card now, please send 
	              an email with the name of your school to 
	              <font color=blue><a href=mailto:[email protected]?subject=Creditcard_Transaction>[email protected]</a></font>
	              and include the following information:
	<font color=green>
	              Credit Card Type (Master Charge, VISA, or American Express)
	              Card Number
	              Expiration Date
	              Name on Card</font>

	              We'll process it during our normal evening maintenance,  
	              activate your job(s), and destroy the email.
  			</B></PRE>
		</BLOCKQUOTE>
		<PRE><CENTER><A href="default.asp">Back to Home</A></CENTER></PRE>
		<PRE></PRE>
	</tr>
	</table>
</div>
<!--#include file=bottom.asp-->
<!--#include file=footer.asp-->
</body>
</html>