Problemas com if

[Leonardo Bemfica 0]

Olá pessoal,

 

Estou com problemas no seguinte.

Eu tenho varias tabelas com informações em um banco. Porem uma delas é chamada no codigo com id atraves QueryString.

Atraves disso eu estou tentando usar if para chamar o conteudo em coutras tabelas com conteudos supostamente adicionados na primeira tabela.

O problema acontece quando na primeira tabela não possui o dado que eu chamo. Aí da um erro com os meus ifs.

Eu não estou dando conta de fazer eles na seguinte condição.

Um exemplo do que eu quero é o seguinte:

 

cod_guia = Request.QueryString("COD")
Set rsGuiaA = Conexao.Execute("SELECT * FROM guia_a WHERE id_guia_a = "&cod_guia&" ")
cod_socio = rsGuiaA("id_socio")
Set rsSocio = Conexao.Execute("SELECT * FROM socio WHERE id_socio = "&cod_socio&" ")
cod_dependente = rsGuiaA("id_dependente")
if cod_dependente.eof  then
	  Set rsDependente = Conexao.Execute("Select *From dependente WHERE id_dependente = "&cod_dependente&" ")
end if 
cod_medico = rsGuiaA("id_medico")
if cod_medico.eof then
	  Set rsMedico = Conexao.Execute("Select *From medico WHERE id_medico = "&cod_medico&" ")
end if 
cod_laboratorio = rsGuiaA("id_laboratorio")
if cod_laboratorio.eof then
	  Set rsLaboratorio = Conexao.Execute("Select *From laboratorio WHERE id_lab = "&cod_laboratorio&" ")
end if 
cod_hospital = rsGuiaA("id_hospital")
if cod_hospital.eof then
	  Set rsHospital = Conexao.Execute("Select *From hospital WHERE id_hospital = "&cod_hospital&" ")
end if 

 

Bom é mais ou menos isso que eu quero.

 

Será que vocês conseguem me dar uma luz nisso!

[Mário Monteiro 179]

Pelo que vi falta um NOT em seu IF

 

Em vez de

 

if cod_dependente.eof  then

 

Faça

 

if NOT cod_dependente.eof  then

 

Lá em cima tem sql sem IF para testar se tem o que consultar antes