Jump to content


Xahuj

Member Since 18/02/2004
Offline Last Active 24/02/2005, 17:07
-----

Posts I've Made

In Topic: Ajuda Com Configuração Iis E Odbc...

18/04/2004, 19:41

Bom eu costuma fazer uma página para conexao (conexao.asp).. e na página onde desejo abrir o banco para visualizar, adicionar, alterar os dados.. eu chamo essa conexao.asp .. e abro então o objeto recordset na página onde faço as manipulações com o bd...

In Topic: Ajuda Com Configuração Iis E Odbc...

17/04/2004, 14:34

Para abrir conexão========== conexao.asp

<%
Sub AbreConexao
Set conexao=Server.CreateObject("ADODB.Connection")
conexao.Open="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.Mappath("pasta/nomebd.mdb")
End sub

sub FechaConexao
conexao.Close
Set conexao = Nothing
End sub

Call AbreConexao
%>

Para abrir o recordset==========

<%@LANGUAGE="VBSCRIPT"%>

<%Option Explicit:Dim conexao,condados%>

<!--#Include file="conexao.asp"-->
<% Set condados=Server.CreateObject("ADODB.RecordSet") %>
<% condados.Open "SELECT campo FROM tabela", conexao %>

In Topic: Abrir Outra Página

31/03/2004, 16:56

<a href="pagina.htm" target="_blank"> Link </a>

In Topic: Lado A Lado

15/03/2004, 21:33

nooosa vc deu um copy nesse código ou vez.. tenta arrumar kra.. o eu faço isso com tabelas tipo:

<% Do While Not condados.EOF %>
<table width="500" border="1">
<tr bgcolor="#FFCC00"><td> <% Response.Write(condados.Fields("titulo"))%> </td></tr>
<tr><td> <% Response.Write(condados.Fields("resumo"))%> </td></tr>
<tr><td> <% Response.Write(condados.Fields("autor1"))%> </td></tr>
<tr><td> <% Response.Write(condados.Fields("autor11"))%> </td></tr>
<tr><td> <% Response.Write(condados.Fields("autor2"))%> </td></tr>
<tr><td> <% Response.Write(condados.Fields("autor22"))%> </td></tr>
<tr><td> <% Response.Write(condados.Fields("chamada"))%> </td></tr>
<tr><td> <% Response.Write(condados.Fields("data"))%> </td></tr>
</table>
<br>
<% condados.MoveNext:Loop%>

Blz!

In Topic: To Com Um Problema Nesse Anexo

15/03/2004, 17:02

<%@Language=VBScript %>
<%Option Explicit
Dim sql%>

<HTML><HEAD><title>Conexao</title></HEAD><BODY>

<!--#INCLUDE file="INICIO.ASP"-->

<%SET cmd = Server.CreateObject("ADODB.Connection")
cmd.Open="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.Mappath("tabeladeprecos.mdb")
Set rsprodutos=Server.CreateObject("ADODB.RecordSet")
rsprodutos.Open sql, cmd
sql = "SELECT * FROM produtos WHERE tipo LIKE ? "
%>

tem que abrir a conexao com o bd e com o recordeset..

IPB Skin By Virteq