Ir para conteúdo
Fórum Script Brasil

panox

Membros
  • Total de itens

    101
  • Registro em

  • Última visita

Tudo que panox postou

  1. aham ¬¬ bonita cagada minha não acha ? eu acabei entrando no esquema da minha segunda opção, pensei q iria valer como um numero dependendo do numero de hiddens com esse nome, entendeu minha logica. (.Count). agora eu vou arrumar o contador <%i = i + 1 e depois encerra o loop dai coloca o hidden abaixo %> <input name="contador" id="contador" type="hidden" value="<%=i - 1%>"> <%. só uma coisinha, eu deveria colocar este contador na funçao que gera a minha tabela certo ? mas ela sendo JS, não daria um conflito ? function Insere(){ var x=document.getElementById('tabela').insertRow(1) var qt=x.insertCell(0) var uni=x.insertCell(0) var desc=x.insertCell(0) var bar=x.insertCell(0) var ape=x.insertCell(0) qt.innerHTML='<input type="text" name="qtd" value="'+document.getElementById("qtd2").value+'"> <input type="text" id="zero" value="0" name="zero"> <input type="text" name="cod_proj" value="'+document.getElementById("cod_gestor33").value+'"> ' + document.getElementById("qtd2").value; uni.innerHTML='<input type="text" name="ccum" value="'+document.getElementById("cum").value+'"> <input type="text" id="um" value="1" name="um"> <input type="text" name="cdescri" value="'+document.getElementById("cdesc").value+'">' + document.getElementById("cum").value; desc.innerHTML='<input type="text" name="cfil" value="'+document.getElementById("cod_gestor2").value+'"> <input type="text" id="usr" name="usr" value="<%=Request.form("coder")%>"> <input type="text" name="obser" value="'+document.getElementById("obs").value+'">' + document.getElementById("cdesc").value; bar.innerHTML='<input type="text" name="codbarra" value="'+document.getElementById("cbarra").value+'"> <input type="text" name="gencod" value="GEN_ID(GEN_REQ_REQUISICAO_ID,1)">' + document.getElementById("cbarra").value; ape.innerHTML='<input type="text" name="codprodu" value="'+document.getElementById("codpro").value+'"> <input type="text" name="centrocusto" value="'+document.getElementById("sl2").value+'">' + document.getElementById("codpro").value; }
  2. por aqui tudo bem e ai Rafael ? sim, tinha sido só nessa mesmo... eu mudei o nome dos hiddens para "zero" e "um", e mudei no codigo do insert tambem <!--#include file="conexao.asp"--> <% call abre_conexao Set R6 = server.createobject("ADODB.RecordSet") contador = request.form("cdescri") for x = 1 to contador cod_proj = request.form("cod_proj "&x&"") cdescri = request.form("cdescri "&x&"") ccum = request.form("ccum "&x&"") obser = request.form("obser "&x&"") ccusto2 = request.form("ccusto2 "&x&"") cfil = request.form("cfil "&x&"") zero = request.form("zero "&x&"") qtd = request.form("qtd "&x&"") um = request.form("um "&x&"") codprodu = request.form("codprodu "&x&"") usr = request.form("usr "&x&"") Conexao.Execute "Insert Into REQ_REQUISICAO ( COD_USUARIO, COD_PRODUTO, TIPO_REQUISICAO, QTDE_SOLICITADA, QTDE_ATENDIDA, PRIORIDADE, STATUS, COD_FILIAL, COD_CCUSTO, OBSERVACAO, COD_PROPRIETARIO, UMEDIDA, DESCRICAO, COD_TECNOLOGIA_GESTOR) values ( " & usr & ", " & codprodu & ", " & um & ", " & qtd & ", " & zero & ", " & um & ", " & zero & ", " & cfil & ", " & ccusto2 & ", '" & obser & "', " & cfil & ", '" & ccum & "', '" & cdescri & "', " & cod_proj & ")" next call fecha_conexao set r6 = nothing %> <script languange = "javascript"> alert("Requisição Concluida com Sucesso !"); </script> mas agora estou tendo esse erro : O que significa isso ?
  3. Hmm...então você deveria ser preso certo ? =D
  4. contador = request.form("cdescri") for x = 1 to contador cod_proj = request.form("cod_proj "&x&" ") cdescri = request.form("cdescri "&x&" ") ccum = request.form("ccum "&x&" ") obser = request.form("obser "&x&" ") ccusto2 = request.form("ccusto2 "&x&" ") cfil = request.form("cfil "&x&" ") 0 = request.form("0 "&x&" ") qtd = request.form("qtd "&x&" ") 1 = request.form("1 "&x&" ") codprodu = request.form("codprodu "&x&" ") usr = request.form("usr "&x&" ") Conexao.Execute "Insert Into REQ_REQUISICAO ( COD_USUARIO, COD_PRODUTO, TIPO_REQUISICAO, QTDE_SOLICITADA, QTDE_ATENDIDA, PRIORIDADE, STATUS, COD_FILIAL, COD_CCUSTO, OBSERVACAO, COD_PROPRIETARIO, UMEDIDA, DESCRICAO, COD_TECNOLOGIA_GESTOR) values ( " & usr & ", " & codprodu & ", " & 1 & ", " & qtd & ", " & 0 & ", " & 1 & ", " & 0 & ", " & cfil & ", " & Request.form("ccusto2") & ", '" & obser & "', " & cfil & ", '" & ccum & "', '" & cdescri & "', " & cod_proj & ")" next desse jeito ?? @EDIT : ganhei esse erro *-* Tipo de erro: Erro de compilação do Microsoft VBScript (0x800A0400) Instrução esperada /lider/reqins.asp, line 81 0 = request.form("0 "&x&" ")
  5. bom, troquei os generators por triggers e não resolver meu problema, com ambos os codigos, ubound ou for to request.form inserem registros simples, mas se for 2 ou mais registros ele aponta o erro Microsoft OLE DB Provider for ODBC Drivers (0x80004005) [ODBC Firebird Driver][Firebird]Dynamic SQL Error SQL error code = -104 Token unknown - line 1, column 261 , /lider/reqins.asp, line 49 e insere apenas o ultimo item que você digitou. 1ª Opção : For i = 1 To Request.Form("cod_proj").Count Response.write request.form("cod_proj")(i)&"<BR>" & request.form("codprodu")(i)&"<BR>" & request.form("qtd")(i)&"<BR>" & request.form("ccum")(i)&"<BR>" & request.form("usr")(i)&"<BR>" & request.form("cfil")(i)&"<BR>" & request.form("ccusto2")(i)&"<BR>" & request.form("1")(i)&"<BR>" & request.form("0")(i)&"<BR>" & request.form("obser")(i)&"<BR>" & request.form("cdescri")(i)&"<BR>" & request.form("gencod")(i)&"<BR>" & request.form("gennum")(i)&"<BR>" next 2ª opção : COD_USUARIO = request.form("usr") COD_PRODUTO = request.form("codprodu") TIPO_REQUISICAO = request.form("1") QTDE_SOLICITADA = request.form("qtd") QTDE_ATENDIDA = request.form("0") PRIORIDADE = request.form("1") STATUS = request.form("0") COD_FILIAL = request.form("cfil") COD_CCUSTO = request.form("ccusto2") OBSERVACAO = request.form("obser") COD_PROPRIETARIO = request.form("cfil") UMEDIDA = request.form("ccum") DESCRICAO = request.form("cdescri") COD_TECNOLOGIA_GESTOR = request.form("cod_proj") COD_USUARIO = split(COD_USUARIO,",") COD_PRODUTO = split(COD_PRODUTO,",") TIPO_REQUISICAO = split(TIPO_REQUISICAO,",") QTDE_SOLICITADA = split(QTDE_SOLICITADA,",") QTDE_ATENDIDA = split(QTDE_ATENDIDA,",") PRIORIDADE = split(PRIORIDADE,",") STATUS = split(STATUS,",") COD_FILIAL = split(COD_FILIAL,",") COD_CCUSTO = split(COD_CCUSTO,",") OBSERVACAO = split(OBSERVACAO,",") COD_PROPRIETARIO = split(COD_PROPRIETARIO,",") UMEDIDA = split(UMEDIDA,",") DESCRICAO = split(DESCRICAO,",") COD_TECNOLOGIA_GESTOR = split(COD_TECNOLOGIA_GESTOR,",") max = ubound(COD_PRODUTO) for i = 0 to max Conexao.Execute "Insert Into REQ_REQUISICAO ( COD_USUARIO, COD_PRODUTO, TIPO_REQUISICAO, QTDE_SOLICITADA, QTDE_ATENDIDA, PRIORIDADE, STATUS, COD_FILIAL, COD_CCUSTO, OBSERVACAO, COD_PROPRIETARIO, UMEDIDA, DESCRICAO, COD_TECNOLOGIA_GESTOR) values ( " & trim(COD_USUARIO(i)) & ", " & trim(COD_PRODUTO(i)) & ", " & trim(TIPO_REQUISICAO(i)) & ", " & trim(QTDE_SOLICITADA(i)) & ", " & trim(QTDE_ATENDIDA(i)) & ", " & trim(PRIORIDADE(i)) & ", " & trim(STATUS(i)) & ", " & trim(COD_FILIAL(i)) & ", " & trim(COD_CCUSTO(i)) & ", '" & trim(OBSERVACAO(i)) & "', " & trim(COD_PROPRIETARIO(i)) & ", '" & trim(UMEDIDA(i)) & "', '" & trim(DESCRICAO(i)) & "', " & trim(COD_TECNOLOGIA_GESTOR(i)) & ")" next alguém sabe o que estou fazendo de errado aqui ? =X Abraçoos
  6. ah, para deixar avisado tambem, se souberem desse outro tipo de sintaxe, eu to tentando desse jeito tambem e recebendo o mesmo erro Tipo de erro: Microsoft OLE DB Provider for ODBC Drivers (0x80004005) [ODBC Firebird Driver][Firebird]Dynamic SQL Error SQL error code = -104 Token unknown - line 1, column 275 , /lider/reqins.asp, line 66 For i = 1 To Request.Form("cod_proj").Count Conexao.Execute "Insert Into REQ_REQUISICAO ( CODIGO, COD_USUARIO, COD_PRODUTO, TIPO_REQUISICAO, QTDE_SOLICITADA, QTDE_ATENDIDA, PRIORIDADE, STATUS, COD_FILIAL, COD_CCUSTO, OBSERVACAO, COD_PROPRIETARIO, UMEDIDA, DESCRICAO, COD_TECNOLOGIA_GESTOR) values ( " & Request.Form("gennum")(i) & ", " & Request.Form("usr")(i) & ", " & Request.form("codprodu")(i) & ", " & Request.form("1")(i) & ", " & Request.form("qtd")(i) & ", " & Request.form("0")(i) & ", " & Request.form("1")(i) & ", " & Request.form("0")(i) & ", " & Request.form("cfil")(i) & ", " & Request.form("ccusto2")(i) & ", '" & Request.form("obser")(i) & "', " & Request.Form("cfil")(i) & ", '" & Request.form("ccum")(i) & "', '" & Request.form("cdescri")(i) & "', " & Request.form("cod_proj")(i) & ")" Next eu achei em um post daqui mesmo a respeito de for each e, bem, não custa tentar não é ?
  7. Fala rafael, tudo bom ? então, eu tava vendo aqui e consegui monta um codigo com ubound que ficou assim : <!--#include file="conexao.asp"--> <% call abre_conexao Set R6 = server.createobject("ADODB.RecordSet") CODIGO = request.form("gencod") NUM_REQUISICAO = request.form("gemnum") COD_USUARIO = request.form("usr") COD_PRODUTO = request.form("codprodu") TIPO_REQUISICAO = request.form("1") QTDE_SOLICITADA = request.form("qtd") QTDE_ATENDIDA = request.form("0") PRIORIDADE = request.form("1") STATUS = request.form("0") COD_FILIAL = request.form("cfil") COD_CCUSTO = request.form("ccusto2") OBSERVACAO = request.form("obser") COD_PROPRIETARIO = request.form("cfil") UMEDIDA = request.form("ccum") DESCRICAO = request.form("cdescri") COD_TECNOLOGIA_GESTOR = request.form("cod_proj") CODIGO = split(CODIGO,",") NUM_REQUISICAO = split(NUM_REQUISICAO,",") COD_USUARIO = split(COD_USUARIO,",") COD_PRODUTO = split(COD_PRODUTO,",") TIPO_REQUISICAO = split(TIPO_REQUISICAO,",") QTDE_SOLICITADA = split(QTDE_SOLICITADA,",") QTDE_ATENDIDA = split(QTDE_ATENDIDA,",") PRIORIDADE = split(PRIORIDADE,",") STATUS = split(STATUS,",") COD_FILIAL = split(COD_FILIAL,",") COD_CCUSTO = split(COD_CCUSTO,",") OBSERVACAO = split(OBSERVACAO,",") COD_PROPRIETARIO = split(COD_PROPRIETARIO,",") UMEDIDA = split(UMEDIDA,",") DESCRICAO = split(DESCRICAO,",") COD_TECNOLOGIA_GESTOR = split(COD_TECNOLOGIA_GESTOR,",") max = ubound(CODIGO) for i = 0 to max Conexao.Execute "Insert Into REQ_REQUISICAO ( CODIGO, NUM_REQUISICAO, COD_USUARIO, COD_PRODUTO, TIPO_REQUISICAO, QTDE_SOLICITADA, QTDE_ATENDIDA, PRIORIDADE, STATUS, COD_FILIAL, COD_CCUSTO, OBSERVACAO, COD_PROPRIETARIO, UMEDIDA, DESCRICAO, COD_TECNOLOGIA_GESTOR) values ( " & trim(CODIGO(i)) & ", " & trim(NUM_REQUISICAO(i)) & ", " & trim(COD_USUARIO(i)) & ", " & trim(COD_PRODUTO(i)) & ", " & trim(TIPO_REQUISICAO(i)) & ", " & trim(QTDE_SOLICITADA(i)) & ", " & trim(QTDE_ATENDIDA(i)) & ", " & trim(PRIORIDADE(i)) & ", " & trim(STATUS(i)) & ", " & trim(COD_FILIAL(i)) & ", " & trim(COD_CCUSTO(i)) & ", '" & trim(OBSERVACAO(i)) & "', " & trim(COD_PROPRIETARIO(i)) & ", '" & trim(UMEDIDA(i)) & "', '" & trim(DESCRICAO(i)) & "', " & trim(COD_TECNOLOGIA_GESTOR(i)) & ")" 'Conexao.Execute "Insert Into REQ_REQUISICAO ( CODIGO, NUM_REQUISICAO, COD_USUARIO, COD_PRODUTO, TIPO_REQUISICAO, QTDE_SOLICITADA, QTDE_ATENDIDA, PRIORIDADE, STATUS, COD_FILIAL, COD_CCUSTO, OBSERVACAO, COD_PROPRIETARIO, UMEDIDA, DESCRICAO, COD_TECNOLOGIA_GESTOR) values ( " & trim(CODIGO(i)) & ", " & trim(NUM_REQUISICAO(i)) & ", " & trim(COD_USUARIO(i)) & ", " & trim(COD_PRODUTO(i)) & ", " & trim(TIPO_REQUISICAO(i)) & ", " & trim(QTDE_SOLICITADA(i)) & ", " & trim(QTDE_ATENDIDA(i)) & ", " & trim(PRIORIDADE(i)) & ", " & trim(STATUS(i)) & ", " & trim(COD_FILIAL(i)) & ", " & trim(COD_CCUSTO(i)) & ", '" & trim(OBSERVACAO(i)) & "', " & trim(COD_PROPRIETARIO(i)) & ", '" & trim(UMEDIDA(i)) & "', '" & trim(DESCRICAO(i)) & "', " & trim(COD_TECNOLOGIA_GESTOR(i)) & ")" next call fecha_conexao set r6 = nothing %> <script languange = "javascript"> alert("Requisição Concluida com Sucesso !"); </script> e todas esses request's são hiddens geradas em cada linha da minha tabela aqui, SEM O CONTADOR. function Insere(){ var x=document.getElementById('tabela').insertRow(1) var qt=x.insertCell(0) var uni=x.insertCell(0) var desc=x.insertCell(0) var bar=x.insertCell(0) var ape=x.insertCell(0) qt.innerHTML='<input type="hidden" name="qtd" value="'+document.getElementById("qtd2").value+'"> <input type="hidden" id="0" value="0" name="0"> <input type="hidden" name="cod_proj" value="'+document.getElementById("cod_gestor33").value+'"> ' + document.getElementById("qtd2").value; uni.innerHTML='<input type="hidden" name="ccum" value="'+document.getElementById("cum").value+'"> <input type="hidden" id="1" value="1" name="1"> <input type="hidden" name="cdescri" value="'+document.getElementById("cdesc").value+'">' + document.getElementById("cum").value; desc.innerHTML='<input type="hidden" name="cfil" value="'+document.getElementById("cod_gestor2").value+'"> <input type="hidden" id="usr" name="usr" value="<%=Request.form("coder")%>"> <input type="hidden" name="obser" value="'+document.getElementById("obs").value+'">' + document.getElementById("cdesc").value; bar.innerHTML='<input type="hidden" name="codbarra" value="'+document.getElementById("cbarra").value+'"> <input type="hidden" name="gencod" value="GEN_ID(GEN_REQ_REQUISICAO_ID,1)">' + document.getElementById("cbarra").value; ape.innerHTML='<input type="hidden" name="codprodu" value="'+document.getElementById("codpro").value+'"> <input type="hidden" id="ccusto2" name="ccusto2"> <input type="hidden" name="gennum" value="GEN_ID(GEN_REQ_REQUISICAO,1)">' + document.getElementById("codpro").value; } Eu estou recebendo o erro : eu ACHO que pode ser por causa destes generatos que são gerados nos hiddens, mas não sei como gera-los na pagina inicial...não sei se são eles, apenas deduzo
  8. Bom, aqui estou eu dinovo, mas dessa vez meu problema não é mais com o JS ( Obrigado Pela dica rafael spilki ) então acho que deve ficar um pouco mais facil para voces analisarem o codigo Vamos la, eu estou gerando uma tabela dinamicamente em JS E, em cada InsertCell que eu crio, eu crio uma hidden com o mesmo valor que sera mostrado para o usuario, e farei o request form desta hidden... var i = 1; function Insere(){ var x=document.getElementById('tabela').insertRow(1) var qt=x.insertCell(0) var uni=x.insertCell(0) var desc=x.insertCell(0) var bar=x.insertCell(0) var ape=x.insertCell(0) qt.innerHTML='<input type="hidden" name="qtd('+i+')" value="'+document.getElementById("qtd2").value+'"> <input type="hidden" name="cod_proj('+i+')" value="'+document.getElementById("cod_gestor33").value+'"> ' + document.getElementById("qtd2").value; uni.innerHTML='<input type="hidden" name="ccum('+i+')" value="'+document.getElementById("cum").value+'"> <input type="hidden" name="cdescri('+i+')" value="'+document.getElementById("cdesc").value+'">' + document.getElementById("cum").value; desc.innerHTML='<input type="hidden" name="cfil('+i+')" value="'+document.getElementById("cod_gestor2").value+'"> <input type="hidden" name="obser('+i+')" value="'+document.getElementById("obs").value+'">' + document.getElementById("cdesc").value; bar.innerHTML='<input type="hidden" name="codbarra('+i+')" value="'+document.getElementById("cbarra").value+'">' + document.getElementById("cbarra").value; ape.innerHTML='<input type="hidden" name="codprodu('+i+')" value="'+document.getElementById("codpro").value+'">' + document.getElementById("codpro").value; } function cont(){ i +=1; } e utilizo alguns hiddens que são fixos para todos os Inserts, por tanto nem me preocupei em coloca-los aqui. Na pagina que faz a inserção dos dados, eu consegui inserir para apenas 1 item criado na tabela, no caso, sem esse contador nos hiddens ('+i+'), apenas eles normais.... utilizando este codigo Conexao.Execute "Insert Into REQ_REQUISICAO ( CODIGO, NUM_REQUISICAO, COD_USUARIO, COD_PRODUTO, TIPO_REQUISICAO, QTDE_SOLICITADA, QTDE_ATENDIDA, PRIORIDADE, STATUS, COD_FILIAL, COD_CCUSTO, OBSERVACAO, COD_PROPRIETARIO, UMEDIDA, DESCRICAO, COD_TECNOLOGIA_GESTOR) values (GEN_ID(GEN_REQ_REQUISICAO,1), GEN_ID(GEN_REQ_REQUISICAO,1), " & Request.Form("usr") & ", " & Request.form("codprodu") & ", " & Request.form("1") & ", " & Request.form("qtd") & ", " & Request.form("0") & ", " & Request.form("1") & ", " & Request.form("0") & ", " & Request.form("cfil") & ", " & Request.form("ccusto2") & ", '" & Request.form("obser") & "', " & Request.Form("cfil") & ", '" & Request.form("ccum") & "', '" & Request.form("cdescri") & "', " & Request.form("cod_proj") & ")" Agora eu estou tentando fazer com que ele faça a inserção dos items por linha mas não estou conseguindo... tentei usar este codigo mas não funcionou For Each i in Request.Form Conexao.Execute "Insert Into REQ_REQUISICAO ( CODIGO, NUM_REQUISICAO, COD_USUARIO, COD_PRODUTO, TIPO_REQUISICAO, QTDE_SOLICITADA, QTDE_ATENDIDA, PRIORIDADE, STATUS, COD_FILIAL, COD_CCUSTO, OBSERVACAO, COD_PROPRIETARIO, UMEDIDA, DESCRICAO, COD_TECNOLOGIA_GESTOR) values (GEN_ID(GEN_REQ_REQUISICAO,1), GEN_ID(GEN_REQ_REQUISICAO,1), " & Request.Form("usr") & ", " & Request.form("codprodu(i)") & ", " & Request.form("1") & ", " & Request.form("qtd(i)") & ", " & Request.form("0") & ", " & Request.form("1") & ", " & Request.form("0") & ", " & Request.form("cfil(i)") & ", " & Request.form("ccusto2(i)") & ", '" & Request.form("obser(i)") & "', " & Request.Form("cfil(i)") & ", '" & Request.form("ccum(i)") & "', '" & Request.form("cdescri(i)") & "', " & Request.form("cod_proj(i)") & ")" next Sera que alguém teria uma ideia de como resolver isso ? Obrigado desde já ! []'s
  9. Eu fiz uma função para limpar os campos de um formulario meu no onclick, mas ele só limpa de um dos forms, os outros continuam la, eu não sei se é pelo fato de estes outros 3 text fields que quero deletar são mostrados apenas em uma div, mas são criados em outra pagina.. essa é a minha função : function resf(){ document.form1.reset(); document.barraf.cbarra.value = ""; document.descf.cdesc.value = ""; document.umf.cum.value = ""; } Ele só consegue deletar os objs do form1... alguém sabe o q posso fazer para deletar todos ? Obrigado
  10. Ola, eu tenho uma funçao aqui que, ao disparar o OnClick, ele cria uma tabela dinamica com os dados digitados em algumas text fields e com um hidden em cada "td" com o mesmo valor que é mostrado na tabela : Segue Função : function Insere(){ var x=document.getElementById('tabela').insertRow(1) var qt=x.insertCell(0) var uni=x.insertCell(0) var desc=x.insertCell(0) var bar=x.insertCell(0) var ape=x.insertCell(0) qt.innerHTML='<input type="hidden" name="e" value="'+document.getElementById("qtd").value+'">' + document.getElementById("qtd").value; uni.innerHTML='<input type="hidden" name="d" value="'+document.getElementById("cum").value+'">' + document.getElementById("cum").value; desc.innerHTML='<input type="hidden" name="c" value="'+document.getElementById("cdesc").value+'">' + document.getElementById("cdesc").value; bar.innerHTML='<input type="hidden" name="b" value="'+document.getElementById("cbarra").value+'">' + document.getElementById("cbarra").value; ape.innerHTML='<input type="hidden" name="a" value="'+document.getElementById("codpro").value+'">' + document.getElementById("codpro").value; } Agora eu preciso dar um request.form em ASP em todos os dados dessa tabela mas, como eu chapei um name para cada hidden, se tiver 2 linhas ou mais, os items são mostrados separados por virgula e não pode ser assim pois eu terei que fazer um Insert Into contendo essas informaçoes ordenadamente. então eu teria que fazer um laço para a cada linha que for inserida, ele criar o hidden com um valor numerico (e, e1, e2 e assim por diante) Esse é um problema... o outro problema é que não é um numero fixo, ele pode ser tanto 1 quanto 5000 linhas, alguém saberia como fazer este array ? Muito Obrigado
  11. Ola, eu estou tentando passar um dado para uma hidden no campo login mas, não sei porque...ele me aparece em forma de Select... estou usando o seguinte codigo funçao ajax (ajas.js) : var xmlHttp function Mandacod(str) { xmlHttp=GetXmlHttpObject() if (xmlHttp==null) { alert ("Este browser não suporta HTTP Request") return } var url="cusr.asp" // o arquivo que ira executar a SQL dos centros de custo url=url+"?login="+str // recebe o ID do projeto para filtrar o centro de custo xmlHttp.onreadystatechange=stateChanged2 xmlHttp.open("GET",url,true) xmlHttp.send(null) } /* Essa funo ir exibir o resultado na DIV */ function stateChanged2() { if (xmlHttp.readyState==4 || xmlHttp.readyState=="complete") { document.getElementById("exibe_cusr").innerHTML=xmlHttp.responseText } } pagina em que executa a consulta ( cusr.asp ) <!--#include file="conexao.asp"--> <% Response.Charset = "ISO-8859-1" login = request.querystring("login") %> <% call abre_conexao set ru = server.createobject("adodb.recordset") ru.open "select USUARIO, COD_USUARIO from USR_USUARIOS where USUARIO = '" & login & "';",Conexao 'Do Until ru.eof %> <input type="text" name="coder" value="<%= ru("COD_USUARIO") %>"><%= ru("COD_USUARIO") %> <% ' ru.movenext ' loop call fecha_conexao set ru = nothing %> pagina em que é exibida o resultado ( index.html ) <html> <head> <title>Acesso Restrito</title> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> <script src="ajax.js"></script> </head> <body bgcolor="#FFFFFF" text="#000000" > <p>&nbsp;</p> <form method="post" action="auth.asp"> <div align="center"> <table width="44%" border="0" cellspacing="0" cellpadding="0" height="332"> <tr> <td>&nbsp;</td> </tr> <tr> <td background="fundo2.gif" height="306" width="435"> <div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="5" color="#000000"><b><font face="Verdana" size="2"><br> <% '<img src="chave2.gif" width="35" height="34"><br> ':: Acesso Restrito::</font></b><font face="Verdana" size="2"><br> %> <font size="1" color="#333333"></font><font color="#333333"><br> <b><font face="Verdana" size="2"> <% 'Response.Write request.servervariableS("REMOTE_ADDR") %> </font></b> <br> Tentativa de acesso &aacute;s:<b><font face="Verdana" size="2"> <% Response.Write(time) %> </font></b></font></font></font><br> </div> <table width="215" border="0" cellspacing="0" cellpadding="0" align="center" height="101"> <tr> <td width="44%" height="27"> <div align="right"><font size="2" face="Verdana, Arial, Helvetica, sans-serif" color="#000000">Login: </font></div> </td> <td width="56%" height="27"> <input type="text" name="login" id="login" size="20" OnBlur="Mandacod(this.value)"> </td> </tr> <tr> <td width="44%" height="66" valign="top" rowspan="2"> <div align="right"><font size="2" face="Verdana, Arial, Helvetica, sans-serif" color="#000000">Senha:<font></div> </td> <td width="28%" height="25" valign="top"> <div align="left"> <input type="password" name="senha" size="20" id="senha"> <br> </div> </td> </tr> <tr> <td width="28%" height="2" valign="top"> <div align="right"> <div id="exibe_cusr"></div> <input type="image" border="0" name="imageField" src="seta.gif" width="30" height="32"> </div> </td> </tr> </table> </td> </tr> </table> <br> </div> <p></p> </form> </body> </html> Ele é exibido no div id="exibe_cusr" sera que alguém sabe me dizer porque aparece em select e não em uma text/hidden ?
  12. haha pelo menos você sabe JS... eu tive isso 1 bimestre ano passado e se bem me lembro... não passava dos documents.write e alerts ;D... nem no window.open tivemos tive q aprender na marra mesmo. tenho 4 materias tecnicas no colegio, minhas medias são 9,5 e 10 principalmente em VB e ASP que me dou até bem com a linguagem. Pensei que eu até sabia alguma coisinha, mas no primeiro dia que começei esse estagio percebi que eu sou é burro ;D hahaha. eu entendo perfeitamente as logicas q o pessoal me passa aqui ou até mesmo voces do forum, mas de que adianta entender a logica se voce não sabe como aplica-la porque nunca te ensinaram ela ?!
  13. Já solicitei a alguns minutos...agora é só esperar e torcer para que alguém saiba isso... é uma pena que colegio tecnico não tenha tanta enfase assim nas materias como JS e AJAX... é sempre a mesma coisa, vb, asp, delphi...só ano q vem eu verei php ¬¬
  14. hmm entendi mas o problema não esta nos inputs, esses eu recupero perfeitamente... o qeu não consigo recuperar são esses malditos InnersHTML de JS... dentro deles não tem como eu colocar nada que de para fazer o Request não é ? Eu até pesquisei se tinha como fazer uma tabela dinamica assim em asp mas não encontrei nada
  15. como eu faria esses marcadores ? ( to dando um trabalhao pra vocês não to ? hahaha )
  16. É exatamente isso jothaz... o problema é que, como elas não foram inseridas por HTML, elas não tem um name, então não consigo dar o request.form nelas... esta é uma das maiores complicações q eu estou tendo para o insert eu estou usando esta sintaxe For Each i in Request.Form response.Write i & " - " & request(i)&"<br/>" Next 'Conexao.Execute "Insert Into REQ_REQUISICAO (DATA_LANCTO, DATA_SOLICITADO, COD_USUARIO, QTDE_SOLICITADA, QTDE_ATENDIDA, PRIORIDADE, STATUS, COD_FILIAL, COD_CCUSTO, NUM_REQUISICAO, OBSERVACAO, CUSTO_UNITARIO, COD_PROPRIETARIO, UMEDIDA, DESCRICAO, COD_TECNOLOGIA_GESTOR) values (.....)" este response.Write i & " - " & request(i)&"<br/>" é só pra testar se esta recebendo tudo.
  17. Hmm, no meu caso que os request's que irei utilizar provem de JS, como eu poderia pegar os mesmos ? function Insere() { var x=document.getElementById('tabela').insertRow(1) var a=x.insertCell(0) var b=x.insertCell(0) var c=x.insertCell(0) var d=x.insertCell(0) var e=x.insertCell(0) e.innerHTML=document.getElementById("apelido").value; d.innerHTML=document.getElementById("barra").value; c.innerHTML=document.getElementById("descricao").value; b.innerHTML=document.getElementById("um").value; a.innerHTML=document.getElementById("qtd").value; } Request.form("a") e assim por diante ou tem algum outro metodo ?
  18. não esta acontecendo nada, ele apenas acusa o erro de JS no browser, mas não consigo identificar o erro <% dim Conexao set Conexao = Server.CreateObject("ADODB.Connection") set r5 = Server.CreateObject("adodb.recordset") Conexao.Open ("DRIVER=Firebird/InterBase(r) driver; UID=xxxx;PWD=xxxx; DBNAME=xxxx:C:\IBSERVER\LIDER.fdb") cod_gestor2 = request.QueryString("cod_gestor2") descricao = request.QueryString("descricao") r5.open "select P.APELIDO, P.COD_BARRA, P.DESCRICAO, P.UMEDIDA_COMPRA from CAD_PRODUTO P where P.DESCRICAO STARTING WITH '"& descricao &"' AND EXISTS(SELECT G.COD_GRUPO FROM CAD_PRODUTO_GRUPO_GESTOR G WHERE G.COD_GRUPO = P.COD_GRUPO AND G.COD_GESTOR ='"& cod_gestor2 &"')",Conexao %> <script language="text/javascript"> function teste(){ parent.document.getElementById('apelido').value = 'Novo Nome'; parent.document.getElementById('cod_barra').value = 'Novo código'; parent.document.getElementById('descricao').value = 'Novo Nome'; parent.document.getElementById('um').value = 'Novo código'; window.close(); } </script> <style type="text/css"> table { font-family: verdana; font-size: 11px; color: #000099; font-weight: bold; } select { font-family: verdana; font-size: 11px; } </style> <html> <body> <table border="1" width="100%" cellspacing="0" cellpadding="5" name="table" id="table"> <tr bgcolor="#EAEBEF" bordercolorlight="#FFFFFF" bordercolordark="#E3E5EA"> <td><font size=4 color=#000099 type="verdana"><b>Codigo</b></font></td> <td width="20%"><font size=4 color=#000099 type="verdana"><b>Codigo de Barra</b></font></td> <td><font size=4 color=#000099 type="verdana"><b>Descricao</b></font></td> <td><font size=4 color=#000099 type="verdana"><b>UM</b></font></td> <td><font size=4 color=#000099 type="verdana"><b></b></font></td> </tr> <%do until r5.eof%> <tr> <td name="apelido"><%=r5("APELIDO")%></td> <td name="cod_barra"><%=r5("COD_BARRA")%></td> <td name="descricao"><%=r5("DESCRICAO")%></td> <td name="um"><%=r5("UMEDIDA_COMPRA")%></td> <td><a href="#" onclick="teste()">Adicionar</a></td> </tr> <% r5.movenext loop %> </table> </body> </html>
  19. hmm, no meu caso, para pegar a <tr> inteira ( codigo, codigo de barras, descrição e UM ) e adicionar em 4 text fields na pagina já aberta ( ldes.asp ), qual seria a sintaxe ?? Obrigado
  20. Poxa, valeu Rafael...fico no aguardo !
  21. fala rafael, tudo certinho ?? bom, eu dei uma pesquisada em arrays e ubound e não entendi direito isso, ainda não tive tempo de esboçar nada com o loop. outra coisa que me complica, é que eu não vou adicionar somente os items da tabela, tem alguns itens que são fixos, eles seram repetidos no insert mas, pra isso é preciso mudar a estrutura ou é a mesma coisa ?? Você não teria ai uma estrutura já pronta de inserts multiplos ? Valeu, Abraços
  22. beleza, e ai ? a que você se refere ?
  23. Opa galera, tudo bom ? Eu precisava saber uma coisinha, como eu faço para, a partir de uma popup de consulta, escolher o produto e, ao clicar no botao dele, fechar a popup e completar as text fields do formulario que deu origem a essa popup, com os dados que eu selecionei na mesma ?? http://img404.imageshack.us/my.php?image=89672641ki4.jpg Falou galera Abração
  24. hehehe, realmente é meio confusa minha logica, mas consegui arrumar certinho agora function retornaValor(){ var valor = document.getElementById("cod_gestor").value; var res = valor.split("*"); document.getElementById("cod_gestor2").value = res[1]; } function retornaValor2(){ var valor = document.getElementById("cod_gestor").value; var res = valor.split("*"); document.getElementById("cod_gestor3").value = res[0]; } <select name="cod_gestor" id="cod_gestor" onchange="retornaValor(), retornaValor2(), MandaID(cod_gestor3.value);"> <option value="">Selecione um Projeto</option> <% while not r1.eof %> <option value="<%= r1("CODIGO") & "*" & r1("COD_GESTOR") %>"><%= r1("DESCRICAO") %></option> <% r1.movenext wend %> </select> <input type="hidden" id="cod_gestor2" name="cod_gestor2"> <input type="hidden" id="cod_gestor3" name="cod_gestor3"> ai funcionou..valeu mesmo a ajuda
×
×
  • Criar Novo...