Fra dropDown til checkbox

Jeg har fundet et lille login system og en bruger kan så tilmeldes sig. Når brugeren gør dette skal der udfyldes nogle felter, der så sendes til en access database.

Der er så en dropdown funktion hvor der kan vælges fra hvilken stat personen kommer fra. Dette kan jeg ikke bruge til noget og vil så lave feltet om til et interesse felt, så brugeren kan vælge ud fra interesser ved at afkryse nogle checkboxe.

Desse interesser vil jeg så bruge til en mailling liste, så jeg kan sende de informationer som brugeren ønsker.

Feltet i databasen er et tekst felt og er 15 langt.

Det jeg nu vil er at erstatte den dropdown og indsætte 15-20 checkboxe med interesser og så sende til databasen. Et af de problemer der er at den nu skal gemme flere navne og kunne skelle dem ad.

Er der nogle der har en løsning på dette?


<tr>
          <td width="20%">State*</td>
          <td width="80%"><select name="state" size="1">
          <option value="Alabama"<%If new_state = "Alabama" Then Response.Write(" selected") End If%>>Alabama</option>
          <option value="Alaska"<%If new_state = "Alaska" Then Response.Write(" selected") End If%>>Alaska</option>
          <option value="Arizona"<%If new_state = "Arizona" Then Response.Write(" selected") End If%>>Arizona</option>
          <option value="Arkansas"<%If new_state = "Arkansas" Then Response.Write(" selected") End If%>>Arkansas</option>
          <option value="California"<%If new_state = "California" Then Response.Write(" selected") End If%>>California</option>
          <option value="Colorado"<%If new_state = "Colorado" Then Response.Write(" selected") End If%>>Colorado</option>
          <option value="Connecticut"<%If new_state = "Connecticut" Then Response.Write(" selected") End If%>>Connecticut</option>
          <option value="Delaware"<%If new_state = "Delaware" Then Response.Write(" selected") End If%>>Delaware</option>
          <option value="Florida"<%If new_state = "Florida" Then Response.Write(" selected") End If%>>Florida</option>
          <option value="Georgia"<%If new_state = "Georgia" Then Response.Write(" selected") End If%>>Georgia</option>
          <option value="Hawaii"<%If new_state = "Hawaii" Then Response.Write(" selected") End If%>>Hawaii</option>
          <option value="Idaho"<%If new_state = "Idaho" Then Response.Write(" selected") End If%>>Idaho</option>
          <option value="Illinois"<%If new_state = "Illinois" Then Response.Write(" selected") End If%>>Illinois</option>
          <option value="Indiana"<%If new_state = "Indiana" Then Response.Write(" selected") End If%>>Indiana</option>
          <option value="Iowa"<%If new_state = "Iowa" Then Response.Write(" selected") End If%>>Iowa</option>
          <option value="Kansas"<%If new_state = "Kansas" Then Response.Write(" selected") End If%>>Kansas</option>
          <option value="Kentucky"  <%If new_state = "Kentucky" Then Response.Write(" selected") End If%>>Kentucky</option>
          <option value="Louisiana"  <%If new_state = "Louisiana" Then Response.Write(" selected") End If%>>Louisiana</option>
          <option value="Maine"<%If new_state = "Maine" Then Response.Write(" selected") End If%>>Maine</option>
          <option value="Maryland"<%If new_state = "Maryland" Then Response.Write(" selected") End If%>>Maryland</option>
          <option value="Massachusetts"<%If new_state = "Massachusetts" Then Response.Write(" selected") End If%>>Massachusetts</option>
          <option value="Michigan"<%If new_state = "Michigan" Then Response.Write(" selected") End If%>>Michigan</option>
          <option value="Minnesota"<%If new_state = "Minnesota" Then Response.Write(" selected") End If%>>Minnesota</option>
          <option value="Mississippi"<%If new_state = "Mississippi" Then Response.Write(" selected") End If%>>Mississippi</option>
          <option value="Missouri"<%If new_state = "Missouri" Then Response.Write(" selected") End If%>>Missouri</option>
          <option value="Montana"<%If new_state = "Montana" Then Response.Write(" selected") End If%>>Montana</option>
          <option value="Nebraska"<%If new_state = "Nebraska" Then Response.Write(" selected") End If%>>Nebraska</option>
          <option value="Nevada"<%If new_state = "Nevada" Then Response.Write(" selected") End If%>>Nevada</option>
          <option value="New Hampshire"<%If new_state = "New Hampshire" Then Response.Write(" selected") End If%>>New Hampshire</option>
          <option value="New Jersey"<%If new_state = "New Jersey" Then Response.Write(" selected") End If%>>New Jersey</option>
          <option value="New Mexico"<%If new_state = "New Mexico" Then Response.Write(" selected") End If%>>New Mexico</option>
          <option value="New York"<%If new_state = "New York" Then Response.Write(" selected") End If%>>New York</option>
          <option value="North Carolina"<%If new_state = "North Carolina" Then Response.Write(" selected") End If%>>North Carolina</option>
          <option value="North Dakota"<%If new_state = "North Dakota" Then Response.Write(" selected") End If%>>North Dakota</option>
          <option value="Ohio"<%If new_state = "Ohio" Then Response.Write(" selected") End If%>>Ohio</option>
          <option value="Oklahoma"  <%If new_state = "Oklahoma" Then Response.Write(" selected") End If%>>Oklahoma</option>
          <option value="Oregon"<%If new_state = "Oregon" Then Response.Write(" selected") End If%>>Oregon</option>
          <option value="Pennsylvania"<%If new_state = "Pennsylvania" Then Response.Write(" selected") End If%>>Pennsylvania</option>
          <option value="Rhode Island"<%If new_state = "Rhode Island" Then Response.Write(" selected") End If%>>Rhode Island</option>
          <option value="South Carolina"<%If new_state = "South Carolina" Then Response.Write(" selected") End If%>>South Carolina</option>
          <option value="South Dakota"<%If new_state = "South Dakota" Then Response.Write(" selected") End If%>>South Dakota</option>
          <option value="Tennessee"<%If new_state = "Tennessee" Then Response.Write(" selected") End If%>>Tennessee</option>
          <option value="Texas"<%If new_state = "Texas" Then Response.Write(" selected") End If%>>Texas</option>
          <option value="Utah"<%If new_state = "Utah" Then Response.Write(" selected") End If%>>Utah</option>
          <option value="Vermont"<%If new_state = "Vermont" Then Response.Write(" selected") End If%>>Vermont</option>
          <option value="Virginia"<%If new_state = "Virginia" Then Response.Write(" selected") End If%>>Virginia</option>
          <option value="Washington"<%If new_state = "Washington" Then Response.Write(" selected") End If%>>Washington</option>
          <option value="West Virginia"<%If new_state = "West Virginia" Then Response.Write(" selected") End If%>>West Virginia</option>
          <option value="Wisconsin"<%If new_state = "Wisconsin" Then Response.Write(" selected") End If%>>Wisconsin</option>
          <option value="Wyoming"<%If new_state = "Wyoming" Then Response.Write(" selected") End If%>>Wyoming</option>
          </select></td>
        </tr>