Jump to content


Photo

Conexão Odbc Dsn


  • Faça o login para participar
4 replies to this topic

#1 cerburus

cerburus

    12 Horas

  • Usuários
  • 163 posts
  • Sexo:Não informado

Posted 27/10/2006, 19:44

Galera seguinte existe um site de um cliente q sempre q eu mudava ele de provedor de hospedagem eu só adicionava os dados no mysql e depois adicionava o drive odbc dsn q sempre tinha no painel de hospedagem pra por! porem meu servidor de hospedagem desabilitou a opção para adicionar um driver odbc dsn, e pediu pra mim usar umas das linhas de comando abaixo!

[b]MySQL:[/b]

MyODBC 2.50 Remote database:
"Driver={mySQL};Server=67.19.166.82;Port=3306;Option=131072;Stmt=;Database=my-database;Uid=username;Pwd=password;" 

MyODBC 3.51 Remote database:
"DRIVER={MySQL ODBC 3.51 Driver};SERVER=67.19.166.82;PORT=3306;DATABASE=myDatabase; USER=myUsername;PASSWORD=myPassword;OPTION=3;" 

No entando eu nao tenho a minima ideia como eu faço isso alguem poderia me ajudar, a pagina existe um arquivo de configuração dele que se chama config.asp e tem o seguinte codigo:

<%
' Neste arquivo estão as configurações do site.
dim titulo_pagina
titulo_pagina = "BRAS - O seu site na web
inicio_t = Timer

' Funcções de Validação

Set RS = server.CreateObject("ADODB.RecordSet")
Set RS1 = server.CreateObject("ADODB.RecordSet")
Set RS2 = server.CreateObject("ADODB.RecordSet")
Set RS3 = server.CreateObject("ADODB.RecordSet")
Set RS4 = server.CreateObject("ADODB.RecordSet")
Set RS6 = server.CreateObject("ADODB.RecordSet")
Set RSM = server.CreateObject("ADODB.RecordSet")
Set RSB = server.CreateObject("ADODB.RecordSet")
Set RSA = server.CreateObject("ADODB.RecordSet")

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


Conex.Open "bras"


%>

Por favor alguem pode me da uma luz de como eu faço isso ou algum modelo!
abraços

o nome do meu banco de dados no mysql e: bras - usuario: festbras

Edição feita por: cerburus, 27/10/2006, 19:55.


#2 MarcioMBL

MarcioMBL

    Novato no fórum

  • Usuários
  • 4 posts
  • Sexo:Não informado

Posted 29/10/2006, 12:15

Set conexao = Server.CreateObject("ADODB.Connection")
conexao.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};"_
& "SERVER=ServidorIP;"_
& " DATABASE=NOME_DO_BANCO_DE_DADOS;"_
& "UID=USUARIO;PWD=SENHA; OPTION=3"
Conex.Open

usa isto no topo desta pagina ai a config.

faro forte abraço! :D

#3 cerburus

cerburus

    12 Horas

  • Usuários
  • 163 posts
  • Sexo:Não informado

Posted 29/10/2006, 19:06

Set conexao = Server.CreateObject("ADODB.Connection")
conexao.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};"_
& "SERVER=ServidorIP;"_
& " DATABASE=NOME_DO_BANCO_DE_DADOS;"_
& "UID=USUARIO;PWD=SENHA; OPTION=3"
Conex.Open

usa isto no topo desta pagina ai a config.

faro forte abraço! :D


amigão valeu pela ajuda olha só
da uma conferida se eufiz certo pq mesmo assim nao exibiu meus dados nao da só uma conferida pra mim por favor!

<%
Set conexao = Server.CreateObject("ADODB.Connection")
conexao.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};"_
& "SERVER=67.19.166.82;"_
& " DATABASE=brasfest;"_
& "UID=brasfest;PWD=festsenha; OPTION=3"
Conex.Open

