Ir para conteúdo

POWERED BY:

Arquivado

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

Cesão

Edit de Checkbox

Por , em ASP Clássico

Recommended Posts

Cesão    1

Cesão
Postado

Gostaria de saber o seguinte... na hora da inserção de um registro existiam varios campos checkbox (pessoas) que os nomes eram inseridos todas no mesmo campo (users) da tabela (tb_noticias)... assim, a noticia inserida soh poderia ser vista por essas pessoas selecionadas... dentro do campo o conteudo ficava assim (Cesar, Arceu, Eduardo, Marco)... agora, gostaria de saber como fazer para na hora de editar o registro, manter esses checkbox dessas pessoas selecionados?

Compartilhar este post

Link para o post
Compartilhar em outros sites

Salgado    4

Salgado
Postado

Quando for montar a tela você pode usar o InStr para verificar se o nome está no campo.

Compartilhar este post

Link para o post
Compartilhar em outros sites

Cesão    1

Cesão
Postado

Quando for montar a tela você pode usar o InStr para verificar se o nome está no campo.

Mas como eu faço isso? Nao sei usar essa InStr

Compartilhar este post

Link para o post
Compartilhar em outros sites

Salgado    4

Salgado
Postado

Mostre como está o seu script de edição.

Compartilhar este post

Link para o post
Compartilhar em outros sites

Cesão    1

Cesão
Postado

<!--#include file="conn/conexao.asp"--><!--#include file="espiao.asp"--><%Response.Expires = -1 : Response.Buffer = false Response.addHeader "pragma", "no-cache"Response.CacheControl = "Private"%><html><head><title>Exsa</title><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"><link href="css/style.css" rel="stylesheet" type="text/css"><script language="javascript" src="conn/funcoes.js"></script></head><%id_newinv = Request("idn")sql="SELECT * FROM tb_newinv WHERE id_newinv="&id_newinv set rs_invest=conexao.execute(sql)sql="SELECT * FROM tb_investidores ORDER BY nome DESC" set rs_inv=conexao.execute(sql) sql="SELECT * FROM tb_invsetor ORDER BY id_setor" set rs_set=conexao.execute(sql)%><script language="vb script:history.back();"></td> </tr> </table></td> </tr> <tr> <td align="center"><form action="add_inv_news.asp" method="post" enctype="multipart/form-data" name="form1"> <table width="50%" border="0" cellpadding="0" cellspacing="0" class="txts"> <tr> <td colspan="2">Preencha o formulário corretamente: </td> </tr> <tr> <td> </td> <td> </td> </tr> <tr> <td width="20%"><b>Eempreendimento:</b></td> <td width="80%"><input name="titulo" type="text" class="cxtxt" id="titulo" value="<%=rs_invest("titulo")%>"></td> </tr> <tr> <td><b>Data:</b></td> <td><input name="data" type="text" class="cxtxt" id="data" value="<%=rs_invest("data")%>" readonly></td> </tr> <tr> <td><b>Texto:</b></td> <td><textarea name="noticia" cols="50" rows="5" class="cxtxt" id="noticia"><%=rs_invest("noticia")%></textarea></td> </tr> <tr> <td><b>Arquivo:</b></td> <td><input name="files" type="file" class="cxtxt" id="files"> <input name="files2" type="hidden" id="files2" value="<%=rs_invest("files")%>"></td> </tr> <tr> <td><b>Setor:</b></td> <td><select name="setor" class="cxtxt" id="setor"> <option value="CRONOGRAMA DE OBRAS">CRONOGRAMA DE OBRAS</option> <option value="CUSTOS DO EMPREENDIMENTO">CUSTOS DO EMPREENDIMENTO</option> <option value="CUSTOS DA EXECUÇÃO DO EMPREENDIMENTO">CUSTOS DA EXECUÇÃO DO EMPREENDIMENTO</option> <option value="EXECUÇÃO DO EMPREENDIMENTO">EXECUÇÃO DO EMPREENDIMENTO</option> <option value="FOTOS DE ACOMPANHAMENTO DA OBRA">FOTOS DE ACOMPANHAMENTO DA OBRA</option> <option value="VIDEOS DE ACOMPANHAMENTO DA OBRA">VIDEOS DE ACOMPANHAMENTO DA OBRA</option> </select></td> </tr> <tr> <td> </td> <td> </td> </tr> <tr> <td colspan="2" bgcolor="#CCCCCC"><b>Para quem você deseja enviar esta notícia?</b></td> </tr> <tr> <td colspan="2" bgcolor="#CCCCCC"> </td> </tr> <%do while not rs_inv.eof%> <tr> <td height="20" colspan="2" bgcolor="#CCCCCC"> <input name="users" type="checkbox" id="users" value="<%=rs_inv("login")%>"> <%=rs_inv(1)%></td> </tr> <tr> <td colspan="2" bgcolor="#999999"><img src="img/spacer.gif" width="1" height="1"></td> </tr> <%rs_inv.movenext%><%loop%> <tr> <td colspan="2" bgcolor="#CCCCCC"> </td> </tr> <tr> <td> </td> <td> </td> </tr> <tr> <td> </td> <td><input name="Submit" type="submit" class="cxtxt" value="Inserir Notícia"></td> </tr> </table> </form></td> </tr> </table> </td> </tr></table></body></html><%rs_inv.CloseSet rs_inv = Nothingconexao.CloseSet conexao = Nothing%>

Compartilhar este post

Link para o post
Compartilhar em outros sites

Salgado    4

Salgado
Postado

Nesse trecho:

<%do while not rs_inv.eof%>
<tr>
<td height="20" colspan="2" bgcolor="#CCCCCC">
<input name="users" type="checkbox" id="users" value="<%=rs_inv("login")%>">
<%=rs_inv(1)%></td>
</tr>
<tr>
<td colspan="2" bgcolor="#999999"><img src="img/spacer.gif" width="1" height="1"></td>
</tr>
<%rs_inv.movenext%><%loop%>

Faça a seguinte adaptação:

<%do while not rs_inv.eof%>
<tr>
<td height="20" colspan="2" bgcolor="#CCCCCC">
<input name="users" type="checkbox" id="users" value="<%=rs_inv("login")%>"<%If InStr(RSqueContémANoticia("CampoDoUsuario"),rs_inv("login"))<>0 Then%> CHECKED<%End If%>>
<%=rs_inv(1)%></td>
</tr>
<tr>
<td colspan="2" bgcolor="#999999"><img src="img/spacer.gif" width="1" height="1"></td>
</tr>
<%rs_inv.movenext%><%loop%>

Troque RSqueContémANoticia("CampoDoUsuario") pelo correpondente correto.

Compartilhar este post

Link para o post
Compartilhar em outros sites

Cesão    1

Cesão
Postado

Putz, funcionou perfeitamente!!!!Obrigado mesmo Salgado!!!!!

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