Jump to content

  2. →
  3. →

Photo

Atualizando Dados Alterados

Started By luckynho, 20/01/2005, 15:46

  • Faça o login para participar
30 replies to this topic

#16 Prog

Prog

    ...

  • Ex-Admins
  • 3761 posts
  • Sexo:Masculino
  • Localidade:Rio de Janeiro/RJ
  • Interesses:TI, Software Livre, Design Digital e Rock'n'Roll.

Posted 21/01/2005, 17:17

Cara, não pode ser... pq estão aparecendo 2 aspas? O comando deve ser assim:

update bibli_artigo set titulo='teste0', olho='teste1', descricao='teste2', autor='teste3', descricao_autor='teste4', fonte='teste5' where codigo=null


E este codigo=null tb não esta me cheirando bem, mesmo assim, com codigo=null, ele deve funcionar sem erro, mas, ele apenas vai atualizar os registros dos quais possuem ausencia de valor.
------
Mero mortal!

#17 luckynho

luckynho

    12 Horas

  • Usuários
  • 120 posts
  • Sexo:Não informado
  • Localidade:São Paulo

Posted 21/01/2005, 17:24 

<%
  Response.Expires = 0
  if len(session("adm.codigo")) = 0 then Response.Redirect "../"
function gravaTXT(x)
  if len(x) = 0 then
    gravaTXT = "null"
  else
    gravaTXT = "'" & Replace(Replace(x,vbCrLf,"<br>"),"'","''") &"'"
  end if
end function  
  dim objto, objto1
  Set objto = Server.CreateObject("ADODB.Connection")
    objto.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("../../bd/bd.mdb") &";"     
  dim codigo, titulo, olho, descricao, autor, descricao_autor, fonte
	codigo = gravaTXT(Request.form("codigo"))
	titulo = gravaTXT(Request.Form("titulo"))
	olho = gravaTXT(Request.Form("olho"))
	descricao = gravaTXT(Request.Form("descricao"))
	autor = gravaTXT(Request.Form("autor"))
	descricao_autor = gravaTXT(Request.Form("descricao_autor"))
	fonte = gravaTXT(Request.Form("fonte"))
cmdinsere = "update bibli_artigo set titulo='& titulo &', olho='& olho &', descricao='& descricao &', autor='& autor &', descricao_autor='& descricao_autor &', fonte='& fonte &' where codigo=" & codigo
 'response.write cmdinsere 
 'response.end
  'objto.Execute (cmdinsere)
%>
<script LANGUAGE=javascript>
  alert('Alteração efetuada!');
  location.href = "altart.asp?codigo=<%= codigo%>";
</SCRIPT>


o Java script é apenas pra dizer a foi alterado.. e ele vai voltar para a pagina onde eu estava atualizando....

eu fiz alteração do codigo e apareceu isso agora!

------- Request.Form --------

titulo=a
Submit2=Alterar Notícia
olho=a
descricao=a
descricao_autor=a
autor=a
fonte=aa

------- Request.Querystring --------
update bibli_artigo set titulo='& titulo &', olho='& olho &', descricao='& descricao &', autor='& autor &', descricao_autor='& descricao_autor &', fonte='& fonte &' where codigo=null

#18 luckynho

luckynho

    12 Horas

  • Usuários
  • 120 posts
  • Sexo:Não informado
  • Localidade:São Paulo

Posted 21/01/2005, 17:28

