Atualizar Um Campo De Uma Consulte

[pchardnet]

Galera é o seguinte: Criei um sistema de busca. Tá funcionando legal. Só que eu gostaria de incrementar ele dando a opção de atualizar um dos campos.

Não sei fazer isso. Gostaria de dar essa opção de atualização na mesma página de resposta da consulta. É possível??

consulta.asp

strid = request.form("num")
'................................. ABRIR CONEXÃO BD 
Dim conObj
Set conObj = Server.CreateObject("ADODB.Connection")
conObj.Open = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("../dbmaxloggrcs/DBMAX/DBMAX.MDB") & ";"

Set RS = ConObj.Execute("SELECT * FROM boleto WHERE id =" & StrId & " ")

if not RS.Eof then
  response.write RS("id")
  response.write RS("nome")
  response.write RS("email")
  response.write RS("vencimento")
  response.write RS("pago")
else
  response.write "Número de Bloqueto não Encontrado"
end if
%>

O campo que eu gostaria de poder atualizar é o campo PAGO (booleano).

Valeu!

[[ GuTo ]]

Lógicamente, é possível sim!

Você terá de montar um form para O registro da busca e nele inserir os dados do campo PAGO.

Dae você insere novos valores no FORM, e depois cria uma páginas resgatando os valores do form. E dae faça um UPDATE.

[pchardnet]

POis é cara, eu não tenho idéia de como fazer esse update.

A minha consulta está aí. Porém os meus campos só estão pra visualização.

Nesta mesma consulta tem como eu abrir somente o campo PAGO para Atualização?

estou perdido aqui, dá uma força!

[[ GuTo ]]

Ok Brother!

Seguinte, eu vou apenas ir te guiando, beleza! quero te ajudar a aprender.

1 - Então, você sabe a sintaxe do UPDATE?

2 - Sabe que somente o SELECT é que precisa ser setado um recordset?

3 - Que o resto, UPDATE, INSERT e DELETE é só simplesmente executar a string SQL com a conexão?

Pois bem, imaginando que você não saiba esses detalhes, já lhe ajudo:

Respostas/Exemplos:

1

UPDATE tabela SET campo1='"&strVar&"' WHERE campoID="&intVar

2

Set objRS = Conexao.Execute("SELECT * FROM tabela")

3

Conexao.Execute("INSERT INTO tabela (campo1, campoID) VALUES('"&strVar&"',"&intVar&")")

Conexao.Execute("UPDATE tabela SET campo1='"&strVar&"' WHERE campoID="&intVar)

Conexao.Execute("DELETE FROM tabela WHERE campoID="&intVar)

Note a diferença no item 2 e no item 3, você pode perceber que no item 2 setamos um recordset, que é somente para strings SQL q usam o SELECT, nas demais, INSERT, UPDATE e DELETE, no item 3, NÃO é preciso setar o recordset, dae simplesmente executamos a rotina.

Bem sacando isso e as sintaxes já pra ir mais adiante agora...

Se tiver mais dúvidas, é só chamar!

Nota: nas váriaveis na ql coloquei str significa q são variáveis do tipo STRING, e nas que eu coloquei o int na frente significa que são do tipo INTEIRO.

STRING = Letras e Números

INTEIRO = Somente números