<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open Application("database1_ConnectionString")
Set RS = Conn.Execute ("EXEC pr_web_shift_combo_ret_proc")
%>
<%Response.Write(RTRIM(cname))&" Long Term Availability"%>
Enter
your availability for the day of the week below, then hit
the Submit button...