Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

diegokorvo

Não repassa dados

Recommended Posts

funciona em uma página com 2 frames. no frame de cima seleciona a opção para abrir no frame de baixo. funciona, mas não grava a opção escolhida no bd. tenho q alterar algo no primeiro código, onde seleciono para repassar o campo "opcao"? ele só grava o campo "opcao" se é tudo feito no mesmo frame.

 

o primeiro código abre a página no frame de cima:

<html><head><title>opção</title></head><body><form name=menu><select name="opcao" id=text1><option value="">Escolha<option value="escreve-opt1.asp">Opção 1<option value="escreve-opt2.asp">Opção 2</select><input type=submit id=submit1 name=submit1 value="Vai!" onClick="top.conteudo.location.href = document.menu.opcao.options[document.menu.opcao.selectedIndex].value"></form></body></html>
escolhendo a opção 1 ou 2 ele abre a página no frame de baixo, porem não repassa o campo "opcao" para ser gravado no bd:

ASP [/tr][tr]<%

Stropcao = replace(Request("opcao"),"'","''")

StrIP = replace(Request.ServerVariables("REMOTE_ADDR"),"'","''")

 

dbfile=Server.MapPath("acesso.mdb")

 

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

OBJdbConnection.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&dbfile

 

sql_ins="INSERT into acesso (opcao, IP) VALUES " & _

"('" & Stropcao & "', '" & StrIP & "') "

OBJdbConnection.Execute(sql_ins)

 

response.redirect("opt1.asp")

%>

[/tr]

Compartilhar este post


Link para o post
Compartilhar em outros sites

você teria q fazer assim

 

top.conteudo.location.href = "pagina.asp?variavel=" + document.menu.opcao.options[document.menu.opcao.selectedIndex].value;

falows

Compartilhar este post


Link para o post
Compartilhar em outros sites

não funcionou...

 

mas tive outra idéia, como faço pro Stropcao receba um certo valor determinado por mim mesmo, por exemplo meu algoritmo abaixo

 

Stropcao recebe valor_que_eu_quero

isso tudo na mesma página que vai gravar no bd e retornar pra selecionada anteriormente

 

ASP [/tr][tr]<%

Stropcao = replace(Request("opcao"),"'","''") <-- SUBISTITUINDO AQUI

StrIP = replace(Request.ServerVariables("REMOTE_ADDR"),"'","''")

 

dbfile=Server.MapPath("acesso.mdb")

 

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

OBJdbConnection.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&dbfile

 

sql_ins="INSERT into acesso (opcao, IP) VALUES " & _

"('" & Stropcao & "', '" & StrIP & "') "

OBJdbConnection.Execute(sql_ins)

 

response.redirect("opt1.asp")

%>

[/tr]

 

valeu quem tá ajudando...

resolvendo essa questão já resolveu boa parte do meu problema...

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.