1 reply to this topic

[shogun89]

Olá!

 

Estou montando um pequeno relatório, onde tenho alunos e grupos.

 

Fiz o Select:

 

<%


dim rsAluno2, Grupo2


sql = "select * from parceiro where id_parceiro = "& rsProf("id_parceiro")
set rsAluno2 = GetRS(sql)


sql = "select * from grupos where id_grupo = "& rsProf("id_parceiro")
set rsGrupo2 = GetRS(sql)


%>


<%=rsAluno2("nome")%>

 

* Como posso fazer para que no response write caso não exista esse aluno, pesquisar na tabela de grupos e responder a <%rsGrupo2("ds_grupo")%> ?

 

Obrigado!

 

[Danilomaru]

Veja aí se ajuda:

dim rsAluno2, rsGrupo2

sql = "select * from parceiro where id_parceiro = "& rsProf("id_parceiro")
set rsAluno2 = GetRS(sql)

If rsAluno2.EOF Then
    Response.Write("Nenhum Nome")
    sql = "select* from grupos where id_grupo = "& rsProf("id_parceiro")
    set rsGrupo2 = GetRS(sql)
    If rsGrupo2.EOF Then
        Response.Write("Nenhum Grupo")
    Else
        Response.Write(rsGrupo2("ds_grupo"))
    End If
Else
    Response.Write(rsAluno2("nome"))
End If