onde estou errando

[delua 0]

ja to quase loco aqui ....

 

ASP

'Abertura de Banco de dados

 

Sub AbreBd()

 

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

 

 

 

      Conn.Open "Driver={Microsoft Access Driver (*.MDB)};DBQ="C:InetpubwwwrootramosinformaticawebClassificados1dadosDatabaseDBClassifi

ados.mdb""      

 

     End Sub

 

 

 

'Fechamento de Banco de dados

 

Sub FechaBd()

 

        Conn.Close

 

        Set Conn = Nothing

 

End Sub

 

mas quando tento abrir a página aparece essa msg.....

 

Microsoft VBScript compilation error '800a0401'

 

Expected end of statement

 

/Classificados1/Includes/Config.asp, line 26

 

Conn.Open "Driver={Microsoft Access Driver (*.MDB)};DBQ="C:\Inetpub\wwwroot\ramosinformatica\web\Classificados1\dados\Database\DBClassificados.mdb""

---------------------------------------------------------^

alquem pode me ajudar ....ficarei grato ...

[Ted k' 126]

Testa æ mano:

 

ASP

Conn.Open "Driver={Microsoft Access Driver (*.MDB)};DBQ=C:InetpubwwwrootramosinformaticawebClassificados1dadosDatabaseDBClassifi

 

ados.mdb"

[delua 0]

agora deu esse erro ....

 

Esse erro (HTTP 500 Erro Interno do Servidor) significa que o site visitado teve um problema no servidor que impediu a exibição da página da Web.

 

 

 

Testa æ mano:

 

ASP

Conn.Open "Driver={Microsoft Access Driver (*.MDB)};DBQ=C:InetpubwwwrootramosinformaticawebClassificados1dadosDatabaseDBCla

 

sifi

 

ados.mdb"

desculpa ai estava errado o caminho .....

 

mas agora esta dando esse erro....

 

ADODB.Connection error '800a0e79'

Operation is not allowed when the object is open.

 

/Classificados1/Default.asp, line 21

 

Testa æ mano:

 

ASP

Conn.Open "Driver={Microsoft Access Driver (*.MDB)};DBQ=C:InetpubwwwrootramosinformaticawebClassificados1dadosDatabaseDBCla

 

sifi

 

ados.mdb"

O caminho éra esse ....

'Abertura de Banco de dados

Sub AbreBd()

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

Conn.Open "Driver={Microsoft Access Driver (*.MDB)};DBQ=C:\Inetpub\wwwroot\ramosinformatica\web\Classificados1\Database\DBClassificados.mdb"

End Sub

 

'Fechamento de Banco de dados

Sub FechaBd()

Conn.Close

Set Conn = Nothing

End Sub

 

mas agora esta dando esse erro ...

 

ADODB.Connection error '800a0e79'

Operation is not allowed when the object is open.

 

/Classificados1/Default.asp, line 21

[Ted k' 126]

reparei que o nome do banco estava assim classifiados.mdb ñ seria classificados.mdb?

 

ASP

<%

 

'Abertura de Banco de dados

 

 

 

Sub AbreBd()

 

 

 

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

 

 

 

      Conn.Open "Driver={Microsoft Access Driver (*.MDB)};DBQ=C:InetpubwwwrootramosinformaticawebClassificados1dadosDatabaseDBClassificados.mdb"      

 

 

 

     End Sub

 

 

 

Sub FechaBd()

 

    Conn.Close

 

    Set Conn = Nothing

 

End Sub

 

%>

[delua 0]

sim ja corrigi.......Set Conn = Server.CreateObject("ADODB.Connection")Conn.Open "Driver={Microsoft Access Driver (*.MDB)};DBQ=C:\Inetpub\wwwroot\ramosinformatica\web\Classificados1\Database\DBClassificados.mdb" so que ao tentar entrar na página esta com essa msg.........ADODB.Connection error '800a0e79' Operation is not allowed when the object is open. /Classificados1/Default.asp, line 21 ai eu atualizo a página e clico (meu amuncio)(fale conosco ) e entra no site .....coisa de doido ....rsssss

[Ted k' 126]

tem permissões na pasta do banco?

 

está com o banco aberto? se tiver feche!

[delua 0]

estou fazendo direto na net no provedor .....tem permisão sim e não estou com o banco aberto não......

[jrcardozo 4]

toda a vez que você abrir a conexão com abrebd você tem que fecha-lo com o fechabd

lógica:

ASP

call abrebd

 

'seu recordset e uso do mesmo

 

call fechabd