5 replies to this topic

[Desesperado]

Dae povo,
blz? Seguinte:

Tenho uma agenda onde, listando os registros, nos registros exibidos tenho link de Alterar os dados da pessoa caso necessário ( altera_dado.asp?codigo=<%=rs("codigo")%> ) .

O objetivo da alteração é, abrir uma página de formulário (altera_dado.asp) e dentro de cada campo apresentar os dados da pessoa certinho (isso ta feito corretamente ) e embaixo, um link de enviar dados ( ... action="altera.asp" ).
Procurei em vários lugares o comando de SQL q reescreve todos os dados de um formulário por cima de um regsitro existente.
Exemplo num cadastro de codigo 3:

Nome: Fulano
Telefone: 5555-1234

O formulário de alteração abre com esses dados e eu reescrevo o telefone, por exemplo, e envio formulario, e o mesmo grava as alterações por cima no mesmo registro 3.

Tentei usar de todas as formas os comando UPDATE do SQL e nada!!! To desesperado!!!!

[.:Matrix:.]

kra faz assim oh:


Despois que pedou o id do registro use este comando

Update Cadastro Set Telefone = ' " & vTelefone & " ' Where UF = ' " & vID & " ' "

Sendo que :

Cadastro = Nome da tabela que deseja atualizar
Telefone = eh o campo que vai atualizar
vTelefone = eh a varavel onde esta o novo dado
vId = eh o id do registro

Pode-se alterar diversos campo automaticamente, somente eh necessario que se separe por virgula

Exemplo:

Update Cadastro Set Telefone = ' " & vTelefone & " ' , Endereco = ' " & vEndereco & " 'Where UF = ' " & vID & " ' "

Espero ter ajudado.

Att,

[Desesperado]

Cara,
só pelo fato de vc ter respondido ajudou, mas não funcionou não!
ta dando erro


Microsoft OLE DB Provider for ODBC Drivers error '80040e07'

[Microsoft][ODBC Microsoft Access Driver] Data type mismatch in criteria expression.

/agenda/altera.asp, line 33

<32> SQL = "Update cadastro Set nome = ' " & stnome & " ' , email = ' " & stemail & "' , tel1 = ' " & sttel1 & " ' , tel2 = ' " & sttel2 & " ' , tel3 = ' " & sttel3 & " ' , tel4 = ' " & sttel4 & " ' , icq = ' " & sticq & " ' , obs = ' " & sticq & " ' WHERE codigo = ' " & scodigo & " ' "

[B]<33> set RS = conn.Execute(SQL)[/B]

Q q eu fiz de errado!?

[[webmaster]®]

Não sei!!!

Cado tipo de campo é tratado de uma forma na string sql

Inteiros (apenas números) = " & intVar & "
Strings (letras e numeros e outros sinais, tudo!) = ' " & strVar & " '
Datas = ' " & datVar & " '
Dizem que pode ser assim tbm, mas já usei assim e deu-me dor de kbça
Datas = #" &datVar & "#
Sacou?
Um ex.

sql = "UPDATE users SET name=' " & strNome & " ', data='"&Now&"' WHERE id="&intID&" "

[Desesperado]

Opa, blz?

cara, o erro não é nisso não
como o .. falou tel1 = e o campo que vai atualizar, sttel1 = eh a variavel onde esta o novo dado, St podia ser qualquer palavra pois esse é o nome da variável q eu declarei anteriormente, tanto que todas as funções de SQL q estou usando nesse sitemaestão com nomes de variavel igual a esse antrior, o erro é outro, de qq forma muito obrigado pela dica

Se alguem souber onde ta o erro fico muito grato se me ajudarem!

[<%Rafael%>]

Hummmm... eu utilizo com um campo invisível no form (hidden) e funciona normal... vê ai...

É tipo assim:

<% idcod = Request.Querystring("codigo")

AbreConexao
SQL = "SELECT * FROM tabela WHERE idcodigo = "&idcod&" "
Set rs = Conexao.Execute(SQL)

If Request.Form("enviado") = "sim" Then

SQL = "UPDATE tabela SET campo1 = '"&Request.Form("campo1")&"', campo2 = '"&Request.Form("campo2")&"' WHERE idcodigo = "&idcod&" "
Conexao.Execute(SQL)

Else %>
<form name="edita" action="pagina.asp?codigo=<%=RS("idcodigo")%>" method="post">
<input type="hidden" name="enviado" value="sim">
<input type="text" name="campo1" value="<%=RS("campo1")%>">
<input type="text" name="campo2" value="<%=RS("campo2")%>">
<input type="submit" value="enviar">
</form>
<% End If
FechaConexao %>

Bom, eu utilizo esse ai... e funfa legal...