Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

marciolvs

Programação ASP

Recommended Posts

Tipo to trabalhando no local host.

 

tenho este select...

index.asp

<!-- #Include file="conexao.inc"--><html><head><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" /><title>Teste de banco</title></head><body><%dim sql, rssqlsql = "Select * FROM Teste "Call AbreConexaoSet rssql = Conexao.execute(SQL)%>			<table width="500" border="1"><%Do While Not rssql.EOF%> <tr>	<td><%=rssql("nome")%></td>	<td> </td>	<td> </td>  </tr><%rssql.MovenextLooprssql.CloseSet rssql = Nothing%>  <tr>	<td> </td>	<td> </td>	<td> </td>  </tr>  <tr>	<td> </td>	<td> </td>	<td> </td>  </tr></table></body></html>
E essa conexao...

conexao.inc

<%'---------------------------------------------------' VARIAVEIS DE CONEXAO COM O BANCO'---------------------------------------------------Dim conexao, strconexao	Set conexao = Server.CreateObject("adodb.connection")	Strconexao = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=localhost;UID=root;PWD=123456;DATABASE=banco"	ConexaoAberta = False'----------------------------------------------------' ABRE CONEXAO'----------------------------------------------------Sub AbreConexao()		If Not ConexaoAberta Then			conexao.Open(Strconexao)		End IfEnd Sub'---------------------------------------------------' FECHA CONEXAO'---------------------------------------------------Sub FechaConexao()	If Not ConexaoAberta then		conexao.closeEnd IfEnd Sub%>
mas o que eu quero é o seguinte...

isso me retorna um 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

/mysql/conexao.inc, line 14

 

linha 14 -->conexao.Open(Strconexao)

refere se a linha 7 -->Strconexao = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=localhost;UID=root;PWD=123456;DATABASE=banco"

 

 

oque aconteceu???

 

 

Marcio Leandro.

Analista Desenvolvedor Web.

marcio@riopretodesign.com.br

 

 

Riopretodesign - Soluções em Internet.

www.riopretodesign.com.br

Compartilhar este post


Link para o post
Compartilhar em outros sites

Tenta colocar o ip em vez de local host ou então cria um odbc e só muda a string de conexão abraços até mais...

Compartilhar este post


Link para o post
Compartilhar em outros sites

o erro agora é outro[MySQL][ODBC 3.51 Driver]Client does not support authentication protocol requested by server; consider upgrading MySQL client/mysql/conexao.inc, line 14mas a lionha 14 é a mesma...você não tem uma conexao ao banco mysql ai não para me passar???acho que a minha tlvez esteja errada...

Compartilhar este post


Link para o post
Compartilhar em outros sites

ai amigo tenta essa eu uso sempre funfo

hhehehe

 

<%dim connsub abre_conexaoSet conn = Server.CreateObject("ADODB.Connection")conn.open "driver=MySQL ODBC 3.51 Driver;server=localhost;uid=visiteitu;pwd=;database=visiteitu"end subSub fecha_conexaoconn.closeset conn = nothingend sub%>

ai é so chamar como call abre_conexao call fecha_conaxao

Compartilhar este post


Link para o post
Compartilhar em outros sites

me retornou isssoTipo de erro:Microsoft OLE DB Provider for ODBC Drivers (0x80004005)[MySQL][ODBC 3.51 Driver]Client does not support authentication protocol requested by server; consider upgrading MySQL client/mysql/conexao.inc, line 6linha6 --> conexao.open "driver=MySQL ODBC 3.51 Driver;server=localhost;uid=root;pwd=123456;database=banco"Oque eu faço???

Compartilhar este post


Link para o post
Compartilhar em outros sites

usa este aki...conexao.ConnectionString = "DSN=spacelab_mysql;server=000.000.000.000;database=bancodedados;uid=login;pwd=senha;"conexao.CursorLocation = 3conexao.open

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.