Re: Instalando e compilando
Enviado: 28 Out 2010 21:25
Se for analisar desde o início, eu diría que faltou um pouco de calma para estudar as propostas. Até entendo que o colega possa não estar tendo o devido tempo, mas precisa dedicar um certo tempo e calma para o que se pretende fazer.
Para o que o colega pretende fazer, basta usar a SQLLIB Free.
Baixando o pacote dela basta:
1º Pegar a libmysql.lib referente a versão do xharbour que estiver usando e colocar na pasta LIB do xHarbour;
2º No início do código, usar as funções de conexão com o banco;
3º De posse do help enviado junto com a sqllib, ver qual função será melhor para utilizar no caso;
4º Sobre os ajustes no hbmake, é muito simples, basta usar o bom senso e qualquer dúvida é só ir postando.
Um detalhe: Não ví o colega mencionar que instalou o BCC para linkar o projeto. Será necessário:
xHarbour + BCC5.5.1 + SQLLIB Free
Um exemplo de código para conexão.
Para o que o colega pretende fazer, basta usar a SQLLIB Free.
Baixando o pacote dela basta:
1º Pegar a libmysql.lib referente a versão do xharbour que estiver usando e colocar na pasta LIB do xHarbour;
2º No início do código, usar as funções de conexão com o banco;
3º De posse do help enviado junto com a sqllib, ver qual função será melhor para utilizar no caso;
4º Sobre os ajustes no hbmake, é muito simples, basta usar o bom senso e qualquer dúvida é só ir postando.
Um detalhe: Não ví o colega mencionar que instalou o BCC para linkar o projeto. Será necessário:
xHarbour + BCC5.5.1 + SQLLIB Free
Um exemplo de código para conexão.
Código: Selecionar todos
#include "sqllib.ch"
#include "inkey.ch"
REQUEST SQLLIB
REQUEST MYSQL
Function main
cls
publ nConn:= SQLConnect( "192.168.1.111", 3306, "bancosql", "usuario", "senha",SQL_NO_WARNING,"MySQL" )
IF SQLErrorNO() > 0
alert( 'Deu zica no meio de campo' )
endif
USE tabela NEW VIA "MYSQL"
sqlexec(comando,,nConn) // esta função executa comandos SQL lá no servidor,
sqlcommit() // para commitar os dados
SQLDISCONNECT(.t.) // para desconectar