A alguns dias atras eu criei um tópico perguntando como se fazia uma conexao com um BD em ACCESS e perguntei também como fazia para inserir os dados nesse BD com um codigo ASP.
pois bem depois de estudar bastante e de grandes ajudas consegui produzir esse codigo...
que funciona...
mas não consigo de forma alguma puxar do banco de dados e emprimir em forma de lista...
para colocar no banco utilizei esse codigo abaixo:
<%
inome = Request.Form("fnome") 'fnome = campo nome de um form
iendereco = Request.Form("fendereco")
idatahora = Request.Form("fdatahora")
Set conn = Server.CreateObject("ADODB.Connection")
conn.open "kim"
Sql = "insert into tabela1 (nome, endereco, datahora) values ('"&inome&"','"&iendereco&"','"&idatahora&"')"
conn.Execute(Sql)
conn.close
%>
<html>
<head>
<title></title>
</head>
<body bgcolor="#ffffff" text="#000000" leftmargin=0 topmargin=0>
<font face="Arial" size=2>
Nome :<% Response.write inome %>
<br>Endereço :<% Response.write iendereco %>
<br>Data & Hora :<% Response.write idatahora %>
<br><br><br>
<p style="color:#00FF00">INFORMAÇÕES INCLUIDAS COM SUCESSO</p>
<BR>
<BR><br>
<A HREF="index.htm" style="color:#FF0000">Pagina Inicial</A>
</font>
</center>
</body>
</html>
Reparem que utilizei o insert, com isso gostaria de saber como faço apra imprimir?
meu codigo ficou mais ou mesnos assim:
<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.open "kim"
vSql = "Select * from kim"
Set rs=conn.Execute(vSql))
conn.close
%>
<html>
<body leftmargin=0 topmargin=0 bgcolor="#ffffff">
<% Do While Not tabela1.Eof %>
<br> Nome: <%Response.Write tabela1.Fields("nome") %>
<br> Endereço: <%Response.Write tabela1.Fields("endereco") %>
<br> Data & Hora: <%Response.Write tabela1.Fields("datahora") %>
<br>
<br><br>
[<a href="index.htm">Página Inicial</a> ]
</center>
</body>
</html>
e agora o que eu faço onde estou errando no segundo codigo?
Pergunta
KvT
A alguns dias atras eu criei um tópico perguntando como se fazia uma conexao com um BD em ACCESS e perguntei também como fazia para inserir os dados nesse BD com um codigo ASP.
pois bem depois de estudar bastante e de grandes ajudas consegui produzir esse codigo...
que funciona...
mas não consigo de forma alguma puxar do banco de dados e emprimir em forma de lista...
para colocar no banco utilizei esse codigo abaixo:
<% inome = Request.Form("fnome") 'fnome = campo nome de um form iendereco = Request.Form("fendereco") idatahora = Request.Form("fdatahora") Set conn = Server.CreateObject("ADODB.Connection") conn.open "kim" Sql = "insert into tabela1 (nome, endereco, datahora) values ('"&inome&"','"&iendereco&"','"&idatahora&"')" conn.Execute(Sql) conn.close %> <html> <head> <title></title> </head> <body bgcolor="#ffffff" text="#000000" leftmargin=0 topmargin=0> <font face="Arial" size=2> Nome :<% Response.write inome %> <br>Endereço :<% Response.write iendereco %> <br>Data & Hora :<% Response.write idatahora %> <br><br><br> <p style="color:#00FF00">INFORMAÇÕES INCLUIDAS COM SUCESSO</p> <BR> <BR><br> <A HREF="index.htm" style="color:#FF0000">Pagina Inicial</A> </font> </center> </body> </html>Reparem que utilizei o insert, com isso gostaria de saber como faço apra imprimir? meu codigo ficou mais ou mesnos assim:<% Set conn = Server.CreateObject("ADODB.Connection") conn.open "kim" vSql = "Select * from kim" Set rs=conn.Execute(vSql)) conn.close %> <html> <body leftmargin=0 topmargin=0 bgcolor="#ffffff"> <% Do While Not tabela1.Eof %> <br> Nome: <%Response.Write tabela1.Fields("nome") %> <br> Endereço: <%Response.Write tabela1.Fields("endereco") %> <br> Data & Hora: <%Response.Write tabela1.Fields("datahora") %> <br> <br><br> [<a href="index.htm">Página Inicial</a> ] </center> </body> </html>e agora o que eu faço onde estou errando no segundo codigo?
por favor preciso de ajuda...
QUal o comando que é o inverso de insert?
Desde já agradeço pela ajuda
Abraço para todos
Editado por andreia_spLink 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.