Ir para conteúdo
Fórum Script Brasil
  • 0

Erro


Guest marcelo

Pergunta

Eu fiz um codico para acessar um banco de dados.Queria que essas informacoes desse BD mostrasse no explorer.Mas tá dando o seguinte erro:

Microsoft OLE DB Provider for ODBC Drivers (0x80004005)

[Microsoft][ODBC Driver Manager] Nome da fonte de dados não encontrado e nenhum driver padrão especificado

/amigos.asp, line 24

meu e-mail 'e fleuvis@yahoo.com.br

<%@LANGUAGE = VbScript%>

<% option explicit %>

<html>

<head>

<title>Acessando Banco de Dados</title>

</head>

<body>

<%

' *** Variavel de Conexao com o Banco de Dados ***

dim conEmpresa

' *** Variavel de Abertura da Tabela ***

dim recAmigos

' *** Constante para informar o Banco de Dados ***

const cntCaminho = "C:\Inetpub\wwwroot\empresa.mdb"

' *** Cria um objeto de Conexao (Connection) ***

Set conEmpresa = Server.CreateObject ("ADODB.Connection")

' *** Crie um objeto Recordsert ***

' Recorset = é uma variavel no caso recAmigos que contera

' dados da tabela empresa.

Set recAmigos = Server.CreateObject ("ADODB.Recordset")

' *** Estabelece uma conexão ***

' 1º passo = Qual o nome do programa de BD.

' 2º passo = Qual local se encontra instalado o BD.

conEmpresa.Open "driver={Microsoft Access Driver (*.mbd)};dbq=" & cntCaminho

' *** Abrir a Tabela Amigos =

' - Abrir a Tabela armazenada na variavel do recorset

' - Nome da conexão usada

recAmigos.Open "Amigos",conEmpresa

response.Write "Nome: "

recAmigos.Fields ("Nome") & "<br>" & "Enderenco: " _

& recAmigos.Fields ("Enderenco")

' Fechar a coneexão Recordset

recAmigos.Close

' Fechar a conexão Connection

conEmpresa.Close

%>

</body>

</html>

Link para o comentário
Compartilhar em outros sites

2 respostass a esta questão

Posts Recomendados

  • 0

Brother!!

Abrindo o banco de dados:

<%
Dim Conn, strConn, cBanco

Set Conn = Server.CreateObject("adodb.connection")
cBanco = "C:\Inetpub\wwwroot\empresa.mdb"
strConn = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source = "& cBanco &";"
Conn.Open(strConn)
%>

Tente ultilizar este código e veja tambem o caminho de seu banco de dados.

Abraços!!!

Link para o comentário
Compartilhar em outros sites

  • 0

Verifique se o tipo de conexão que você está fazendo é o padrão do seu servidor.

Existem vários tipos de fazer a conexão com o banco.

Veja se esta abaixo resolve seu problema:

<%

'A variável db dirá o path do seu banco.

db="../../banco.mdb"

Set Conexao = CreateObject("ADODB.CONNECTION")

conStr ="DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath(db)

%>

[]'s

Nelson Soares

http://www.ondagospel.com.br

Link para o comentário
Compartilhar em outros sites

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.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,5k
×
×
  • Criar Novo...