%>
<%
' Neste arquivo estão as configurações do site.
dim titulo_pagina
titulo_pagina = "BRASFEST - O seu site de festas."
inicio_t = Timer

' Funcções de Validação

Set RS = server.CreateObject("ADODB.RecordSet")
Set RS1 = server.CreateObject("ADODB.RecordSet")
Set RS2 = server.CreateObject("ADODB.RecordSet")
Set RS3 = server.CreateObject("ADODB.RecordSet")
Set RS4 = server.CreateObject("ADODB.RecordSet")
Set RS6 = server.CreateObject("ADODB.RecordSet")
Set RSM = server.CreateObject("ADODB.RecordSet")
Set RSB = server.CreateObject("ADODB.RecordSet")
Set RSA = server.CreateObject("ADODB.RecordSet")

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


Conex.Open "brasfest"


%>

#4 MarcioMBL

MarcioMBL

    Novato no fórum

  • Usuários
  • 4 posts
  • Sexo:Não informado

Posted 30/10/2006, 03:49

olá...acho que vc abusou veio..colocou sua senha, banco de dados e host...modifica tudo lá que todo mundo ta acessando seu banco de dados veio, caraca vc é doido fazer isto.

vc esqueseu de trocar o set

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

por

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

no topo da conexao...e modifica sua senha que vc postouela aqui ai todo mundo ta acessando sua conta no DB..ve isto ai....caraca.


faz assim:

<%
' Neste arquivo estão as configurações do site.
dim titulo_pagina
titulo_pagina = "BRASFEST - O seu site de festas."
inicio_t = Timer
' Funcções de Validação
Set RS = server.CreateObject("ADODB.RecordSet")
Set RS1 = server.CreateObject("ADODB.RecordSet")
Set RS2 = server.CreateObject("ADODB.RecordSet")
Set RS3 = server.CreateObject("ADODB.RecordSet")
Set RS4 = server.CreateObject("ADODB.RecordSet")
Set RS6 = server.CreateObject("ADODB.RecordSet")
Set RSM = server.CreateObject("ADODB.RecordSet")
Set RSB = server.CreateObject("ADODB.RecordSet")
Set RSA = server.CreateObject("ADODB.RecordSet")
Set Conex = Server.CreateObject("ADODB.Connection")
Conex.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};"_
& "SERVER=67.19.166.82;"_
& " DATABASE=brasfest;"_
& "UID=brasfest;PWD=festsenha; OPTION=3"
Conex.Open "brasfest"
%>

Edição feita por: MarcioMBL, 30/10/2006, 03:53.


#5 cerburus

cerburus

    12 Horas

  • Usuários
  • 163 posts
  • Sexo:Não informado

Posted 31/10/2006, 02:19

olá...acho que vc abusou veio..colocou sua senha, banco de dados e host...modifica tudo lá que todo mundo ta acessando seu banco de dados veio, caraca vc é doido fazer isto.

vc esqueseu de trocar o set

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

por

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

no topo da conexao...e modifica sua senha que vc postouela aqui ai todo mundo ta acessando sua conta no DB..ve isto ai....caraca.


faz assim:

<%
' Neste arquivo estão as configurações do site.
dim titulo_pagina
titulo_pagina = "BRASFEST - O seu site de festas."
inicio_t = Timer
' Funcções de Validação
Set RS = server.CreateObject("ADODB.RecordSet")
Set RS1 = server.CreateObject("ADODB.RecordSet")
Set RS2 = server.CreateObject("ADODB.RecordSet")
Set RS3 = server.CreateObject("ADODB.RecordSet")
Set RS4 = server.CreateObject("ADODB.RecordSet")
Set RS6 = server.CreateObject("ADODB.RecordSet")
Set RSM = server.CreateObject("ADODB.RecordSet")
Set RSB = server.CreateObject("ADODB.RecordSet")
Set RSA = server.CreateObject("ADODB.RecordSet")
Set Conex = Server.CreateObject("ADODB.Connection")
Conex.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};"_
& "SERVER=67.19.166.82;"_
& " DATABASE=brasfest;"_
& "UID=brasfest;PWD=festsenha; OPTION=3"
Conex.Open "brasfest"
%>


