Mudar Conexao

[Marianne]

TEnho esta conexao em um arquivo e usua como include nas outras paginas, mas gostaria de mudar pra Map Path pra poder usar localmente também.. tem como?

Obrigadaaaa!

<%

Dim Conectar,ConnString

ConnString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\Inetpub\host\meusite.com\http\bancos\arquivo.mdb"

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

Conectar.Open ConnString

%>

[Guest - ferio -]

se eu entendi direito, você pode usar esta mesma conexao localmente, basta mudar a caminho logico desta ex:...Data Source=c:\pastax\bancodedados.mdb"

[dark0]

oi

assim:

Dim Conectar,ConnString

ConnString = Server.MapPath("arquivo.mdb")

set Conectar = Server.CreateObject("ADODB.Connection")

Conectar.open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&url_conexao

t+

[Guest - Marianne -]

só erro..

Microsoft OLE DB Provider for ODBC Drivers error '80040e4e'

Operation was canceled.

/meusite.com_non_ssl/diretorio/conexao.asp, line 11

<%

Dim conexao,ConnString,url_conexao

ConnString = Server.MapPath("arquivo.mdb")

set conexao= Server.CreateObject("ADODB.Connection")

linha 11=> conexao.open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&url_conexao

%>

[felipefrancesco]

Opa....assim...

<%
Dim conexao,ConnString,url_conexao
ConnString = Server.MapPath("arquivo.mdb")
set conexao= Server.CreateObject("ADODB.Connection")
conexao.open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&ConnString
%> 

Troquei url_conexao pelo ConnString no conexao.open, assim deve ir....

[dark0]

ouche....

mó vesguice minha..

valeu felipe.. e desculpa mari

o codigo certo é o que o felipe postou ali..

e pode apagar do DIM a variavel URLCONEXAO..

eu qe ratiei aqui..

tb.. é tanto codigo, numero, pagina, hehe

T+

[Marianne]

Obrigada, obrigada!! funcionou...

alguém sabe como mudar esta pra MySQL? hehehe Tks