Link Com Funções Asp(resolvido) Masss!

[pacokaca]

Oi galera.. iolha eu de novo aqui pedindoa juda pra vocês.. ehehea .. brigadao a todos q sempre me ajudam ai..

bom.. vamus ao problema..

eu achu q é algo bem simples.. mas num sie como faze.r.

quero ter um link.. q quando clicar nele.. não funcione com <a href="....> quero q quando clique nele.. ative um conjunto de funções asp.. por exemplo quando eu clicar faria o seuginte

response.cookies("a")("B") = blabla

response.redirect "aa.asp"

tem como fazer isso? valeu desde já!!

[vicoluis]

num sei se é bem o que você quer... ate mesmo por que num entendi a pergunta... mas mais ou menos.. você pode usar o select case

variavel = ' aqui você diz se vai ser a ou b ou qualquer outro valor...

select case variavel

case "a"

response.cookies("a")("B") = blabla

response.redirect "aa.asp"

case "b"

response.cookies("b")("C") = blodesblodes

response.redirect "bb.asp"

end select

bem... num sei se era isso... se num era... explica de novo...

[pacokaca]

eu num entendi muito sua resposta.. entaum achu q você nnum entendeu minha pergunta.. aeahieuhea vou tentar explicar de novo..

tenho um link normal.. <a href="teste.asp"> beleza.. quando clicar nele.. vai pro teste.asp..

mas eu não queria só isso.. eu queria q ao clicar nesse link.. esse executasse um bloco de comandos asp.. antes de redirecionar a pagina para teste.asp.. ou ateh q enviasse um post para essa página.. tem como ?

ou seja.. eu qeuro fazer um link por asp.. e não por html..

[vicoluis]

entaum... supunhetamos que você está na pagina batatinhas.asp e nela tem um link para a pagina teste.asp ta...

pagina batatinhas.asp

<a href="batatinhas.asp?comando=a">ir para a pagina teste.asp</a>

<a href="batatinhas.asp?comando=b">ir para a pagina teste2.asp</a>

<%

comando = request.querystring("comando")

select case comando

case "a"

response.cookies("a")("B") = "blabla"

session("teste") = "otavio lindo"

response.redirect "teste.asp"

case "b"

response.cookies("b")("C") = "blodesblodes"

session("teste2") = "otavio mais lindo ainda...."

response.redirect "teste2.asp"

end select

%>

bem, copia e cola isso na pagina batatinhas.asp

que acho que você vai entender o meu exemplo... por que neste meu exemplo antes de ir para o link que você quer... ele pode rodar quantos comandos você quiser...

deu para entender melhor?

[dark0]

olha só..

De todos os modos possíveis, usando ASP, você vai precisar redirecionar o navegador, ou pelo menos Atualizar ele.

Uma ideia, é assim:

você cria o link, direcionando para a mesma pagina, mas passando um parametro junto, que você usará depois, para executar o trecho que quiser.

Ex:

<a href="pagina.asp?variavel=1">Clique aqui</a>

Na pagina.asp, você testa se a variavel tem valor, e se tiver, você executa o conjunto de comandos, ex:

<%

if request("variavel") <> "" then

response.cookies("a")("B") = blabla

response.redirect "aa.asp"

end if

%>

Entendeu como funciona?

[pacokaca]

Ae brigadao a vocês q me ajudaram.. consegui fazer pelo metodo do dark.. mas num to desprezando o de cima não.. eu tentei e deu usn erro.. ai eu tentei o do dark e deu cerot.. valeu aos dois.. agora eu to com um problema q segue depois dissu.. achei melhor num criar outro topoico.. vou editar o titulo só.. vejam só, depois q eu enviei por Cookies o q eu queria depois de clicar no link.. (O valor chegou direitinhu.. já conferi).. tem isso na pagina ..

db=Server.Mappath("banco.mdb")

strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& db &";Jet OLEDB:Database Password=258544c;"

set conn = server.createobject("adodb.connection")

conn.open (strconn)

set rs = server.createobject("adodb.recordset")

delecod = request.cookies("Gremio")("CODPM")

csql = " select * from pms where Código='"&Cint(delecod)&"' "

set rs = conn.execute(csql)

ele da erro de

Tipo de dados imcompatível na expressão de critério.

na linha da instrução sql.. eu deduzi q devia ser um erro porque no BD o campo é autonumeração.. e esse valor q eu passei por cookies ai.. depois de tanta coisa q eu fiz com ele.. eu nem sei mais de q tipo ele é.. ai eu botei ali o Cint(..) pra converter ele pra inteiro.. mas mesmo assim o erro continua... seis sabem como resolver isso? valeuss

[vicoluis]

db=Server.Mappath("banco.mdb")

strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& db &";Jet OLEDB:Database Password=258544c;"

set conn = server.createobject("adodb.connection")

conn.open (strconn)

set rs = server.createobject("adodb.recordset")

delecod = request.cookies("Gremio")("CODPM")

csql = " select * from pms where Código="&Cint(delecod)&" "

set rs = conn.execute(csql)

tirei as aspas simples do seu codigo antigo... na sintaxe do where, por achar q seu campo é id automatico,... você so usa aspas simples, para campos do tipo texto ou memorando...

copia e cola... e ve se funciona...

[pacokaca]

valeu velho.. deu certinhu.. brigadao mesmo! =)