ufal Postado Janeiro 8, 2009 Denunciar Share Postado Janeiro 8, 2009 obs: Espero ter contribuído para outros, pois nenhum dos fóruns está mais detalhado do que esse, a respeito desse assunto... valeu um abraço.EnnioPARA O ACCESSVocê cria uma tabela no meu caso criei como tabela1nome do campo você digita no meu caso chamei de imagemtipo de dado texto nome do campo você digita no meu caso chamei de imagem1tipo de dado textodepois no modo folha você digita o caminho para a coluna imagem e imagem1ex:imagem/imagem/agenda1.gifimagem1/imagem/ennio.jpgNo lado do ASP<%@ Language=VBScript %> <% set dados=server.CreateObject("ADODB.Connection") dados.Open "DBQ=" & server.MapPath("teste.mdb")& ";Driver={Microsoft Access Driver (*.mdb)}","username","password" set rs=server.CreateObject("ADODB.recordset")'cria objeto rs sql="select * from tabela1" set rs=dados.Execute(sql) while not rs.EOF %> <img src="<%=(rs.Fields.Item("imagem").Value)%>"> <b> <img src="<%=(rs.Fields.Item("imagem1").Value)%>"> <b> <% rs.MoveNext wend rs.Close dados.Close %> <HTML> <HEAD> </HEAD> <BODY> </BODY> </HTML> Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Jonathan Queiroz Postado Janeiro 9, 2009 Denunciar Share Postado Janeiro 9, 2009 A intenção foi boa mas, sempre que necessário, utilize as tag's [code] e [/code] (ou [html] e [/html], quando necessário) Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
ufal
obs: Espero ter contribuído para outros, pois nenhum dos fóruns está mais detalhado do que esse, a respeito desse assunto... valeu um abraço.
Ennio
PARA O ACCESS
Você cria uma tabela no meu caso criei como tabela1
nome do campo você digita no meu caso chamei de imagem
tipo de dado texto
nome do campo você digita no meu caso chamei de imagem1
tipo de dado texto
depois no modo folha você digita o caminho para a coluna imagem e imagem1
ex:
imagem
/imagem/agenda1.gif
imagem1
/imagem/ennio.jpg
No lado do ASP
<%@ Language=VBScript %> <% set dados=server.CreateObject("ADODB.Connection") dados.Open "DBQ=" & server.MapPath("teste.mdb")& ";Driver={Microsoft Access Driver (*.mdb)}","username","password" set rs=server.CreateObject("ADODB.recordset")'cria objeto rs sql="select * from tabela1" set rs=dados.Execute(sql) while not rs.EOF %> <img src="<%=(rs.Fields.Item("imagem").Value)%>"> <b> <img src="<%=(rs.Fields.Item("imagem1").Value)%>"> <b> <% rs.MoveNext wend rs.Close dados.Close %> <HTML> <HEAD> </HEAD> <BODY> </BODY> </HTML>Link para o comentário
Compartilhar em outros sites
1 resposta a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.