I have a static drop down box on a page. I have another an asp page that collects the data. It manages to collect all the combo boxes, but i am having problems trying to retrieve the drop down box selections. Ive tried nearly every way on forums but it still doesn't seem to recognise that there is a drop down box there. Below is the asp code:
<%@ Language=VBScript %>
<%
Dim splChecks
Dim intChecks, i
Dim int
Dim Cath_type, Insertion_site, Skin_prep, PP_eqip, Hand_hy, Aseptic_tec, Dressing, SDoS, Doc, data_source, con, sql_insert
Dim Ward, Month, Year, Week
Month = Request.Form("Month")
Response.Write(Month)
splChecks = Split(request.form("cb0"), ",")
intChecks = UBound(splChecks)
Cath_type = ((intChecks + 1) * 10)
splChecks = Split(request.form("cb1"), ",")
intChecks = UBound(splChecks)
Insertion_site = ((intChecks + 1) * 10)
splChecks = Split(request.form("cb2"), ",")
intChecks = UBound(splChecks)
Skin_prep = ((intChecks + 1) * 10)
splChecks = Split(request.form("cb3"), ",")
intChecks = UBound(splChecks)
PP_eqip = ((intChecks + 1) * 10)
splChecks = Split(request.form("cb4"), ",")
intChecks = UBound(splChecks)
Hand_hy = ((intChecks + 1) * 10)
splChecks = Split(request.form("cb5"), ",")
intChecks = UBound(splChecks)
Aseptic_tec = ((intChecks + 1) * 10)
splChecks = Split(request.form("cb6"), ",")
intChecks = UBound(splChecks)
Dressing = ((intChecks + 1) * 10)
splChecks = Split(request.form("cb7"), ",")
intChecks = UBound(splChecks)
SDoS = ((intChecks + 1) * 10)
splChecks = Split(request.form("cb8"), ",")
intChecks = UBound(splChecks)
Doc = ((intChecks + 1) * 10)
data_source = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & _
Server.MapPath("infection.mdb")
sql_insert = "INSERT INTO tbl1a_IC (Month, Cath_type, Insertion_site, Skin_prep, PP_eqip, Hand_hy, Aseptic_tec, Dressing, SDoS, Doc) values ('" & Month & "', '" & _
Cath_type & "', '" & Insertion_site & "', '" & Skin_prep & "', '" & PP_eqip & "', '" & Hand_hy & "', '" & Aseptic_tec & "', '" & Dressing & "', '" & SDoS & "', '" & Doc & "')"
' Creating Connection Object and opening the database
Set con = Server.CreateObject("ADODB.Connection")
con.Open data_source
con.Execute sql_insert
' Done. Close the connection
con.Close
Set con = Nothing
Response.Write "All selections were successfully entered"
%>
And the drop down box is just simple html:
<font color="#336699" size="2"> <select size="1" name="Month" tabindex="2">
<option>-Please Select Month-</option>
<option value=0>January</option>
<option value=1>February</option>
<option value=2>March</option>
<option value=3>April</option>
<option value=4>May</option>
<option value=5>June</option>
<option value=6>July</option>
<option value=7>August</option>
<option value=8>September</option>
<option value=9>October</option>
<option value=10>November</option>
<option value=11>December</option>
</select></font></td>
I wonder if anyone could explain whats happening to me.