Voltar A Pagina Pelo Id....

[mkboy]

Vou explicar como funciona meu sisteminha:

Primeiro tenho duas frames.

Na frame direita tenho a pagina menu.asp

E na esquerda tenho a pagina exibefoto.asp

Na pagina menu.asp tenho um select que lista em sequencia a partir de 1,2,3...

Quando você clica na imagem miniatura no menu.asp, ela abre na pagina exibefoto.asp a respectiva foto, de acordo com o ID que esta no banco, veja como passo:

<a href="exibefoto.asp?foto=<%=objrs("id")%>" target="exibe"><img src="fotos2/<%=objrs("foto")%>" width="75" height="56" border="0"></a>

Acima é a miniatura com o link para exibir a foto grande que esta em outra pasta.

Aqui como é exibida a foto grande:

<img src="fotos/<%=objrs("foto")%>" width="380" height="285" border="1">

Até aqui beleza, eu clico na miniatura e abre a grande.

Tenho no banco tambem o campo "comenta" que eu estou exibindo logo abaixo da foto.

Fiz um link para alterar o conteudo exibido que esta na tabela comenta

Assim:

<a href="alterar.asp?id=<%=objrs("id")%>">Editar</a>

Depois daqui eu abro a pagina alterar.asp com o conteudo da tabela comenta explicito em um campo de formulario.

Agora eu faço o update, e aqui o grande lance.

Eu quero que ele redirecione para pagina exibefoto.asp, na mesma imagem que eu estou editando o texto, ou seja, para a foto do id em questao.

Tentei de varias formas e não consegui.

Como faço?

[mkboy]

Esse é o select feito para exibir a foto:

  <%

Dim objRs, x, intpage, intpagecurrent, intpagecount, codigo

'recebe o nome da foto

codigo = request.querystring("foto")

Set objRS = Server.CreateObject("Adodb.recordset")

call  Abreconexao

  objRs.open "Select * From fotos where id=" + codigo + "" , Objconn, 3, 3 'primeiro abre a conexao e segundo é qual banco, e 3 é o recordset que siginifica que ele move para tras e para frente,e o cursos do recordset move para tras e pra frente(segundo 3)

%>

[nevesrodrigo]

simples, é so mandar como parametro o nome da foto pra pagina que faz o update

depois você faz um response.redirect pra pagina da foto com o nome dela por parâmetro

[mkboy]

Sem o redirect o update funciona normal, mas quando o coloco acontece o seguinte:

Primeiro codigo, depois o erro:

codigo

<%

dim objRS

dim strrs

Set conn = Server.CreateObject ("ADODB.Connection")

strconn = "Driver={Microsoft Access Driver (*.mdb)};DBQ="& Server.MapPath("foto.mdb")

conn.open strconn

strrs = "UPDATE fotos SET comenta='"&request.form("comenta")&"' where id="&request.form("id")

'Response.Write strrs

'Response.End

conn.execute(strrs)

response.redirect "exibefoto.asp?foto="& objrs("id")"

%>

erro

Tipo de erro:

Erro de compilação do Microsoft VBScript (0x800A0409)

Constante de seqüência não finalizada

/foto/galerias/peixes/bass/atualizar.asp, line 19, column 53

response.redirect "exibefoto.asp?foto="& objrs("id")"

----------------------------------------------------^

Onde esta o erro!!!

[mkboy]

RESOLVIDO!!!

VALEUUU!!!!

[dark0]

okay

mod close the topic..

[Victor]

ai ursao Fecha ai, ou algum admin.....