[Resolvido] inserir valor do listmenu no banco

como faço pra pegar o valor do listmenu (os valores veem de uma tabela do bd) e inserí-lo em uma outra tabela? to fazendo de um jeito aki, mas parece q tá errado... alguém pode me ajudar?

obrigado

código pra mostrar os valores do listmenu buscando os dados do banco:

<div class="LabelText">Localidade</div><select name="location" class="inputText" id="location" >
 <%
 Set rs = Server.CreateObject ("ADODB.RecordSet")
 sql="CALL sp_001_select_eta_location('%')"
 set rs=db.execute(sql)
 Do While not rs.eof
 %>
 <option value="<%=rs.fields(0)%>"><%=rs.fields(1)%></option>
 <% rs.MoveNext
 loop %>
 </select><br>

código da inserção

Dim name_employee,location,hours,option_leader,cantrestwith

name_employee=request.form("name_employee")
CALL Validator(name_employee,"name_employee")
location = request.form("location")
hours = request.form("hours")
option_leader = request.form("option_leader")
cantrestwith = request.form("cantrestwith")

sql="CALL sp_001_create_eta_employee('"&name_employee&"','"&location&"','"&hours&"','"&option_leader&"','"&cantrestwith&"')"
db.execute(sql)
db.close

 msg="Dados Cadastrados com sucesso. clique <a href='creat_employee.asp'> aqui </a> para cadastrar novos dados."
 CALL Mymsg(msg,0)
	response.end()