cases!!

[Filipe_Moraes 15]

Olha, ja to enchendo o imasters de topicos (aiai, ja ja me cobram! ;-) ), é a vida, quem quer aprender...

Mas fui fazer um RadionGroup que se chamava "RadionGroup1", depois que o user escolhe, é redirecionado para a pagina "casepersonagem.asp" que é a seguinte:

<%Set Conn = Server.CreateObject("AdoDb.Connection")Conn.provider="Microsoft.Jet.OLEDB.4.0"Conn.connectionstring=Server.Mappath("database/database.mdb")Conn.openradiongroup1=request.form("radiongroup1")select case radiongroup1case "p1"set RS = conn.execute(" update inforuser set personagem = '1' ")case "p2"set RS = conn.execute(" update inforuser set personagem = '2' ")case "p3"set RS = conn.execute(" update inforuser set personagem = '3' ")case "p4"set RS = conn.execute(" update inforuser set personagem = '4' ")case "p5"set RS = conn.execute(" update inforuser set personagem = '5' ")end selectResponse.Redirect ("historia.asp")%>

Como eu sei "muito" de asp, só queria saber uma coisa, PORQUE ESTA COISA NÃO FUNCIONA???

Agradeço!

[Filipe_Moraes 15]

lucas, mas tem que fazer um update na tabela de acordo com o valor que eu coloquei la em cima!!Agradeço!

[Filipe_Moraes 15]

sim ja testei, coloquei o seguinte:

 

<%radiongroup1=request.form("radiongroup1")select case radiongroup1case "p1"response.write("você escolheu o p1")case "p2response.write("você escolheu o p2")...end select%>

Funcionou, o select case funciona perfeitamente, mas agora tenho que fazer o update no lugar do response.write

[Filipe_Moraes 15]

Lucas, ja sei o que se passa, é por causa do global.asa, tipo, fiz uma para contar qts pessoas estão online e as sessões terminam em 1minuto, antes disso tudo o que eu fizer não atualiza, apesar de ja está gravada na bd!! Esta aqui o global.asa, como posso resolve isto??? tipo, abrindo session no inicio de cada página e ao mudar de pagina, terminar esta session e abrir uma nova na outra pagina relacionada ao mesmo assunto??

<script LANGUAGE="VBScript" RUNAT="Server"> Sub Application_OnStart application("activevisitors")=0 End Sub Sub Session_OnStart Session.Timeout = 1Session("Star")= Nowapplication.lock application("activevisitors")=application("activevisitors")+1 application.unlock End Sub Sub Session_OnEnd application.lock application("activevisitors")=application("activevisitors")-1 application.unlock End Sub </SCRIPT>

[Filipe_Moraes 15]

existe?? podes me dizer??? e obrigado pela a sua ajuda!!!

[Filipe_Moraes 15]

ok, mt obrigado!!