ERRO -2147217865 A ABRIR TABELA ON LINE MYSQL
ESTOU ACESSANDO BANCO DE DADOS MYSQL ON LINE COM O SEGUINTE CODIGO
CONEXÃO COM MYSQL OK
[ô]Set MyDB = New ADODB.Connection
[ô]MyDB.ConnectionString = [Ô]Driver=MySQL ODBC 5.1 Driver; DATABASE=Sudoeste; SERVER=201.26.200.169; UID=root; PASSWORD=jlsma[Ô]
ABERTURA DA TABELA
Set RS_FLEX = New ADODB.Recordset
RS_FLEX.CursorLocation = adUseClient
RS_FLEX.Open [Ô]Select Cod,Nom, tel,cel, comisao, cpf, rg from Funcionarios order by nom[Ô], MyDB, adOpenStatic, adLockOptimistic, adCmdText
ocorre o erro nesta linha
RS_FLEX.Open [Ô]Select Cod,Nom, tel,cel, comisao, cpf, rg from Funcionarios order by nom[Ô], MyDB, adOpenStatic, adLockOptimistic, adCmdText
mensagem de erro
[MYSQÇ][ODBC 5.1][mysql-5.143]Tabela[ô]sudoeste.seguradoras[ô]n
porém outras tabelas com o mesmo procedimento abre normalmente, pelo mesmo 6 tabelas estam funcionando normalmente somente dua da este ero.
CONEXÃO COM MYSQL OK
[ô]Set MyDB = New ADODB.Connection
[ô]MyDB.ConnectionString = [Ô]Driver=MySQL ODBC 5.1 Driver; DATABASE=Sudoeste; SERVER=201.26.200.169; UID=root; PASSWORD=jlsma[Ô]
ABERTURA DA TABELA
Set RS_FLEX = New ADODB.Recordset
RS_FLEX.CursorLocation = adUseClient
RS_FLEX.Open [Ô]Select Cod,Nom, tel,cel, comisao, cpf, rg from Funcionarios order by nom[Ô], MyDB, adOpenStatic, adLockOptimistic, adCmdText
ocorre o erro nesta linha
RS_FLEX.Open [Ô]Select Cod,Nom, tel,cel, comisao, cpf, rg from Funcionarios order by nom[Ô], MyDB, adOpenStatic, adLockOptimistic, adCmdText
mensagem de erro
[MYSQÇ][ODBC 5.1][mysql-5.143]Tabela[ô]sudoeste.seguradoras[ô]n
porém outras tabelas com o mesmo procedimento abre normalmente, pelo mesmo 6 tabelas estam funcionando normalmente somente dua da este ero.
tenta assim
set rs_flex =nothing
RS_FLEX.Open [Ô]Select * from Funcionarios order by nom[Ô], MyDB, 3,3
ve se abre
set rs_flex =nothing
RS_FLEX.Open [Ô]Select * from Funcionarios order by nom[Ô], MyDB, 3,3
ve se abre
amigo, veja se a tabela tem campos boolean por exemplo.. alguma operação que esta fora dos conformes..
ENTÃO PAULO FIZ DESSA FORMA
Set RS_FLEX = Nothing
Set RS_FLEX = New ADODB.Recordset
RS_FLEX.CursorLocation = adUseClient
RS_FLEX.Open [Ô]Select Cod,Nom, tel,cel, comisao, cpf, rg from Funcionarios order by nom[Ô], MyDB, 3, 3
mas continua não abrindo
jair
Set RS_FLEX = Nothing
Set RS_FLEX = New ADODB.Recordset
RS_FLEX.CursorLocation = adUseClient
RS_FLEX.Open [Ô]Select Cod,Nom, tel,cel, comisao, cpf, rg from Funcionarios order by nom[Ô], MyDB, 3, 3
mas continua não abrindo
jair
estava vendo este link da microsoft mas não consegui entender
Ela fala de criar uma consulta temporária e depois passar para a consulta no caso rs_flex
http://support.microsoft.com/kb/295743/pt
Ela fala de criar uma consulta temporária e depois passar para a consulta no caso rs_flex
http://support.microsoft.com/kb/295743/pt
PESSOAL CONSEGUI ENCONTAR O PROBLEMA
COMO SE PODE NOTAR ESTOU COLOCANDO O NOME DA TABELA COM INICIAL MAISCULO EXEM
RS_FLEX.Open [Ô]Select Cod,Nom, tel,cel, comisao, cpf, rg from Funcionarios order by nom[Ô], MyDB, adOpenStatic, adLockOptimistic, adCmdText
e estou apenas abrindo a tabela para edição e copiando o nome que estão todos minusculo ficando assim
RS_FLEX.Open [Ô]Select Cod,Nom, tel,cel, comisao, cpf, rg from funcionarios order by nom[Ô], MyDB, adOpenStatic, adLockOptimistic, adCmdText
e esta funcionando corretamente
COMO SE PODE NOTAR ESTOU COLOCANDO O NOME DA TABELA COM INICIAL MAISCULO EXEM
RS_FLEX.Open [Ô]Select Cod,Nom, tel,cel, comisao, cpf, rg from Funcionarios order by nom[Ô], MyDB, adOpenStatic, adLockOptimistic, adCmdText
e estou apenas abrindo a tabela para edição e copiando o nome que estão todos minusculo ficando assim
RS_FLEX.Open [Ô]Select Cod,Nom, tel,cel, comisao, cpf, rg from funcionarios order by nom[Ô], MyDB, adOpenStatic, adLockOptimistic, adCmdText
e esta funcionando corretamente
eu tive esse problema com server linux cara, o dito cujo do linux difere MAIUSCULAS de minusculas cara...
flw
parabens
flw
parabens
Tópico encerrado , respostas não são mais permitidas