Validating 'checked' checkboxes

Forums

My Profile

Inbox

Address Book

My Subscription

My Forums

Validating 'checked' checkboxes

Logged in as: Guest

arrSession:exec spGetSession 2,3,37979

	Active Users: There are 0 members and 0 guests.
	Users viewing this topic: none

Printable Version

All Forums >> [Scripting] >> ASP >> Validating 'checked' checkboxes
Do you like VisualBasicScript.com? Link to us and help spread the word about our forum. Thanks!

Page: [1]

Message

<< Older Topic Newer Topic >>

Validating 'checked' checkboxes - 9/21/2006 10:23:53 AM

Lil Turtle

Posts: 11
Score: 0
Joined: 8/22/2006
Status: offline

I've been beating my head against the wall for the better part of two days trying to get this script to do what I want it to.

I have a list of dynamically created check boxes

<% Dim ItemName Dim FeatureID Dim Enabled Dim test Dim SQL Dim RS SQL = "SELECT FeatureID, ItemName, Enabled, " & _ "(SELECT COUNT (*) " & _ "FROM CR_RoomToAmenity WHERE CR_RoomToAmenity.FeatureID = CR_Amenity.FeatureID " & _ "AND CR_RoomToAmenity.RoomID = " & RoomID & ") as test " & _ "FROM CR_Amenity " & _ "WHERE Enabled = 1" Set RS = DataConn.Execute(SQL) Dim i i = 0 Do While Not RS.EOF FeatureID = RS("FeatureID").Value ItemName = RS("ItemName").Value Enabled = RS("Enabled").Value test = RS("test").Value If test > 0 Then 'Checks to see if item is already enabled in the DB %> <input type="checkbox" name="chkFeatureID<%=cstr(i)%>" id="chkFeatureID<%=cstr(i)%>" value="<%= FeatureID %>" checked><%= ItemName %><br> <% Else %> <input type="checkbox" name="chkFeatureID<%=cstr(i)%>" id="chkFeatureID<%=cstr(i)%>" value="<%= FeatureID %>"><%= ItemName %><br> <% End IF i = i + 1 RS.Movenext loop i = i - 1 %> <input type=hidden name="inc" value="<%=i%>">

The real problem comes when I try to check which of the boxes are checked to update the DB.

dim inc If len(request("inc")) > 0 Then inc = cint(request("inc")) End If for i = 0 to inc Dim IsChecked IsChecked = False for each obj in request.form 'I believe that this needs to be the value of the checkbox, but don't know how to retrieve it if left(request(obj),12) = "chkFeatureID" Then If obj.checked Then IsChecked = True If IsChecked = True Then SQL2 = "Exec CR_spUpdateRoomToAmenity " & Request("RoomID") & ", " & LocID & ", " & Request("FeatureID") ExecQuery(SQL2) End If End IF End If Next next

I got some of the above code off the net(Thanks Google), but as I'm still trying to get the hang of programming with vbscript I'm lost. I pretty sure that I'm missing some small detail and I would appreciate any help with the script itself or a link to help me learn it myself. I feel like I'm stuck on stupid.

Thanks in advance for the help.

_____________________________

Football Fanatic - Go Seahawks!!

Lil Turtle

Post #: 1

RE: Validating 'checked' checkboxes - 9/21/2006 11:42:52 AM

Skie

Posts: 58
Score: 0
Joined: 3/2/2006
Status: offline

I'm not familiar with SQL, but this should point you in the right direction for checking the status of the checkboxes. This will go through each <input> tag check to see if the checkboxes are checked.

(in reply to Lil Turtle)