Jump to content


Photo

Link Vindo De Um Bd


  • Faça o login para participar
3 replies to this topic

#1 Dinho de Marcco

Dinho de Marcco

    Novato no fórum

  • Usuários
  • 7 posts
  • Sexo:Não informado

Posted 13/04/2009, 23:04

Galera, tenho um BD em access e na tabela tem o cadastro do site do cliente. Nos resultados da busca do site, os dados do endereço relativo ao cliente aparecem, mas não consigo colocar um link com blank para que a pessoa que acessar esses dados possa ver o site do cliente tb. Alguém pode me ajudar a colocar um link com blank em dados vindo do bd?

#2 Renan L. Queiroz

Renan L. Queiroz

    Mestre

  • Usuários
  • 690 posts
  • Sexo:Masculino
  • Localidade:Brasilia - DF

Posted 14/04/2009, 08:29

Para o esquema do link, deixa da forma que está!
Seria interessante colocar uma informação à mais no banco ... exe: tipo_abertura varchar(5).
Ai vc atribui o "blank" ao link e colocar na tag o referente.
<a href="<%=rs("link")%>" <%=rs("tipo_abertura")%>><%=rs("descLink")%></a>
Caso não seja nenhum insira valores em branco!
Veja se isso lhe ajuda! ;-)

Especialidade: Desenvolvimento e Banco de Dados.


Este post lhe ajudou? Agradeça: Posted Image


#3 Dinho de Marcco

Dinho de Marcco

    Novato no fórum

  • Usuários
  • 7 posts
  • Sexo:Não informado

Posted 16/04/2009, 10:06

Olá Renan.
Obrigado pela ajuda mas minha página é em asp e meu BD é Access. Aparentemente seu código é para PHP com My SQL, estou certo?
Abraços

#4 Renan L. Queiroz

Renan L. Queiroz

    Mestre

  • Usuários
  • 690 posts
  • Sexo:Masculino
  • Localidade:Brasilia - DF

Posted 16/04/2009, 10:10

Não colega ... ali no código é simplesmente um recordset,
caso não conheça de uma olhada neste link: "ADO".

Vou postar um exemplo aqui para vc!
Me dê alguns minutos! ;-)

---

Ta ai:

Primeiro cria um objeto conn e rs!
<%
	caminho_banco = Server.MapPath("banco.mdb") ' arquivo de dados
	drv = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & caminho_banco ' string de conexao
	Set Conn = Server.CreateObject("ADODB.Connection") ' objeto conn
	Set rsListar = Server.CreateObject("ADODB.Recordset") ' objeto que recebera os dados requisitados no banco
	Conn.Open drv 'Abrindo conexao

	sql = "select link, descLink, tipoAbertura from tabelaLinks" ' script para requisicao dos dados no banco

	rsListar.Open sql, Conn, 3, 3 ' da acesso ao rs para pegar os valos do banco
%>
Agora para impressão ficaria assim:
<%
While Not rsListar.EOF ' enquanto nao for o final do "arquivo"
%>
	<a href="<%=rs("link")%>" <%=rs("tipoAbertura")%>><%=rs("descLink")%></a> <br/><br/>
<%
		rsListar.movenext ' próximo registro
Wend
%>
Neste caso aqui serão impressos todos os link cadastrados na tabela!

Espero que possa ajudar!

Edição feita por: Renan L. Queiroz, 16/04/2009, 10:24.

Especialidade: Desenvolvimento e Banco de Dados.


Este post lhe ajudou? Agradeça: Posted Image





1 user(s) are reading this topic

0 membro(s), 1 visitante(s) e 0 membros anônimo(s)

IPB Skin By Virteq