while e array

[luamm 0]

Salve galera,

 

Tô com uma dúvida que imagino que seja fácil resolver, mais eu realmente não sei... Seguinte:

 

Tenho um campo em uma tabela chamado "detalhe", onde os registros foram gravados com "," para separar exemplo: "1, 2, 3, 4"

Agora eu preciso fazer o seguinte, tenho um formulário que possui checkboxs dinâmicos, assim:

 

<%

SelDetails = "SELECT * FROM Details"

Call RodarQuery(0, SelDetails, RS)

 

While not RS.eof

%>

 

<input name="Details" type="checkbox" value="<%=RS("id_Details")%>" checked><%=RS("Details_Eng")%>

 

<%

RS.Movenext

Wend

 

Call DestroiRS(0, RS)

%>

 

Só que estes checkboxs devem já vir checados de acordo com os valores do campo que eu mencionei acima, sei que devo usar uma array para separar os valores, mais como posso comparar cada valor dentro do while acima????

 

Por favor, quem puder me ajude http://forum.imasters.com.br/public/style_emoticons/default/ermm.gif

É importante !!!

Desde já agradeço,

BJS

http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

[Mário Monteiro 179]

poe um if cara<input name="Details" type="checkbox" value="<%=RS("id_Details")%>" <% IF INSTR(RS("id_Details"),LISTADEIDS) > 0 THEN response.write("checked")%>><%=RS("Details_Eng")%>

[luamm 0]

Olá marioufpa,

Obrigada pela sua resposta... Mais tenho dúvidas!

 

Eu fiz dessa forma:

 

 

<%

SelDetails = "SELECT * FROM Details"

Call RodarQuery(0, SelDetails, RS)

 

While not RS.eof

%>

 

<input name="Details" type="checkbox" value="<%=RS("id_Details")%>" <% IF INSTR(RS("id_Details"), rsHeader("id_Detail")) > 0 THEN response.write("checked")%>><%=RS("Details_Eng")%>

 

<%

RS.Movenext

Wend

 

Call DestroiRS(0, RS)

%>

 

e Não funcionou... Daí fiz dessa forma para testar:

 

a = "1"

e = "1, 2, 11, 3, 4, 51"

ret = InStr(a, e)

response.write ret

 

e Me respondeu "0" será que esta certa esta sintaxe? Não falta nada?

 

Aguardo sua resposta,

BJS

LUAMM B)

[luamm 0]

Descobri galera,

 

Seguinte:

 

ASP

[*]

 

[*]

 

[*]<%

 

[*]SelDetails = "SELECT * FROM Details"

 

[*]Call RodarQuery(0, SelDetails, RS)

 

[*]

 

[*]While not RS.eof 

 

[*]

 

[*]  xx = ""

 

[*]  lista = split(rsHeader("id_Detail"),",")

 

[*]  FOR contador = 0 TO UBound(lista)

 

[*]

 

[*]  if Cint(RS("id_Details")) = Cint(TRIM(lista(contador))) then

 

[*]  xx = "checked"

 

[*]  end if

 

[*]  

 

[*] NEXT

 

[*] %>

 

[*] 

 

[*]<input name="Details" type="checkbox" value="<%=RS("id_Details")%>" <%=xx%>><%=RS("Details_Eng")%>

 

[*]

 

[*]<%

 

[*]RS.Movenext

 

[*]Wend 

 

[*]

 

[*]Call DestroiRS(0, RS)

 

[*]%>

 

[*]

 

 

É isso aí...

Abrçs,

LUAMM http://forum.imasters.com.br/public/style_emoticons/default/clap.gif