:(
poxa.. eu só preciso alterar...que dificil....tao facil mas tao dificil....
quem kiser olhar o problema a profundo... eu passo o login e senha do site pra ver o que rola....

=(

#19 Prog

Prog

    ...

  • Ex-Admins
  • 3761 posts
  • Sexo:Masculino
  • Localidade:Rio de Janeiro/RJ
  • Interesses:TI, Software Livre, Design Digital e Rock'n'Roll.

Posted 21/01/2005, 17:31

Ahmmmm...
Hmmmm... putz, sua função GravaTXT já coloca aspas no comando, então... veja da seguinte maneira, vamos colocar sua sintaxe como era antes:

cmdinsere = "update bibli_artigo set titulo="& titulo &", olho="& olho &", descricao="& descricao &", autor="& autor &", descricao_autor="& descricao_autor &", fonte="& fonte &" where codigo=" & codigo

Faça o teste e me diga o que esta sendo impresso para o comando.
O campo CODIGO é do tipo TEXTO tb?
------
Mero mortal!

#20 luckynho

luckynho

    12 Horas

  • Usuários
  • 120 posts
  • Sexo:Não informado
  • Localidade:São Paulo

Posted 21/01/2005, 18:38

o campo codigo é autonumeracao

#21 luckynho

luckynho

    12 Horas

  • Usuários
  • 120 posts
  • Sexo:Não informado
  • Localidade:São Paulo

Posted 21/01/2005, 18:40

------- Request.Form --------

titulo=aa
Submit2=Alterar Notícia
olho=a
descricao=a
descricao_autor=a
autor=a
fonte=a

------- Request.Querystring --------
update bibli_artigo set titulo='aa', olho='a', descricao='a', autor='a', descricao_autor='a', fonte='a' where codigo=null


fiz o que falou e apareceu isso agora

#22 luckynho

luckynho

    12 Horas

  • Usuários
  • 120 posts
  • Sexo:Não informado
  • Localidade:São Paulo

Posted 21/01/2005, 18:41

aparentemente ele nao da erro......

mas tbm nao está atualizando os dados....

#23 Prog

Prog

    ...

  • Ex-Admins
  • 3761 posts
  • Sexo:Masculino
  • Localidade:Rio de Janeiro/RJ
  • Interesses:TI, Software Livre, Design Digital e Rock'n'Roll.

Posted 21/01/2005, 18:41

Neste caso...

Esta linha não pode:
codigo = gravaTXT(Request.form("codigo"))
Deve ser somente:
codigo = Request.form("codigo")

Informe sobre o seu comando SQL.
------
Mero mortal!

#24 luckynho

luckynho

    12 Horas

  • Usuários
  • 120 posts
  • Sexo:Não informado
  • Localidade:São Paulo

Posted 21/01/2005, 18:45

Microsoft JET Database Engine erro '80040e14'

Erro de sintaxe (operador faltando) na expressão de consulta 'codigo='.

/admin/artigos/altera_artigo.asp, line 40

------- Request.Form --------

titulo=as
Submit2=Alterar Notícia
olho=a
descricao=a
descricao_autor=a
autor=a
fonte=a

------- Request.Querystring --------
update bibli_artigo set titulo='as', olho='a', descricao='a', autor='a', descricao_autor='a', fonte='a' where codigo=

deu erro

#25 Prog

Prog

    ...

  • Ex-Admins
  • 3761 posts
  • Sexo:Masculino
  • Localidade:Rio de Janeiro/RJ
  • Interesses:TI, Software Livre, Design Digital e Rock'n'Roll.

Posted 21/01/2005, 18:49

Seu Request.Form("codigo") não esta pegando valor algum da página anterior.
------
Mero mortal!

#26 luckynho

luckynho

    12 Horas

  • Usuários
  • 120 posts
  • Sexo:Não informado
  • Localidade:São Paulo

Posted 21/01/2005, 18:52

essa é uma pagina de pesquisa.... onde ele lista meus registros... e tem o botao alterar e excluir

quando eu clico em alterar... ele mostra direitinho o form com as informacoes de onde eu cliquei


Codigo da pagina de pesquisa
<%
Response.Expires = 0
if len(session("adm.codigo")) = 0 then Response.Redirect "../"
dim mostrapg, objto, objto1, pgatual, chave
  chave   = Request("chave")
  pgatual = Request("pgatual")
  mostrapg = 15
  if Len(pgatual) = 0 then pgatual = 1
  Set objto = Server.CreateObject("ADODB.Connection")
    objto.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("../../bd/bd.mdb") &";"
  Set objto1 = Server.CreateObject("ADODB.RecordSet")
    objto1.CursorLocation = 3
    objto1.CursorType     = 3
    objto1.CacheSize      = mostrapg
    if len(chave) = 0 then
      objto1.Open "select * from bibli_artigo order by codigo desc", objto,,&H0001
    else
      objto1.Open "select * from bibli_artigo where titulo like '%" & chave & "%' order by codigo desc", objto,,&H0001
    end if
    objto1.PageSize       = mostrapg
  if  not objto1.EOF then
    objto1.AbsolutePage = pgatual
    qtpg = objto1.PageCount
    for i =0 to mostrapg
          trs = trs & "<tr>" &_
        "<td bgcolor='#E9E9E9' height='22'><font size='2' face='Verdana, Arial, Helvetica, sans-serif'>"& left(objto1("Titulo"),150) &"</font></td>" &_
        "<td bgcolor='#E9E9E9' align='center' height='22'><font size='2' face='Verdana, Arial, Helvetica, sans-serif'><a href='altart.asp?codigo="& objto1("codigo") &"'>Alterar</a></font></td>" &_
        "<td bgcolor='#E9E9E9' align='center' height='22'><font size='2' face='Verdana, Arial, Helvetica, sans-serif'><a href='exart.asp?codigo="& objto1("codigo") &"'>Excluir</a></font></td>" &_
        "</tr>"
      objto1.MoveNext
      if objto1.EOF then exit for
    Next
  end if
%>


Codigo do Form

<%
  Response.Expires = 0
 if len(session("adm.codigo")) = 0 then Response.Redirect "../"  
  dim objto, objto1, bd, codigo
    codigo = Request("codigo")
Set objto = Server.CreateObject("ADODB.Connection")
  objto.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("../../bd/bd.mdb") &";"
Set objto1 = Server.CreateObject("ADODB.RecordSet")
  objto1.Open "select * from bibli_artigo where codigo="& codigo, objto,,&H0001
if not objto1.EOF then
  titulo = objto1("titulo")
  olho = objto1("olho")
  descricao = objto1("descricao")
  autor = objto1("autor")
  descricao_autor = objto1("descricao_autor")
  fonte = objto1("fonte")
end if
%> 
<table width="465" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td>
      <form name="formart" method="post" action="altera_artigo.asp">
        <table width="400" border="0" cellspacing="1" cellpadding="1" bgcolor="#000000" align="left">
          <tr bgcolor="#FFFFFF" align="left"> 
            <td colspan="2"> 
              <table border=0 width="100%" align=center>
                <tr bgcolor="#000000"> 
                  <td colspan="2" bgcolor="#CC99CC" align="right" height="15"> 
                    <blockquote> 
                      <div align="left"><b><font face="Verdana, Arial, Helvetica, sans-serif" size="2"><font face="Trebuchet MS"><br>
                        <font color="#FFFFFF">Alterar Artigos</font></font></font></b></div>
                    </blockquote>
                  </td>
                </tr>
              </table>
          <tr bgcolor="#F0F0F0"> 
            <td colspan="2" align="right" valign="top"> 
              <p align="left"></p>
              <div align="left"> 
                <table width="90%" border="0" cellspacing="1" cellpadding="1" align="center">
                  <tr> 
                    <td><b><font face="Trebuchet MS" size="2"><b>T&iacute;tulo 
                      do Artigo.:</b></font></b></td>
                  </tr>
                  <tr> 
                    <td> <b><font face="Trebuchet MS" size="2"> 
                      <input type=text name="titulo" value="<%= titulo%>" size=50 maxlength=100 style="{<font-family:Trebuchet MS; font-size:11}">
                      <font color="#000000"> </font></font></b></td>
                  </tr>
                  <tr> 
                    <td><b><font face="Trebuchet MS" size="2"><b>Resumo do Artigo.:</b></font></b></td>
                  </tr>
                  <tr> 
                    <td> <b><font color="#000000" face="Trebuchet MS" size="2"> 
                      </font><font face="Trebuchet MS" size="2"> 
                      <input type=text name="olho" value="<%= olho%>" size=50 maxlength=100 style="{<font-family:Trebuchet MS; font-size:11}">
                      </font></b></td>
                  </tr>
                  <tr> 
                    <td><b><font face="Trebuchet MS" size="2"><b>Descri&ccedil;&atilde;o 
                      do Artigo.:</b></font></b></td>
                  </tr>
                  <tr> 
                    <td> <b><font face="Trebuchet MS" size="2"> 
                      <textarea name="descricao" cols="50" style="{&lt;font-family:Trebuchet MS; font-size:11}" rows="5"><%= descricao%></textarea>
                      </font></b></td>
                  </tr>
                  <tr> 
                    <td><b><font face="Trebuchet MS" size="2"><b>Autor .:</b></font></b></td>
                  </tr>
                  <tr> 
                    <td> <b><font face="Trebuchet MS" size="2"><font color="#000000"> 
                      </font> 
                      <input type=text name="autor" value="<%= autor%>" size=40 maxlength=100 style="{<font-family:Trebuchet MS; font-size:11}">
                      </font></b></td>
                  </tr>
                  <tr> 
                    <td><b><font face="Trebuchet MS" size="2"><b>Descri&ccedil;&atilde;o 
                      do Autor.:</b></font></b></td>
                  </tr>
                  <tr> 
                    <td><font color="#000000"><b><font color="#000000"><b><font face="Trebuchet MS" size="2"> 
                      <input type=text name="descricao_autor" value="<%= descricao_autor%>" size=40 maxlength=100 style="{<font-family:Trebuchet MS; font-size:11}">
                      </font></b></font></b></font></td>
                  </tr>
                  <tr> 
                    <td><b><font face="Trebuchet MS" size="2"><b>Fonte .:</b></font></b></td>
                  </tr>
                  <tr> 
                    <td><font color="#000000"><b><font color="#000000"><b><font color="#000000"><font color="#000000"><font face="Trebuchet MS" size="2"> 
                      <input type=text name="fonte" value="<%= fonte%>" size=50 maxlength=100 style="{<font-family:Trebuchet MS; font-size:11}">

                      </font></font></font></b></font></b></font></td>
                  </tr>
                  <tr> 
                    <td> 
                      <div align="center"><b><font size="2" face="Trebuchet MS" color="#666666"> 
                        <input type="submit" name="Submit2" value="Alterar Not&iacute;cia">
                        </font></b></div>
                    </td>
                  </tr>
                </table>
              </div>
            </td>
          </tr>
        </table> 
      </form>
    </td>
  </tr>
</table>
<p>&nbsp;</p>
<p><br>
</p>
</body>
</html>

#27 Prog

Prog

    ...

  • Ex-Admins
  • 3761 posts
  • Sexo:Masculino
  • Localidade:Rio de Janeiro/RJ
  • Interesses:TI, Software Livre, Design Digital e Rock'n'Roll.

Posted 21/01/2005, 18:55

Vc não esta passando a variavel codigo para a página seguinte, por isto ela esta indo vazia.
------
Mero mortal!

#28 luckynho

luckynho

    12 Horas

  • Usuários
  • 120 posts
  • Sexo:Não informado
  • Localidade:São Paulo

Posted 21/01/2005, 18:56

eu tenho que passar essa variavel no form correto ?

#29 Prog

Prog

    ...

  • Ex-Admins
  • 3761 posts
  • Sexo:Masculino
  • Localidade:Rio de Janeiro/RJ
  • Interesses:TI, Software Livre, Design Digital e Rock'n'Roll.

Posted 22/01/2005, 10:02

Uma das maneiras possiveis é pelo form.
------
Mero mortal!

#30 luckynho

luckynho

    12 Horas

  • Usuários
  • 120 posts
  • Sexo:Não informado
  • Localidade:São Paulo

Posted 24/01/2005, 13:31

eeeeeeeeeeeeeeeee

Parabens... parabens... parabens....!!

Prog, valeu pela paciencia em ajudar um relez iniciante em asp....
Valeu a todas as outras pessoas que tentaram ajudar...

deu certo....

Solução:
O form de alteração do meu arquivo, não estava recebendo o codigo
(o codigo estava lá, porem com outro nome)

Obs final: eu acho que o tempo todo o codigo estava certo... haha.. mas foi legal a experiencia de quebrar a cabeça..... obrigado a todos!!
Voltar para ASP


1 user(s) are reading this topic

0 membro(s), 1 visitante(s) e 0 membros anônimo(s)

  1. Fórum WMO
  2. → Desenvolvimento
  3. → ASP
  4. Privacy Policy
  5. Regras ·
IPB Skin By Virteq