Pode ficar tranquilo manow! q nao e essa a senha nao! isso dai e ficticio!
abraços vo fazer o teste obrigado pela ajuda!


olá...acho que vc abusou veio..colocou sua senha, banco de dados e host...modifica tudo lá que todo mundo ta acessando seu banco de dados veio, caraca vc é doido fazer isto.

vc esqueseu de trocar o set

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

por

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

no topo da conexao...e modifica sua senha que vc postouela aqui ai todo mundo ta acessando sua conta no DB..ve isto ai....caraca.


faz assim:

<%
' Neste arquivo estão as configurações do site.
dim titulo_pagina
titulo_pagina = "BRASFEST - O seu site de festas."
inicio_t = Timer
' Funcções de Validação
Set RS = server.CreateObject("ADODB.RecordSet")
Set RS1 = server.CreateObject("ADODB.RecordSet")
Set RS2 = server.CreateObject("ADODB.RecordSet")
Set RS3 = server.CreateObject("ADODB.RecordSet")
Set RS4 = server.CreateObject("ADODB.RecordSet")
Set RS6 = server.CreateObject("ADODB.RecordSet")
Set RSM = server.CreateObject("ADODB.RecordSet")
Set RSB = server.CreateObject("ADODB.RecordSet")
Set RSA = server.CreateObject("ADODB.RecordSet")
Set Conex = Server.CreateObject("ADODB.Connection")
Conex.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};"_
& "SERVER=67.19.166.82;"_
& " DATABASE=brasfest;"_
& "UID=brasfest;PWD=festsenha; OPTION=3"
Conex.Open "brasfest"
%>


Pode ficar tranquilo manow! q nao e essa a senha nao! isso dai e ficticio!
abraços vo fazer o teste obrigado pela ajuda!


Manow eu fiz oq vc mandou!
botei isso oh:
<%
' Neste arquivo estão as configurações do site.
dim titulo_pagina
titulo_pagina = "BRASFEST - O seu site de festas."
inicio_t = Timer
' Funcções de Validação
Set RS = server.CreateObject("ADODB.RecordSet")
Set RS1 = server.CreateObject("ADODB.RecordSet")
Set RS2 = server.CreateObject("ADODB.RecordSet")
Set RS3 = server.CreateObject("ADODB.RecordSet")
Set RS4 = server.CreateObject("ADODB.RecordSet")
Set RS6 = server.CreateObject("ADODB.RecordSet")
Set RSM = server.CreateObject("ADODB.RecordSet")
Set RSB = server.CreateObject("ADODB.RecordSet")
Set RSA = server.CreateObject("ADODB.RecordSet")
Set Conex = Server.CreateObject("ADODB.Connection")
Conex.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};"_
& "SERVER=67.19.166.82;"_
& " DATABASE=brasfest;"_
& "UID=brasfest;PWD=147852net; OPTION=3"
Conex.Open "brasfest"
%>
só q nao deu do mesmo jeito!
ai eu inseri a porta nessa linha q vc nao colocou!

& "SERVER=67.19.166.82;PORT=3306;"_

mas mesmo assim nao deu! to precisando isso com urgencia se puder me ajudar! eu do uma graninha pra vc pra mim ajudar a por isso pra funcionar o site sempre fico no ar só q o provedor resolveu tirar a conexão pelo painel com o drive odbc e pediram pra mim fazer via codigo q e mais seguro!
Abraços me adiciona no msn pra gente ver isso to precisando com urgencia mesmo se tiver ai mais alguem disposto a me ajudar!
edenis_oliveira@gmail.com




1 user(s) are reading this topic

0 membro(s), 1 visitante(s) e 0 membros anônimo(s)

IPB Skin By Virteq