Search found 13 matches

by digordo
Tue Feb 24, 2015 6:36 pm
Forum: FiveWin para Harbour/xHarbour
Topic: HB_UNZIPFILE GPF ERROR
Replies: 1
Views: 440

HB_UNZIPFILE GPF ERROR

Boa tarde, pessoal!

Estou tendo um problema ao descompactar arquivos zip. Ao executar a função Hb_UnzipFile esta dando GPF.

FUNCTION U_TESTE()HB_UNZIPFILE( "C:\TEMP\000000000000049.zip" ,, .f. ,"PASSWORD", "C:\TEMP\", , ) RETURN      

xHarbour Comercial + FW 13.06
by digordo
Thu Oct 23, 2014 4:05 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Problem with "timer + tprogress"
Replies: 2
Views: 601

Problem with "timer + tprogress"

I am having problems when I use a timer with a tprogress. What happens is that as soon as I call the SetPos of progress, the timer ignores the interval that was previous defined to it.

An example is when I create a timer with a 15 seconds interval and activate it. At the time I call the SetPos of ...
by digordo
Thu Oct 23, 2014 1:40 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Problema com timer + tprogress
Replies: 2
Views: 720

Problema com timer + tprogress

Fala pessoal!

Estou com problema quando utilizo um timer junto com um tprogress. Ocorre que assim que chamo o SetPos do progress o timer passa a desconsiderar o intervalo que foi definido para ele.

Por exemplo, crio um timer com intervalo de 15 segundos e ativo ele, até aqui tudo bem, no momento ...
by digordo
Wed Apr 30, 2014 7:58 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Ayuda con ADO
Replies: 2
Views: 717

Re: Ayuda con ADO

lafug, tente desta forma:


FUNCTION EJECUTA()LOCAL oConexionAdo := CreateObject("ADODB.Connection")LOCAL oRecordSet := CreateObject("ADODB.Recordset")Local cSQL := "SELECT * from AFP"oConexionAdo:Open("Driver={MySQL ODBC 3.51 Driver};Server="+ALLTRIM(cHost&#41 ...
by digordo
Fri Apr 25, 2014 12:44 pm
Forum: FiveWin for Harbour/xHarbour
Topic: ADO with DBF (accentuation)
Replies: 4
Views: 993

Re: ADO with DBF (accentuation)

Jack, look in the provider string connection, something like charset=ISOXXXX.


Jack wrote:I have the same problem with MS SQL .

It is fine with xharbour and Fivewin 9.11 but with Harbour and Fivewin 2012 not .

What is the register key for Ms SQL .

Thanks.
by digordo
Thu Apr 17, 2014 7:12 pm
Forum: FiveWin para Harbour/xHarbour
Topic: ADO com DBF (Recno)
Replies: 0
Views: 334

ADO com DBF (Recno)

Estou acessando a tabela DBF via ADO e gostaria de obter o Recno físico da tabela. Vi que o RecordSet do ADO possui tanto a BookMark como a AbsolutiPosition, mas ambas retornam a posição de um registro referente ao RecordSet em vez de obter o posição do registro da tabela física.


Alguem sabe como ...
by digordo
Thu Apr 17, 2014 7:00 pm
Forum: FiveWin para Harbour/xHarbour
Topic: ADO com DBF (Acentuação)
Replies: 1
Views: 448

Re: ADO com DBF (Acentuação)

Achei!


É só alterar a chave do registro do windows: HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Jet\4.0\Engines\xBase, DataCodePage=OEM para DataCodePage=ANSI


Valeu
by digordo
Thu Apr 17, 2014 6:59 pm
Forum: FiveWin for Harbour/xHarbour
Topic: ADO with DBF (accentuation)
Replies: 4
Views: 993

Re: ADO with DBF (accentuation)

I found!

Is just change de register in windows: HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Jet\4.0\Engines\xBase, DataCodePage=OEM to DataCodePage=ANSI


Thanks
by digordo
Thu Apr 17, 2014 1:44 pm
Forum: FiveWin for Harbour/xHarbour
Topic: ADO with DBF (accentuation)
Replies: 4
Views: 993

ADO with DBF (accentuation)

hi guys!

I'm use select in a table DBF with ADO, and the accentuation in RecordSet is wrong. Anyone know how to fix?

Function U_Teste()Local oConnLocal cSQLLocal rsClaimsoConn:= CreateObject("ADODB.Connection")oConn:Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\temp ...
by digordo
Fri Apr 11, 2014 7:21 pm
Forum: FiveWin para Harbour/xHarbour
Topic: ADO com DBF (Acentuação)
Replies: 1
Views: 448

ADO com DBF (Acentuação)

Fala pessoal!

Estou fazendo um select em uma tabela DBF via ADO, e a acentuação no RecordSet esta incorreta. Alguém já passou por isto?

Function U_Teste()Local oConnLocal cSQLLocal rsClaimsoConn:= CreateObject("ADODB.Connection")oConn:Open("Provider=Microsoft.Jet.OLEDB.4.0 ...
by digordo
Tue Oct 22, 2013 1:52 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Como criar um WebService
Replies: 1
Views: 597

Como criar um WebService

Alguem tem algum exemplo de como criar um WebService em Harbour ou xHarbour?

Não é para conectar em um WebService, mas sim criar um novo, que consome metodos HTTP GET e POST.
by digordo
Tue Dec 18, 2012 12:23 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Dll Parameter Type (POINTER) and return (BYTE)
Replies: 0
Views: 375

Dll Parameter Type (POINTER) and return (BYTE)

Hi Guys!

I'm execute a Dll Function and some parameters is Ref BYTE type. How can i call ?

See code in xHarbour:

Function Test()Local hHandle := LoadLibrary("EasyInner.dll")Local pReceberDados := DllPrepareCall( hHandle, DC_CALL_STD,"ReceberDadosOnLine") Local nNumCol ...
by digordo
Mon Nov 07, 2011 4:28 pm
Forum: All products support
Topic: ActiveX shell.explorer
Replies: 2
Views: 3565

ActiveX shell.explorer

Fala Pessoal!

Estou tendo um problema usando o activex shell.explorer.
Uso ele para abrir uma pagina web em uma window ou dialog.
Acontece que, de forma intermitente, ocorre erro gpf ao abrir a pagina.
Alguem tem idéia do que pode estar ocorrendo?

Exemplo do código:
Function WebExe(cLink&#41 ...