Ir para conteúdo

POWERED BY:

Arquivado

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

marvi

Contar checkbox selecionado

Por , em ASP Clássico

Recommended Posts

marvi    0

marvi
Postado

Pessoal, tenho uma dúvida que pode ser simples, mas não conseguir resolver.

 

Quero ver o número de checkbox que o usuário selecionou para que eu possar contar a quantidade de checkbox selecionado e assim poder dar um loop com essa quantidade de checkbox selecionado para inserir no banco de dados as informações, como fazer?

 

Tipo:

 

Há três campos:

 

checkbox A

 

checkbox B

 

checkbox C

 

Mas aí a pessoa seleciona só o A e o B e cadastra no banco. Sendo assim, preciso de algo que informe quantos checkboxs foram selecionados, que neste exemplo foram 2 (o A e o B ), e assim só dar dois loops para inserir o checkbox A e o checkbox B no banco, cadastrando-os.

 

Entendeu?

 

Desde já, agradeço

Compartilhar este post

Link para o post
Compartilhar em outros sites

xanburzum    169

xanburzum
Postado

olhaeste exemplo:

 

<%
Set objCon = Server.CreateObject("ADODB.Connection")
objCon.Open "Data Source=C:\base_de_dados.mdb;Provider=Microsoft.Jet.OLEDB.4.0;"

If Not IsEmpty(Request.Form) Then
  Set objRS = Server.CreateObject("ADODB.Recordset")
  objRS.CursorLocation = 2
  objRS.CursorType = 0
  objRS.LockType = 3
  strQ = "SELECT * FROM tabela"
  objRS.Open strQ, objCon, , , &H0001
  lista = Request.Form("ano")
  lista = Replace(lista, " ", "")
  lista = Replace(lista, ",", "-")
  lista = "-" & lista & "-"
  objRS("ano") = lista
  objRS.Update
  objRS.Close
  Set objRS = Nothing
%>

Os dados foram atualizados com sucesso.
<br><a href="<%=Request.ServerVariables("SCRIPT_NAME")%>">Clique aqui</a> para visualizar a Checkbox

<%
Else
  strQ = "SELECT * FROM tabela"
  Set objRS = objCon.Execute(strQ)
  If Not objRS.EOF Then
%>

<form action="<%=Request.ServerVariables("SCRIPT_NAME")%>" method="post">
<%For i = 2000 to 2005%>
<input type="checkbox" name="ano" value="<%=i%>" <%If InStr(objRS("ano"),"-" & i & "-") > 0 Then Response.Write "checked"%> >Ano de <%=i%><br>
<%Next%>
<br><br><input type="submit" value="Enviar">
</form>

<%
  End If
  Set objRS = Nothing
End If

objCon.Close
Set objCon = Nothing
%>

existe este tb

 

<html>
<head>
<script Language="JavaScript"> 
function copia(campo_origem,campo_fim) {
if(campo_origem.checked)
{
	campo_fim.value += campo_origem.value + '\r\n';
}
else
{
	campo_fim.value = campo_fim.value.toString().replace(campo_origem.value,"");
	campo_fim.value = campo_fim.value.toString().replace("\r\n","");
}
}
</script> 
 
</head>
 
<body>
 
<input type="checkbox" name="campo_origem" value="Opção 1" size="20" onclick="copia(this,campo_fim);" >Opção 1
<br>
<input type="checkbox" name="campo_origem" value="Opção 2" size="20" onclick="copia(this,campo_fim);" >Opção 2
<br>
<input type="checkbox" name="campo_origem" value="Opção 3" size="20" onclick="copia(this,campo_fim);" >Opção 3
<br><br>
<textarea name="campo_fim" rows="5" cols="35"></textarea>
 
 
</body>
</html>

Compartilhar este post

Link para o post
Compartilhar em outros sites

marvi    0

marvi
Postado

Mas, aí está gerando os cheks dinâmicos, não quero gerar, quero pegar os cheks selecionado depois do submit em outra página, antes de realizar o insert, entende?

Compartilhar este post

Link para o post
Compartilhar em outros sites

xanburzum    169

xanburzum
Postado

com o 2º você consegue recuperar os selecionados...

Compartilhar este post

Link para o post
Compartilhar em outros sites

xanburzum    169

xanburzum
Postado

tb pode

 

td_produtos = split(Request.Form("qtd_produtos"),",")
if qtd_produtos = ""
produtos= Split(Request.Form("produtos"), ",")

For i = 1 To Request.Form("produtos").Count

Response.write request.form("produtos")(i)&"<BR>" & request.form("qtd_produtos")(i)&"<BR>"

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

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

  Aceito