helinho

LeoB,

Uhuuulll!! Você BRILHOU cara!!! Agora deu certo!!! Ufa... que alívio, muitíssimo obrigado pela paciência e ajuda!!! Show de Bola... Eu tirei o underline do form... achei melhor! Vlw pela ajuda!!!


Bom, então abaixo segue o código de como ficou a solução para UPDATE de vários registros e com vários campos (by LeoB):

1) página fotos_listar.asp

<form id="formulario" name="formulario" method="post" action="fotos_atualizar.asp">

<% While Not RSfotos.EOF) %>

<img src="galeria/<%RSfotos.Fields.Item("foto").Value)%>" width="90" height="90" />
<input name="titulo<%=(RSfotos.Fields.Item("id").Value)%>" type="text" value="<%=(RSfotos.Fields.Item("titulo").Value)%>" />
<select name="sessao<%=(RSfotos.Fields.Item("id").Value)%>" value="<%=(RSsessao.Fields.Item("sessao_fotos").Value)%>"</select>
<%
RSfotos.MoveNext()
Wend
%>

<input name="botao" type="submit" value="Atualizar todos os dados!" />

</form>

2) página fotos_atualizar.asp

<!--#include file="inc_conexao.asp" -->
<%
Set RSfotos = conexao.Execute("SELECT id FROM fotos")

While Not RSfotos.EOF
   id = RSfotos("id")

   titulo = Request("titulo" & id)
   sessao = Request("sessao" & id)

   conexao.Execute "UPDATE fotos SET titulo = '"&titulo&"', sessao = '"&sessao&"' " &_
   " WHERE id = " &id

   RSfotos.MoveNext
Wend

conexao.close
Set RSfotos = Nothing

Response.Redirect("update_ok.asp")
%>

Até a próxima!

LeoB,

Fiz as alterações e o UPDATE funcionou, porém todos os valores são atualizados para "vazio". Ou seja o código funciona atualizando tudo, mas com valores vazios. Agora fiquei na dúvida de como tratar o meu FORM e de como entender como que o seu código vai pegar o ID respectivo a ser atualizado.

1) deixei o form assim:

<form id="formulario" name="formulario" method="post" action="fotos_atualizar.asp">

<% While Not RSfotos.EOF) %>

<img src="galeria/<%RSfotos.Fields.Item("foto").Value)%>" width="90" height="90" />
<input name="titulo_<%=(RSfotos.Fields.Item("id").Value)%>" type="text" value="<%=(RSfotos.Fields.Item("titulo").Value)%>" />
<select name="sessao_<%=(RSfotos.Fields.Item("id").Value)%>" value="<%=(RSsessao.Fields.Item("sessao_fotos").Value)%>"</select>
<%
RSfotos.MoveNext()
Wend
%>

<input name="botao" type="submit" value="Atualizar todos os dados!" />

</form>

2) deixei o código asp assim:

<%
Set RSfotos = conexao.Execute("SELECT id FROM fotos")

While Not RSfotos.EOF
   id = RSfotos("id")

   titulo = Request("titulo" & id)
   sessao = Request("sessao" & id)

   conexao.Execute "UPDATE fotos SET titulo = '"&titulo&"', sessao = '"&sessao&"' " &_
   " WHERE id = " &id

   RSfotos.MoveNext
Wend

conexao.close
Set RSfotos = Nothing

Response.Redirect("update_ok.asp")
%>

Obs: eu não consegui processar onde que no seu código os ID a serem atualizados serão identificados para o UPDATE. No caso de "titulo = Request("titulo" & id) e sessao = Request("sessao" & id)" quer dizer que estará me retornando algo do tipo: "titulo = Piscina1" e "sessao = Lazer1" é isso? E se for, vai para o banco de dados assim?

O Meu FORM está certo no que diz respeito às propriedades "value" e "name"?

Oi LeoB,

Tentei montar de acordo com as suas instruções e não deu certo. O código fica rodando até exceder o tempo de execução do MySQL. Bom, mas muito obrigado pelos seus esclarecimentos que são bem plausíveis e lógicos. Sendo assim, eu remontei a minha estrutura de form e execução. Vou te explicar detalhadamente:

1) na página "fotos_listar.asp" (eu resumi o código, ok? porque está funcionando bem, mas fiz algumas modificações.)

<form id="formulario" name="formulario" method="post" action="fotos_atualizar.asp">

<% While Not RSfotos.EOF) %>

<img src="galeria/<%RSfotos.Fields.Item("foto").Value)%>" width="90" height="90" />
<input name="checkbox" type="checkbox" value="<%=(RSfotos.Fields.Item("id").Value)%>" />
<input name="titulo" type="text" value="<%=(RSfotos.Fields.Item("titulo").Value)%>" />
<select name="sessao" value="<%=(RSsessao.Fields.Item("sessao_fotos").Value)%>"</select>
<%
RSfotos.MoveNext()
Wend
%>

<input name="botao" type="submit" value="Atualizar todos os dados marcados!" />

</form>

Aqui eu criei um "checkbox" para filtrar os registros que deverão ser alterados no UPDATE da próxima página.

Sendo assim, neste form eu tenho:
• 1 imagem que não sofrerá nenhuma alteração
• 1 checkbox contendo em seu value o ID do registro listado
• 1 textfield contendo em seu value o valor do título da foto
• 1 select contendo em seu value o valor da sessão da foto

Então a visualização desta página fica assim:



2) na página "fotos_atualizar.asp" eu adaptei o seu código sugerido como se segue abaixo, porém não está funcionando:

<!--#include file="inc_conexao.asp" -->
<%
Dim checkbox
    checkbox = Request("checkbox")

If checkbox <> "" Then
Set RSfotos = conexao.Execute("SELECT id FROM fotos WHERE id = " &checkbox)

While Not RSfotos.EOF

id = RSfotos("id")
titulo = Request("titulo")
sessao = Request("sessao")

conexao.Execute "UPDATE fotos SET titulo = '"&titulo&"', sessao = '"&sessao&"' " &_
" WHERE id = " &id

Wend

conexao.close
Set RSfotos = Nothing
End If

Response.Redirect("update_ok.asp")
%>

Você acha que agora fica melhor para encontrarmos uma solução LeoB? Quando tiver um tempinho me dê uma auxiliada, pois acredito que não deve estar muito longe de fazer o código funcionar!


Mais uma vez agradeço a atenção!

Olá Cinhu!

Eu descobri como resolver este problema. Baixei os arquivos do link que você postou e dando uma olhada no código descobri que para buscar as palavras em português com a acentuação desejada basta você abrir o arquivo "configuration.asp" e na linha 122 onde está: g_charset = "windows-1250" você muda para g_charset = "iso-8859-1"

A propósito, este sistema de busca é muito bom mesmo. Ele busca informações em todo o site, tanto nos textos html, htm ou asp das páginas como dentro do banco de dados. Show de bola!

Valeu.