fabin01 Posted September 15, 2009 Author Report Share Posted September 15, 2009 usei a seguinte funçao para ver se a database foi criada e ver se foi criada a tabela *--- SQL CONNECT ON 'localhost'; PORT 3306; USER "root"; PASSWORD 'solution'; OPTIONS SQL_NO_ERROR; LIB 'MySQL' IF SQLErrorNO() > 0 alert('Nao Conectou') Return .F. else alert('Conexao Estabelecida com sucesso!') endif *----- aDBS:= sqlArray("Show Databases") *----- IF ASCAN(aDBS,{|X|X[1]="agenda"}) # 0 SQLExecute("Use agenda") ELSE IF msgYesNo("DataBase Inexistente"+CRLF+"Deseja Crialo Agora ?","....::DataBases") SQL EXECUTE "CREATE DATABASE agenda" SQLExecute("Use agenda") ENDIF ENDIF *------- cCadCliente:={} AAdd(cCadCliente,{"CodCliente","N", 5, 0, .t., ,, ,.t.,.t.}) AAdd(cCadCliente,{"Empresa","C", 35, 0, .t.}) AAdd(cCadCliente,{"Contato","C",35,0}) AAdd(cCadCliente,{"Email","C",50,0,.t.}) AAdd(cCadCliente,{"Telefone","C",11,0}) IF (!Table("Cadastro_Cliente")) ? 'Tabela de Cadastro de Cliente ja existe' ELSE IF msgYesNo("Tabela Inexistente"+CRLF+"Deseja Criala ?","...::Tabalea Cadastro de Clientes") DBCREATE("Cadastro_Clientes",cCadCliente) ENDIF ENDIF Return .t.id=code>id=code>COMO FAÇO PARA VER A TABELA NO MYSQL? EM QUE LOCAL ELA FOI CRIADA? COMO VISUALIZO A ESTRUTURA DELA? VALEWS Obrigado pela ATENÇÃO e AJUDA! "O homem deve criar as oportunidades e não somente encontrá-las." Fábio Igor (BH-MG) fabio.igor@hotmail.com Iniciante FWH 2.8 [x]Harbour 9.61 xdev 0.70 Pelles C Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted September 15, 2009 Report Share Posted September 15, 2009 Bem.. se for só pra ver se criou tente assim.. USE "cadastro_clientes" as "Select * from cadastro_clientes" Alias "CADASTRO_CLIENTES" New Via "MySQL" * BROWSE() * id=code>id=code>Se ela foi criada vai abrir vazia somente com os campos criados.. VEJA SE É ISSO QUE c Tà QUERENDO.. Luiz Arruda - Corumba(MS) FiveWin 9.04 [x]Harbour xDev WS -- Não existe nada de completamente errado no mundo mesmo um relógio parado consegue estar certo duas vezes por dia. - Não Abandone Seu Tópicoid=red> Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted September 15, 2009 Report Share Posted September 15, 2009 Agora se for para ter uma visão das tabelas igual a gente V os DBFs eu não sei.. Já me falaram que tá em \Arquiv~1\mysql.. mas no meu micro não tem nem uma arquivo.frm sequer.. já dei um Dir *.frm /s e não tem mesmo nem um.. PS: tb. gostaria de saber... na pasta do meu Mysql só tem BIN e SHARE Luiz Arruda - Corumba(MS) FiveWin 9.04 [x]Harbour xDev WS -- Não existe nada de completamente errado no mundo mesmo um relógio parado consegue estar certo duas vezes por dia. - Não Abandone Seu Tópicoid=red> Quote Link to comment Share on other sites More sharing options...
fabin01 Posted September 15, 2009 Author Report Share Posted September 15, 2009 citação:Bem.. se for só pra ver se criou tente assim.. USE "cadastro_clientes" as "Select * from cadastro_clientes" Alias "CADASTRO_CLIENTES" New Via "MySQL" * BROWSE() * id=code>id=code>Se ela foi criada vai abrir vazia somente com os campos criados.. VEJA SE É ISSO QUE c Tà QUERENDO.. Luiz Arruda - Corumba(MS) FiveWin 9.04 [x]Harbour xDev WS -- Não existe nada de completamente errado no mundo mesmo um relógio parado consegue estar certo duas vezes por dia. - Não Abandone Seu Tópicoid=red> id=quote>id=quote>este comando coloco na funçao onde coloquei a conexao?? a tabela criada fica em alguma pasta?? e é o seguinte porque quando coloco o ! no IF(!TABLE... ele emite que a tabela existe e quando tiro o ! ele emite a mensagem que a tabela nao existe e seu desejo criala? valews Obrigado pela ATENÇÃO e AJUDA! "O homem deve criar as oportunidades e não somente encontrá-las." Fábio Igor (BH-MG) fabio.igor@hotmail.com Iniciante FWH 2.8 [x]Harbour 9.61 xdev 0.70 Pelles C Editado por - fabin01 on 15/09/2009 16:40:40 Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted September 15, 2009 Report Share Posted September 15, 2009 Coloque antes do seu Return .t. eu gosto das coisas bem explicadinhas nos seus miniiiiiiiiiiiiiiiminos detalhesid=size1> Luiz Arruda - Corumba(MS) FiveWin 9.04 [x]Harbour xDev WS -- Não existe nada de completamente errado no mundo mesmo um relógio parado consegue estar certo duas vezes por dia. - Não Abandone Seu Tópicoid=red> Editado por - ico on 15/09/2009 16:46:40 Quote Link to comment Share on other sites More sharing options...
Luisão Posted September 15, 2009 Report Share Posted September 15, 2009 Para saber onde ficam os arquivos: ToString(sqlArray("SHOW VARIABLES WHERE VARIABLE_NAME = 'DATADIR'")),; "e com MySQL eu não devo trabalhar nem manipular os arquivos, pois esse não é o intuito de se usar banco de dados =D" id=code>id=code>Fábio, mais uma coisa. Eu deixaria tudo bem separado. Uma função SÓ para fazer a conexão com o Banco de Dados. Outra (a que eu postei) SÓ para verificar se um DB/tabela existe. Outra SÓ para criar as tabelas e Assim por diante. Dependendo da sua necessidade... Se você continuar deixando tudo na Conecta_Banco(), vai virar salada hein! Luis Fernando Jr.(Luisão) "Seize the day or die regretting the time you lost" FWH8.1 + SQLLIB 1.9d + xHB 1.10 + xDev 0.65 + @SAY Quote Link to comment Share on other sites More sharing options...
fabin01 Posted September 16, 2009 Author Report Share Posted September 16, 2009 citação:Para saber onde ficam os arquivos: ToString(sqlArray("SHOW VARIABLES WHERE VARIABLE_NAME = 'DATADIR'")),; "e com MySQL eu não devo trabalhar nem manipular os arquivos, pois esse não é o intuito de se usar banco de dados =D" id=code>id=code>Fábio, mais uma coisa. Eu deixaria tudo bem separado. Uma função SÓ para fazer a conexão com o Banco de Dados. Outra (a que eu postei) SÓ para verificar se um DB/tabela existe. Outra SÓ para criar as tabelas e Assim por diante. Dependendo da sua necessidade... Se você continuar deixando tudo na Conecta_Banco(), vai virar salada hein! Luis Fernando Jr.(Luisão) "Seize the day or die regretting the time you lost" FWH8.1 + SQLLIB 1.9d + xHB 1.10 + xDev 0.65 + @SAY id=quote>id=quote>ah ok luizao ja separei por funçoes aqui é o seguinte com o comando do luiz que ele me passou * BROWSE()id=code>id=code>deu erro de relatorio quando coloquei no meu codigo luizao a pasta do mysql tem a pasta agenda e dentro dela um arquivo db.opt o que é isso? é meu banco? e nessa parte do codigo acontece o seguinte IF (!id=red>Table("Cadastro_Clientes")) ? 'Tabela de Cadastro de Cliente ja existe' ELSE IF msgYesNo("Tabela Inexistente"+CRLF+"Deseja Criala ?","...::Tabalea Cadastro de Clientes") DBCREATE("Cadastro_Clientes",cCadCliente) ENDIF ENDIFid=code>id=code>se eu Tirar o "!" me informa que a tabela nao existe e se desjo criar e se coloc o "!" novamente informa que a tabela ja existe, pq ta acontecendo isso? como sei que minha tabela foi criada? tem algum jeito de visualiza so a estrutura dela sem os dados so os campos que criei? valews Obrigado pela ATENÇÃO e AJUDA! "O homem deve criar as oportunidades e não somente encontrá-las." Fábio Igor (BH-MG) fabio.igor@hotmail.com Iniciante FWH 2.8 [x]Harbour 9.61 xdev 0.70 Pelles C Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted September 16, 2009 Report Share Posted September 16, 2009 Vc. tentou dar um Use e Browse como eu disse acima ??? pq. o !id=red> tá te incomodando tanto ??? ele tá ali fazendo + - um existe não existe If eof() If .not. eof() Luiz Arruda - Corumba(MS) FiveWin 9.04 [x]Harbour xDev WS -- Não existe nada de completamente errado no mundo mesmo um relógio parado consegue estar certo duas vezes por dia. - Não Abandone Seu Tópicoid=red> Quote Link to comment Share on other sites More sharing options...
fabin01 Posted September 16, 2009 Author Report Share Posted September 16, 2009 usei sim porem deu erro de relatorio quando coloquei no meu codigo e aqui pasta do mysql tem a pasta agenda e dentro dela um arquivo db.opt o que é isso? é meu banco? me encomoda pq quando tiro o "!" informa que nao existe que tenho que criar e quando coloco "!" informa que ja existe mesmo se eu tirasse o "!" tinha que me informar que ja existe certo?? Qual outro modo posso saber que minha tabela foi criada? tem algum jeito de visualiza so a estrutura dela sem os dados so os campos que criei? valews Obrigado pela ATENÇÃO e AJUDA! "O homem deve criar as oportunidades e não somente encontrá-las." Fábio Igor (BH-MG) fabio.igor@hotmail.com Iniciante FWH 2.8 [x]Harbour 9.61 xdev 0.70 Pelles C Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted September 16, 2009 Report Share Posted September 16, 2009 Coloque isso depois de conectar e antes do Return .t. Copie e cole e veja o resultado ? "Os arquivos estão neste endereço: ",; ToString(sqlArray("SHOW VARIABLES WHERE VARIABLE_NAME = 'DATADIR'")),; "deverá ter pastas com o nome da suas DB e arquivos.FRM que são as tabelas, não abra os FRM manualmente é perigoso explodi-los"id=code>id=code>Quanto ao ! ele tá ali fazendo o papel dele de "se existe" "se não existe" a mesma coisa que voce fazer assim If existe If não existe e quiser inverter é só falar ao contrário If não existe If existe.. Por isso que o resultado muda se vc. tira, coloca, tira coloca, coloca tira... Acho que agora da pra entender Luiz Arruda - Corumba(MS) FiveWin 9.04 [x]Harbour xDev WS -- Não existe nada de completamente errado no mundo mesmo um relógio parado consegue estar certo duas vezes por dia. - Não Abandone Seu Tópicoid=red> Quote Link to comment Share on other sites More sharing options...
fabin01 Posted September 16, 2009 Author Report Share Posted September 16, 2009 a certo aqui luiz vou postar as funcoes de conecatr e ver se a tabela existe *--- SQL CONNECT ON 'localhost'; PORT 3306; USER "root"; PASSWORD 'solution'; OPTIONS SQL_NO_ERROR; LIB 'MySQL' IF SQLErrorNO() > 0 alert('Nao Conectou') Return .F. else alert('Conexao Estabelecida com sucesso!') endif *----- aDBS:= sqlArray("Show Databases") *----- IF ASCAN(aDBS,{|X|X[1]="agenda"}) # 0 SQLExecute("Use agenda") ELSE IF msgYesNo("DataBase Inexistente"+CRLF+"Deseja Crialo Agora ?","....::DataBases") SQL EXECUTE "CREATE DATABASE agenda" SQLExecute("Use agenda") ENDIF ENDIF Return .t. *------- cCadCliente:={} AAdd(cCadCliente,{"CodCliente","N", 5, 0, .t., ,, ,.t.,.t.}) AAdd(cCadCliente,{"Empresa","C", 35, 0, .t.}) AAdd(cCadCliente,{"Contato","C",35,0}) AAdd(cCadCliente,{"Email","C",50,0,.t.}) AAdd(cCadCliente,{"Telefone","C",11,0}) Function Tabela_Existe() IF (!Table("Cadastro_Clientes")) ? 'Tabela de Cadastro de Cliente ja existe' ELSE IF msgYesNo("Tabela Inexistente"+CRLF+"Deseja Criala ?","...::Tabalea Cadastro de Clientes") DBCREATE("Cadastro_Clientes",cCadCliente) ENDIF ENDIF ? "Os arquivos estão aqui: ",; ToString(sqlArray("SHOW VARIABLES WHERE VARIABLE_NAME = 'DATADIR'")),; "e com MySQL eu não devo trabalhar nem manipular os arquivos, pois esse não é o intuito de se usar banco de dados =D" Return .t.id=code>id=code>quando vou na pasta que ele me informa so ha o db.opt nao os arquivos que voce me falou... estou criando a tabela corretamente?? creio que ela foi criada pq ele emite a mensagem que ela foi criada... ve se tem alguma coisa de estranaha ai no meu codigo?? valews Obrigado pela ATENÇÃO e AJUDA! "O homem deve criar as oportunidades e não somente encontrá-las." Fábio Igor (BH-MG) fabio.igor@hotmail.com Iniciante FWH 2.8 [x]Harbour 9.61 xdev 0.70 Pelles C Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted September 16, 2009 Report Share Posted September 16, 2009 citação:a certo aqui luiz vou postar as funcoes de conecatr e ver se a tabela existe *--- SQL CONNECT ON 'localhost'; PORT 3306; USER "root"; PASSWORD 'solution'; OPTIONS SQL_NO_ERROR; LIB 'MySQL' IF SQLErrorNO() > 0 alert('Nao Conectou') Return .F. else alert('Conexao Estabelecida com sucesso!') endif *----- aDBS:= sqlArray("Show Databases") *----- IF ASCAN(aDBS,{|X|X[1]="agenda"}) # 0 SQLExecute("Use agenda") ELSE IF msgYesNo("DataBase Inexistente"+CRLF+"Deseja Crialo Agora ?","....::DataBases") SQL EXECUTE "CREATE DATABASE agenda" SQLExecute("Use agenda") ENDIF ENDIF Return .t. *------- cCadCliente:={} AAdd(cCadCliente,{"CodCliente","N", 5, 0, .t., ,, ,.t.,.t.}) AAdd(cCadCliente,{"Empresa","C", 35, 0, .t.}) AAdd(cCadCliente,{"Contato","C",35,0}) AAdd(cCadCliente,{"Email","C",50,0,.t.}) AAdd(cCadCliente,{"Telefone","C",11,0}) Function Tabela_Existe() IF (!Table("Cadastro_Clientes")) ? 'Tabela de Cadastro de Cliente ja existe' ELSE IF msgYesNo("Tabela Inexistente"+CRLF+"Deseja Criala ?","...::Tabalea Cadastro de Clientes") DBCREATE("Cadastro_Clientes",cCadCliente) ENDIF ENDIF ? "Os arquivos estão aqui: ",; ToString(sqlArray("SHOW VARIABLES WHERE VARIABLE_NAME = 'DATADIR'")),; "e com MySQL eu não devo trabalhar nem manipular os arquivos, pois esse não é o intuito de se usar banco de dados =D" Return .t.id=code>id=code>quando vou na pasta que ele me informa so ha o db.opt nao os arquivos que voce me falou... estou criando a tabela corretamente?? creio que ela foi criada pq ele emite a mensagem que ela foi criada... ve se tem alguma coisa de estranaha ai no meu codigo?? valews Obrigado pela ATENÇÃO e AJUDA! "O homem deve criar as oportunidades e não somente encontrá-las." Fábio Igor (BH-MG) fabio.igor@hotmail.com Iniciante FWH 2.8 [x]Harbour 9.61 xdev 0.70 Pelles C id=quote>id=quote>Vc. deve ir na pasta que aparece na mensagem e não na pasta do seu aplicativo.. Luiz Arruda - Corumba(MS) FiveWin 9.04 [x]Harbour xDev WS -- Não existe nada de completamente errado no mundo mesmo um relógio parado consegue estar certo duas vezes por dia. - Não Abandone Seu Tópicoid=red> Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted September 16, 2009 Report Share Posted September 16, 2009 Outra coixa.. ve. disse que dá erro se vc. fizer isso USE "cadastro_clientes" as "Select * from cadastro_clientes" Alias "CADASTRO_CLIENTES" New Via "MySQL"id=code>id=code>Diga qual o erro, sabendo que erro fica mas fácil de saber a resposta.. Té + Luiz Arruda - Corumba(MS) FiveWin 9.04 [x]Harbour xDev WS -- Não existe nada de completamente errado no mundo mesmo um relógio parado consegue estar certo duas vezes por dia. - Não Abandone Seu Tópicoid=red> Quote Link to comment Share on other sites More sharing options...
fabin01 Posted September 16, 2009 Author Report Share Posted September 16, 2009 citação:Outra coixa.. ve. disse que dá erro se vc. fizer isso USE "cadastro_clientes" as "Select * from cadastro_clientes" Alias "CADASTRO_CLIENTES" New Via "MySQL"id=code>id=code>Diga qual o erro, sabendo que erro fica mas fácil de saber a resposta.. Té + Luiz Arruda - Corumba(MS) FiveWin 9.04 [x]Harbour xDev WS -- Não existe nada de completamente errado no mundo mesmo um relógio parado consegue estar certo duas vezes por dia. - Não Abandone Seu Tópicoid=red> id=quote>id=quote>luiz eu vo na pasta que ele me indica la an pasta do mysql mas la na pasta agenda so ta o db.opt mais nada... dessa forma que estou criando a tabela esta certo?? o erro é aquele enviar relatorio de erro e aponta pra libmysql valews Obrigado pela ATENÇÃO e AJUDA! "O homem deve criar as oportunidades e não somente encontrá-las." Fábio Igor (BH-MG) fabio.igor@hotmail.com Iniciante FWH 2.8 [x]Harbour 9.61 xdev 0.70 Pelles C Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted September 16, 2009 Report Share Posted September 16, 2009 citação: citação:Outra coixa.. ve. disse que dá erro se vc. fizer isso USE "cadastro_clientes" as "Select * from cadastro_clientes" Alias "CADASTRO_CLIENTES" New Via "MySQL"id=code>id=code>Diga qual o erro, sabendo que erro fica mas fácil de saber a resposta.. Té + Luiz Arruda - Corumba(MS) FiveWin 9.04 [x]Harbour xDev WS -- Não existe nada de completamente errado no mundo mesmo um relógio parado consegue estar certo duas vezes por dia. - Não Abandone Seu Tópicoid=red> id=quote>id=quote>luiz eu vo na pasta que ele me indica la an pasta do mysql mas la na pasta agenda so ta o db.opt mais nada... dessa forma que estou criando a tabela esta certo?? o erro é aquele enviar relatorio de erro e aponta pra libmysql valews Obrigado pela ATENÇÃO e AJUDA! "O homem deve criar as oportunidades e não somente encontrá-las." Fábio Igor (BH-MG) fabio.igor@hotmail.com Iniciante FWH 2.8 [x]Harbour 9.61 xdev 0.70 Pelles C id=quote>id=quote>Tá certo a criação da tabela sim.. Vc. disse anteriormente que já tinha resolvido esse erro. O erro dá quando ?? de mas detalhes a gente fica só dando voltas e sempre acaba no mesmo lugar.. Se não tivesse criado a DB vc. não estaria conectando nela, se conecta em "agenda" logo ela existe.. Como vc. não disse PARA ONDE A MENSAGEM te manda vou chutar no escuro, já era pra vc. ter dito o conteudo da mensagem.. Seus arquivos estão em Arquivos de programas\Mysql ou em Documents and setting\all user\dados de aplicativos\mysql.. ou em outra pasta definida na hora de instalar o Mysql. Procure que vc. vai encontrar. Luiz Arruda - Corumba(MS) FiveWin 9.04 [x]Harbour xDev WS -- Não existe nada de completamente errado no mundo mesmo um relógio parado consegue estar certo duas vezes por dia. - Não Abandone Seu Tópicoid=red> Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted September 16, 2009 Report Share Posted September 16, 2009 Perai ta errado seu código. coloque isto cCadCliente:={} AAdd(cCadCliente,{"CodCliente","N", 5, 0, .t., ,, ,.t.,.t.}) AAdd(cCadCliente,{"Empresa","C", 35, 0, .t.}) AAdd(cCadCliente,{"Contato","C",35,0}) AAdd(cCadCliente,{"Email","C",50,0,.t.}) AAdd(cCadCliente,{"Telefone","C",11,0}) id=code>id=code>Dentro da Função Tabela_existe ou no inicio do seu PRG depois do Function Main() .. lembrando que as variaveis Local tem sempre que estar na frente.. onde ela está nunca vai funcionar.. Nunca coloque nada depois do Return, sempre que o micro chegar no Return .t. ele volta para algun ponto.. Testa ai que agora vai.. Luiz Arruda - Corumba(MS) FiveWin 9.04 [x]Harbour xDev WS -- Não existe nada de completamente errado no mundo mesmo um relógio parado consegue estar certo duas vezes por dia. - Não Abandone Seu Tópicoid=red> Editado por - ico on 16/09/2009 16:50:57 Quote Link to comment Share on other sites More sharing options...
fabin01 Posted September 16, 2009 Author Report Share Posted September 16, 2009 a tabela nao achei luiz e ja coloquei o comando dentro da funçao que voce me falou vou postar as imagens da uma olhada aew que expliquei o que acontece com cada uma quando crio a tabela ue nao tenho que fazer uam referencia a datbase nao?? valews Obrigado pela ATENÇÃO e AJUDA! "O homem deve criar as oportunidades e não somente encontrá-las." Fábio Igor (BH-MG) fabio.igor@hotmail.com Iniciante FWH 2.8 [x]Harbour 9.61 xdev 0.70 Pelles C Editado por - fabin01 on 16/09/2009 17:17:38 Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted September 16, 2009 Report Share Posted September 16, 2009 citação:a tabela nao achei luiz e ja coloquei o comando dentro da funçao que voce me falou vou postar as imagens da uma olhada aew que expliquei o que acontece com cada uma quando crio a tabela ue nao tenho que fazer uam referencia a datbase nao?? valews Obrigado pela ATENÇÃO e AJUDA! "O homem deve criar as oportunidades e não somente encontrá-las." Fábio Igor (BH-MG) fabio.igor@hotmail.com Iniciante FWH 2.8 [x]Harbour 9.61 xdev 0.70 Pelles C Editado por - fabin01 on 16/09/2009 17:17:38 id=quote>id=quote>Mesmo depois de colocar as linhas cCadCliente:={} AAdd(cCadCliente,{"CodCliente","N", 5, 0, .t., ,, ,.t.,.t.}) etc...id=code>id=code>dentro da Function Tabela_existe() ??? Me manda seu PRG inteiro... Té manhã Luiz Arruda - Corumba(MS) FiveWin 9.04 [x]Harbour xDev WS -- Não existe nada de completamente errado no mundo mesmo um relógio parado consegue estar certo duas vezes por dia. - Não Abandone Seu Tópicoid=red> Quote Link to comment Share on other sites More sharing options...
fabin01 Posted September 17, 2009 Author Report Share Posted September 17, 2009 citação: citação:a tabela nao achei luiz e ja coloquei o comando dentro da funçao que voce me falou vou postar as imagens da uma olhada aew que expliquei o que acontece com cada uma quando crio a tabela ue nao tenho que fazer uam referencia a datbase nao?? valews Obrigado pela ATENÇÃO e AJUDA! "O homem deve criar as oportunidades e não somente encontrá-las." Fábio Igor (BH-MG) fabio.igor@hotmail.com Iniciante FWH 2.8 [x]Harbour 9.61 xdev 0.70 Pelles C Editado por - fabin01 on 16/09/2009 17:17:38 id=quote>id=quote>Mesmo depois de colocar as linhas cCadCliente:={} AAdd(cCadCliente,{"CodCliente","N", 5, 0, .t., ,, ,.t.,.t.}) etc...id=code>id=code>dentro da Function Tabela_existe() ??? Me manda seu PRG inteiro... Té manhã Luiz Arruda - Corumba(MS) FiveWin 9.04 [x]Harbour xDev WS -- Não existe nada de completamente errado no mundo mesmo um relógio parado consegue estar certo duas vezes por dia. - Não Abandone Seu Tópicoid=red> id=quote>id=quote>Ja enviei para se email luiz mesmo depois que coloquei no tabela_existe continua tendeu (no arquivo que te enviei nao esta com as alteraçoes nao, mas no meu atual aqui ja fiz mas mesmo assim persiste o problema) uso sqlyog mas memso assim a tabela nao aparec na minha database estou criando certo minha tabela? se ele ta falando q ela existe entao ela deve existir mesmo porem nao encontrei no diretorio que me indicou... o que esta havendo valews Obrigado pela ATENÇÃO e AJUDA! "O homem deve criar as oportunidades e não somente encontrá-las." Fábio Igor (BH-MG) fabio.igor@hotmail.com Iniciante FWH 2.8 [x]Harbour 9.61 xdev 0.70 Pelles C Editado por - fabin01 on 17/09/2009 09:57:03 Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted September 17, 2009 Report Share Posted September 17, 2009 O que é isso uso sqlyog ?? Luiz Arruda - Corumba(MS) FiveWin 9.04 [x]Harbour xDev WS -- Não existe nada de completamente errado no mundo mesmo um relógio parado consegue estar certo duas vezes por dia. - Não Abandone Seu Tópicoid=red> Quote Link to comment Share on other sites More sharing options...
fabin01 Posted September 17, 2009 Author Report Share Posted September 17, 2009 citação:O que é isso uso sqlyog ?? Luiz Arruda - Corumba(MS) FiveWin 9.04 [x]Harbour xDev WS -- Não existe nada de completamente errado no mundo mesmo um relógio parado consegue estar certo duas vezes por dia. - Não Abandone Seu Tópicoid=red> id=quote>id=quote>voce nao usa o sqlyog luiz?? ele é um gerenciador de banco de dados, se estiver errado me corrige ai galera.. Obrigado pela ATENÇÃO e AJUDA! "O homem deve criar as oportunidades e não somente encontrá-las." Fábio Igor (BH-MG) fabio.igor@hotmail.com Iniciante FWH 2.8 [x]Harbour 9.61 xdev 0.70 Pelles C Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted September 17, 2009 Report Share Posted September 17, 2009 citação: citação:O que é isso uso sqlyog ?? Luiz Arruda - Corumba(MS) FiveWin 9.04 [x]Harbour xDev WS -- Não existe nada de completamente errado no mundo mesmo um relógio parado consegue estar certo duas vezes por dia. - Não Abandone Seu Tópicoid=red> id=quote>id=quote>voce nao usa o sqlyog luiz?? ele é um gerenciador de banco de dados, se estiver errado me corrige ai galera.. Obrigado pela ATENÇÃO e AJUDA! "O homem deve criar as oportunidades e não somente encontrá-las." Fábio Igor (BH-MG) fabio.igor@hotmail.com Iniciante FWH 2.8 [x]Harbour 9.61 xdev 0.70 Pelles C id=quote>id=quote>Não uso nada.. apenas instalei o Mysql e a SqlLib e faço via codigo nos Prgs.. Luiz Arruda - Corumba(MS) FiveWin 9.04 [x]Harbour xDev WS -- Não existe nada de completamente errado no mundo mesmo um relógio parado consegue estar certo duas vezes por dia. - Não Abandone Seu Tópicoid=red> Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted September 17, 2009 Report Share Posted September 17, 2009 Assim não vale.. vc. me mandou tudo... menos o PRG, vou ter que quebrar seu EXE e remonta-lo para ver Manda o prg ai vai... Luiz Arruda - Corumba(MS) FiveWin 9.04 [x]Harbour xDev WS -- Não existe nada de completamente errado no mundo mesmo um relógio parado consegue estar certo duas vezes por dia. - Não Abandone Seu Tópicoid=red> Quote Link to comment Share on other sites More sharing options...
fabin01 Posted September 17, 2009 Author Report Share Posted September 17, 2009 citação:Assim não vale.. vc. me mandou tudo... menos o PRG, vou ter que quebrar seu EXE e remonta-lo para ver Manda o prg ai vai... Luiz Arruda - Corumba(MS) FiveWin 9.04 [x]Harbour xDev WS -- Não existe nada de completamente errado no mundo mesmo um relógio parado consegue estar certo duas vezes por dia. - Não Abandone Seu Tópicoid=red> id=quote>id=quote>eu te enviei sim usahuhasuhas mas acabei de reenviar ok? e aew deu uma olhada luiz o que e?? valews Obrigado pela ATENÇÃO e AJUDA! "O homem deve criar as oportunidades e não somente encontrá-las." Fábio Igor (BH-MG) fabio.igor@hotmail.com Iniciante FWH 2.8 [x]Harbour 9.61 xdev 0.70 Pelles C Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted September 17, 2009 Report Share Posted September 17, 2009 cheguei do rango agora.. Cara.. não to recebendo seu arquivo.. se vc. mandou o mesmo RAR tá com erro.. gere outro e tenta abrir com o Winrar pro C ver.. tá dando a mensagem " Teste.agenda.rar: final inesperado do arquivoi" tente zipar a pasta sem dar nome a ela.. creio que este erro seja devido ao "teste"+"agenda.rar" e o que vc. mandou anteriormente tem um arquivo tstd.prg que não tem nada a ver com conecção de mysql to no aguardo.. Luiz Arruda - Corumba(MS) FiveWin 9.04 [x]Harbour xDev WS -- Não existe nada de completamente errado no mundo mesmo um relógio parado consegue estar certo duas vezes por dia. - Não Abandone Seu Tópicoid=red> Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.