(Resolvido) Update Com Checkbox

[AlexMunhoz]

Ola amigos estou fazendo um controle de usuários e estou com uma duvida enorme. Segue imagem.

eu preciso fazer um update quando eu clicar no botão atualizar, e ele vai me atualizar os campos exibidos, os que tiverem marcado ele coloca '1' e nos que estão desmarcados e coloca '0'

Agradeço antecipadamente.

[Rafael Spilki]

Bom... acho que isso é bem tranquilo...

Uma condicional simplesinha resolve... basta colocar o valor "1" nos checkbox, ou seja, quando os mesmos estiverem marcados o valor será 1... caso contrário será 0, ou seja:

if chcbox = "" then
chcbox = "0"
end if

'update
...set campoquesequeratualizar = '"&chcbox&"'...

Obs.: Parabéns pelo layout do painel... tá bem bacana!

[]'s Rafael Spilki

[AlexMunhoz]

if chcbox = "" then
chcbox = "0"
end if

'update
...set campoquesequeratualizar = '"&chcbox&"'...

Vlw amigo.. Rafael, eis outra duvida... estou carragando meu carregando os meus checkbox assim.

<form action="definir_acessos.asp?ShowID=<%=request.QueryString("ShowID")%>" method="post">

<% 

    Dim ssql,ors
    
    set ors = server.CreateObject("ADODB.Recordset")
        
    ssql = empty
    ssql = ssql & " SELECT * FROM user_acessos "
    ssql = ssql & "    WHERE userID = '" & Request.QueryString("ShowID") & "'"

    abre_conexao
    
    ors.cursorlocation = 3
    ors.cursortype = 2
    
    ors.open ssql, odb

    While not ors.eof
    
        registro = "1"
    
    if ors("liberada") = 1 then
    
        checked = "checked='checked'"
        
    else
        
        checked = empty
        
    end if
    
    %>
        <div id="quadro_menu">
    
        <img src="../imagens/icones_menu/<%=ors("imagem")%>" height="90"/><br />
        <input name="checkbox" type="checkbox" value="<%=ors("user_acessosID")%>" <%=checked%> />
        </div>
    <%
        ors.movenext
    
    wend
    
    if not registro = empty then

%>
    <div id="quadro_menu">
        
        <input type="image" src="../imagens/icones_menu/atualizar.gif" name="Ok" />
        
    </div>
<%        
    end if
        
    fecha_conexao
%>
    
</form>

não sei se essa é a forma correta de se fazer..

o que está pegando é o seguinte...

eu quero fazer por ex.. algumas seleções desmarcar uns e marcar outras e atualizar tudo ao mesmo temo apos atualizar....

está é a grande duvida...

Nunca fiz assim por isso não sei nem se estou carregando os cheks da forma correta...

Agradeço... Já estou zlagt-zump :wacko: da cabeça com esse problema...

Editado Abril 7, 2009 por AlexMunhoz

[Rafael Spilki]

Acho que o melhor é usar ajax pra isso... nesse caso terá que postar esse dúvida no forum de Ajax, JavaScript, XML, DOM ... o link direto do forum é:

http://scriptbrasil.com.br/forum/index.php?showforum=6

Abração

[AlexMunhoz]

Acho que o melhor é usar ajax pra isso... nesse caso terá que postar esse dúvida no forum de Ajax, JavaScript, XML, DOM ... o link direto do forum é:

http://scriptbrasil.com.br/forum/index.php?showforum=6

Abração

amigo Rafael, Muito obrigado pela ajuda...

Depois de Muita luta resolvi o problema.

segue a solução para quem precisar.

Primeiro Carregue os CheckBox da seguinte forma.

<input name="<%=ors("menu")%>" type="checkbox" />

agora recupero o valor da seguinte forma.

abre_conexao

    Dim ors, ssql
    
    set ors = server.CreateObject("ADODB.Recordset")
    
    ssql = empty
    ssql = ssql & " SELECT menu FROM user_acessos "
    ssql = ssql & " WHERE UserID = " & request.QueryString("ShowID")
    
    ors.cursorlocation = 3
    ors.cursortype = 2
    
    ors.open ssql, odb    
    
    while not ors.eof
        
        ssql = empty
        ssql = ssql & " UPDATE user_acessos "

        if request.Form(ors("menu")) = "on" then
        
            ssql = ssql & "    Set Liberada = 1    "
        
        else 
            
            ssql = ssql & "    Set Liberada = 0    "
        
        end if

        ssql = ssql & "  WHERE menu = '" & ors("menu") & "'"
        ssql = ssql & "     AND UserID = '" & request.QueryString("ShowId") & "'"
        
        odb.execute ssql 

        ors.movenext
    
    wend        
    
fecha_conexao

Abraço a todos. :blush: