Coisa De Doido Com Loop

[foxbh]

Galera, vo tenta explica uma coisa que to querendo fase funciona aqui, se ´vc's poderem me ajudar pra ve se vai da certo eu agradeço, seginte, tenho uma tabela no BD que me lista tos os cursos da escola, tipo assim

Da este resultado e mostrado assim

Para o admim escolher os cursos que o professor ira ministrar, e o resultado e gravado no BD assim Happy I, Highway I, Highway III, Highway IV, High Up I, High Up II, Hill II, High Jump I que são os cursos correspondentes ao prfessor.

Agora que eu acho que expliquei, vo fala o que eu quero faser.

na hora de editar este professor eu queria que tivesse uma forma de que os campos selecionados anteriormente já me retornassem marcados , pra mim poder editar eles , já tentei faser de tudo quanto e jeito e sempre me da um loop maluco aqui que num vem nenhum cheqbox selecionado, alguém poderia me dar uma luz,

o codgo que to usando pra dar o loop e este

<% do while not RSB.eof %>
<%
TURMAS = RSUP("TURMAS")
a = split(TURMAS,",")

for i=0 to ubound(a)
TESTE = a(i)
%>    	
<input type="checkbox" name="TURMA" value="ON" <% If TESTE = RSB("TURMA") Then %>checked<% Else%> <%End If%>> - <%=RSB("TURMA")%><br>
<%
next
%>
<% 
RSB.movenext 
loop 
%>  	
	

Espero que alguém tenha entendido alguma coisa........

valeu !!!

[fertel]

E se fizer assim:

<%while not RSB.eof %>

<%

TURMAS = RSUP("TURMAS")

a = split(TURMAS,",")

for i=0 to ubound(a)

TESTE = a(i)

%>

<input type="checkbox" name="TURMA" value="ON" <% If TESTE = RSB("TURMA") Then %>checked<% Else%> <%End If%>> - <%=RSB("TURMA")%><br>

<%

next

%>

<%

RSB.movenext

Wend

%>

[foxbh]

Da a mesma coisa, fica assim , somente com o primeiro chekbox selecionado

- Happy I

- Happy I

- Happy I

- Happy I

- Happy I

- Highway I

- Highway I

- Highway I

- Highway I

- Highway I

- Highway III

- Highway III

- Highway III

- Highway III

- Highway III

- Highway IV

- Highway IV

- Highway IV

- Highway IV

- Highway IV

- High Up I

- High Up I

- High Up I

- High Up I

- High Up I

- High Up II

- High Up II

- High Up II

- High Up II

- High Up II

- Hill II

- Hill II

- Hill II

- Hill II

- Hill II

- High Jump I

- High Jump I

- High Jump I

- High Jump I

- High Jump I

- High Jump II

- High Jump II

- High Jump II

- High Jump II

- High Jump II

- Horizon II

- Horizon II

- Horizon II

- Horizon II

- Horizon II

- Hola III

- Hola III

- Hola III

- Hola III

- Hola III

- Hola II

- Hola II

- Hola II

- Hola II

- Hola II

- Habla II

- Habla II

- Habla II

- Habla II

- Habla II

[bolomaster]

como você esta fazendo o select no banco de dados

[foxbh]

O select ta vindo atraves de um split porque tenho que separar os cursos que são gravados deste modo Happy I, Highway I, Highway III, Highway IV, High Up I, High Up II, Hill II, High Jump I

[Guest Guest]

SqlProf = "SELECT * from Professores Where CODIGO_PROFESSOR LIKE "&VARIAVEL&""

Set rsProf = Conn.execute(sqlProf)

SqlCursos = "SELECT * from Cursos"

Set rsCursos = Conn.execute(sqlCursos)

xcursos_prof = Split(rsPROF("cursos"),",")

Do While Not rsCursos.Eof

For i = 0 To ubound(xcursos)

If xcursos(i) = rsCursos("Curso") Then

<input type="checkbox" name=chk & xcursos(i) checked>

Exit for

End If

Next

rsCursos.Movenext

Loop

É um pouco Lento esse processo mas pra você que tem poucos registros vai ser eficiente..