Harbour e MySQL
Enviado: 25 Ago 2014 19:38
Bom... vamos deixar a coisa do:
mas lá atrás o José Quintas falou um código:
Para usar esses códigos (que vejo serem específicos comandos mysql) preciso de uma outra .lib ou .ch ?
(A)
prá lá... eu posso ter falado uma besteira... he he he"#include "adordd.ch" em 1 dependência separada
mas lá atrás o José Quintas falou um código:
Para fazer esse CreateObject precisa alguma .lib ?? Pois fui compilar e deu essa função inexistecnMySql := win_OleCreateObject( "ADODB.Connection" )
Código: Selecionar todos
cnMySql:ConnectionString := "dados da conexão"
cSql := "SELECT * FROM base WHERE NAME LIKE 'JOSE'%'"
Rs := cnMySql:Execute( cSql )
DO WHILE .NOT. Rs:Eof()
? rs:Fields( "CODIGO" ):Value
? rs:Fields( "NOME" ):Value
rs:MoveNext()
ENDDO
Rs:Close()
cnMySql:Close()(A)