Ir para conteúdo

POWERED BY:

Arquivado

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

fabiosc80

Problema com EOF

Por , em ASP Clássico

Recommended Posts

fabiosc80    0

fabiosc80
Postado

Preciso fazer com que caso não existam jobs cadastrados que nesse código de a mensagem que não existem jobs cadastrados.O problema é que tem um select que pega dados de duas tabelas. OQue faço?olhem o código:é la em baixo no loop.____________________________________________________________<!--#include file="conexao.asp"--><%dim codigo,sqlcodigo = request.querystring("cod")'string para exibir os dadossql = "SELECT Cadastro.Codigo AS Cadastro_Codigo, Cadastro.DataInclusao, Cadastro.Nome, Cadastro.RazaoSocial, Cadastro.NomeFantasia, Cadastro.CNPJCPF, Cadastro.RGIE, Cadastro.Endereco, Cadastro.Bairro, Cadastro.CEP, Cadastro.Cidade, Cadastro.UF, Cadastro.Telefone, Cadastro.Site, Cadastro.Email, Cadastro.Senha, Job.Codigo AS Job_Codigo, Job.NomeJob, Job.CodigoJob FROM Cadastro LEFT JOIN Job ON Cadastro.Codigo = Job.Codigo where cadastro.codigo = " & codigo%><html><head> <title>Untitled</title></head><body><%'executa a instrução SQLDim BC : AbreBancoSet TB = BC.Execute(sql)%><center><font color="#230697" face="Verdana" size="4"><b>Dados do Cliente</b></font></center><br><font color="#00000" face="Verdana" size="1"><b><%=TB("Nome")%><br><%=TB("RazaoSocial")%>  <%=TB("NomeFantasia")%><br><%=TB("Endereco")%>  <%=TB("Bairro")%><br><%if len(TB("Cep")) < 8 then%><%="0"%><%=TB("Cep")%><%else%><%=TB("Cep")%><%end if%>  <%=TB("Cidade")%>  <%=TB("UF")%><br><a href="http://<%=TB("Site")%>" target="<%=TB("Site")%>"><%=TB("Site")%></a>  <%=TB("Email")%></b></font><br><hr width="95%" align="center"><center><a href="jobinclui.asp?id=<%=(codigo)%>">Incluir Job</a></center><% If TB.EOF = "" then Response.write "Não existem Jobs Abertos..."ELSE While not TB.EOF%>     <a href="http://#" onClick="window.open('frameadmin.asp?cod=<%=TB("CodigoJob")%>','Janela1','toolbar=no,location=no,directories=no,status=yes,menubar=no,status=no,scrollbars=yes,resizable=no,width=700,height=500'); return false;"><%=TB("CodigoJob")%></a><a href="jobexcluir.asp?id=<%=TB("CodigoJob")%>"><img src="imagens/del.gif" border="0"></a><br> <%TB.movenextWendEnd IfTB.Close'fecha a conexaoFechaBanco Set TB = Nothing%> </body></html>___________________________________________________________AbraçosFábio

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