[Resolvido] inserir valor do listmenu no banco

[rafaelbh 2]

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()

[DSerma 19]

Aparentemente está correto...

 

De um Response.Write no seucomando SQL e veja oq está sendo jogado na variavel que pega o valor do Select...

 

Abraços..

[rafaelbh 2]

ond devo colocar esse comando?

[DSerma 19]

Troque db.execute(sql) por Response.Write(sql)

 

Abraços...

[rafaelbh 2]

ok, vou tentar.. obrigado!

[rafaelbh 2]

na verdade, fica dando esse erro:

 

"Microsoft OLE DB Provider for ODBC Drivers erro '80040e0c'

 

O comando de texto não foi definido para o objeto de comando.

 

C:\MAPS\APPLICATIONS\WWW\ETA\../_includes/_functions_data_grid.asp, line 11 "

 

aí eu pensei q poderia ser pq eu estaria fazendo a inserção errada.

[DSerma 19]

Esse erro afirma que o comando SQL a ser executado está errado.. ou não existe....

 

Como está essa função "CALL sp_001_create_eta_employee" ?

 

Abraços..

[rafaelbh 2]

está assim:

DELIMITER $$

DROP PROCEDURE IF EXISTS `etadb`.`sp_001_create_eta_employee` $$
CREATE DEFINER=`root`@`localhost` PROCEDURE `sp_001_create_eta_employee`(in param1 char(255),in param2 char(255),in param3 char(255),in param4 char(255), in param5 char(255))
BEGIN
	insert into eta_employee(name_employee,location,hours,option_leader,cantrestwith)
	values (param1,param2,param3,param4,param5);
END $$

DELIMITER;

[rafaelbh 2]

consegui resolver.. era um problema com os parametros.

obrigado pela ajuda!

abraços