Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

razs

var nao devolve valor em sql

Recommended Posts

Alguem percebe porque é que isto funcionava a 1 mes atras e agora nao da?

 

 

codigo que cria o sql

        a = Split("Local Como Quando Porque Outros duracao Qual Proteccao repouso outros_local_lesao electrica amputacao Cabeça Térmicos Contusão Olhos Incendio Entorse Coluna Queda Fractura Tórax Partículas Queimadura Abdomen corrosivas Perfuração1 Colisão Asfixia Distenção Intoxicação Ferida Membro_Superior Atropelamento Luxação Mão Soterramento Esmagamento Membro_Inferior Esmagamento_causa Politraumatismo Pé Perfuração Dedos Entaladela Corpo Lesões Escorregamento Inflamação Corte Choque esforços percurso"," ")
	Set item = Nothing
                					
	colunas=""
	valores=""
        For Each item In a											
        colunas1 = TirarAcento(item)&", "	
	valores1 = "'""&"&TirarAcento(item)&"&""', "	
        colunas = colunas&colunas1
	valores = valores&valores1
						
	 next
						

	avanca="g545tf3rt2d4e"
	Do while avanca="g545tf3rt2d4e"
	idenc = "AC_TRAB_"&idedit_reg&gen_pass(intGEN7)
	set check_id = conn.Execute("select id from acidentes_trabalho where id='"&idenc&"' ")
						
	if not check_id.eof then
	       avanca="g545tf3rt2d4e"
	else

	colunas = colunas & "id_inserido_por,data_registo,data_consulta,num_acident,id_utente,reg_enf, id"  
	valores = valores&" '"&session("user_id")&"', '"&now&"', '"&data&"', '"&check_num_act(idedit_user)&"', '"&idedit_user&"', '"&idedit_reg&"', '"&iod_act&"' "
								 
	regact = "insert into acidentes_trabalho("&colunas&") values ("&valores&")"
	'set regact = conn.Execute(regact)	

	response.write regact
									
	set regact = nothing
									
	erro=""
						
	'response.Write("<script>alert('Registo concluido com sucesso!');location.href='regenf.asp?idedit_reg="&id_ficha&"&id_unic="&get_dados_utente.fields("cod_unico")&"&ok=true'</script>")
							
	avanca="segue"
	end if
							
	set check_id = nothing
	Loop	

Response.write do sql

 

insert into acidentes_trabalho(Local, Como, Quando, Porque, Outros, duracao, Qual, Proteccao, repouso, outros_local_lesao, electrica, amputacao, Cabeca, Termicos, Contusao, Olhos, Incendio, Entorse, Coluna, Queda, Fractura, Torax, Particulas, Queimadura, Abdomen, corrosivas, Perfuracao1, Colisao, Asfixia, Distencao, Intoxicacao, Ferida, Membro_Superior, Atropelamento, Luxacao, Mao, Soterramento, Esmagamento, Membro_Inferior, Esmagamento_causa, Politraumatismo, Pe, Perfuracao, Dedos, Entaladela, Corpo, Lesoes, Escorregamento, Inflamacao, Corte, Choque, esforcos, percurso, id_inserido_por,data_registo,data_consulta,num_acident,id_utente,reg_enf, id) values ('"&Local&"', '"&Como&"', '"&Quando&"', '"&Porque&"', '"&Outros&"', '"&duracao&"', '"&Qual&"', '"&Proteccao&"', '"&repouso&"', '"&outros_local_lesao&"', '"&electrica&"', '"&utacao&"', '"&Cabeca&"', '"&Termicos&"', '"&Contusao&"', '"&Olhos&"', '"&Incendio&"', '"&Entorse&"', '"&Coluna&"', '"&Queda&"', '"&Fractura&"', '"&Torax&"', '"&Particulas&"', '"&Queimadura&"', '"&Abdomen&"', '"&corrosivas&"', '"&Perfuracao1&"', '"&Colisao&"', '"&Asfixia&"', '"&Distencao&"', '"&Intoxicacao&"', '"&Ferida&"', '"&Membro_Superior&"', '"&Atropelamento&"', '"&Luxacao&"', '"&Mao&"', '"&Soterramento&"', '"&Esmagamento&"', '"&Membro_Inferior&"', '"&Esmagamento_causa&"', '"&Politraumatismo&"', '"&Pe&"', '"&Perfuracao&"', '"&Dedos&"', '"&Entaladela&"', '"&Corpo&"', '"&Lesoes&"', '"&Escorregamento&"', '"&Inflamacao&"', '"&Corte&"', '"&Choque&"', '"&esforcos&"', '"&percurso&"', '5', '18/09/2015 18:23:08', '2015-9-18 17:41:2', '1', 'D1_3062668', 'RE_D_0258071', '' )

 

 

Obrigado

Compartilhar este post


Link para o post
Compartilhar em outros sites

ele retorna algum erro ?

 

especifique todos os campos e variáveis tipo, assim:

 

SQLinsert=”INSERT INTO login(login,senha,email) values(‘”&varlogin&”‘,’”&varsenha&”‘,’”&varemail&”‘)”

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.