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