Search found 332 matches

by Wanderson
Mon Feb 06, 2017 4:23 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Interceptar erro
Replies: 4
Views: 759

Interceptar erro

Olá, Como posso interceptar este erro e evitar que o programa encerre? line= oServerWS:send() Error= Application =========== Path and name: C:\BAIXA\VEBAIXADA.exe (32 bits) Size: 2,065,408 bytes Time from start: 0 hours 4 mins 6 secs Error occurred at: 06/02/2017, 14:23:38 Error description: Error M...
by Wanderson
Sun Jan 01, 2017 6:51 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Richedit
Replies: 2
Views: 979

Richedit

Olá,

Pode richedit exibir uno xml con identação?

Gracias.
by Wanderson
Mon Nov 28, 2016 5:41 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Strange seek behaviour
Replies: 3
Views: 691

Re: Strange seek behaviour

Wanderson: cambie/troque, UF C (45) Por: UF C(2) SP, RJ, MG, PE, PI, etc. Se der um SEEK por código, use o VAL para indexar, pois você disse que era C(7) no código. Saludos. Desculpe karinha, digitei errado é 2 mesmo. Estranho demais, todas as outras cidades encontra mas essa sempre dá falso no see...
by Wanderson
Mon Nov 28, 2016 3:47 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Strange seek behaviour
Replies: 3
Views: 691

Strange seek behaviour

Hi, I have a file with many records with 3 fields NOME C (45) UF C (45) CODIGO C (7) A index TAG CIDADEUF with key NOME+UF in this file i have 2 records in especific NOME = SAO PAULO UF = SP CODIGO = 1111111 and another NOME = EMBU UF = SP CODIGO = 2222222 If a seek the second record the result is f...
by Wanderson
Thu Oct 13, 2016 2:04 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Maýusculas por defecto en un GET
Replies: 2
Views: 642

Re: Maýusculas por defecto en un GET

Loren wrote:Compañeros, buenas:

¿Hay alguna manera de poner en un GET el bloqueo de maýusculas por defecto al empezar a escribir y que el cliente quite manualmente el bloqueo de mayúsculas si desea escribir en minúsculas?

Gracias.
Un saludo.
LORENZO.
Picture "@!" ou Upper case = yes en .res file.
by Wanderson
Wed Sep 21, 2016 5:30 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Sobre xml
Replies: 3
Views: 501

Re: Sobre xml

Antonio Linares wrote:Haz MsgInfo( ValType( xmlNode:cData ) ) y dinos que valor muestra
Muestra U si estas vazio e C se tem conteúdo.

Gracias.
by Wanderson
Tue Sep 20, 2016 12:59 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Sobre xml
Replies: 3
Views: 501

Sobre xml

Olá,

Utilizo as funções para ler um xml:

xmlNode := xmlIter:Find('IE')
If xmlNode:cName = "IE"
IE_Des := Upper(xmlNode:cData)
Endif

Se a tag IE estiver vazia me causa erro em IE_Des := Upper(xmlNode:cData) e aborta o programa.
Como evitar?

Gracias.
by Wanderson
Tue Jul 26, 2016 1:09 am
Forum: FiveWin para Harbour/xHarbour
Topic: xbrowse com um só registro
Replies: 2
Views: 489

Re: xbrowse com um só registro

cmsoft wrote:Si haces oTemp072:GoTop() o oBrw:GoTop() para que vaya al principio del archivo de nuevo?
Porque la rutina que pusiste el registro queda parado en el ultimo.
Gracias no funciona veja:

Image
by Wanderson
Mon Jul 25, 2016 6:44 pm
Forum: FiveWin para Harbour/xHarbour
Topic: xbrowse com um só registro
Replies: 2
Views: 489

xbrowse com um só registro

Ola, Tenho um xbrowse de um arquivo vazio. Quando gravo alguns registro neste arquivo e refresco o xbrowse me mostra somente o primeiro registro. Alguma idéia? ... oTemp072:Zap() oBrw := TXBrowse():New( oDlg ) oBrw:nMarqueeStyle := MARQSTYLE_HIGHLROW oBrw:CreateFromResource( 4047 ) oBrw:nColDividerS...
by Wanderson
Thu Jul 21, 2016 12:50 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Ajuda com xbrowse
Replies: 0
Views: 537

Ajuda com xbrowse

Olá no me funciona xbrowse com bitmaps. O que está errado? // Definição do xbrowse oBrw := TXBrowse():New( oDlg ) oBrw:nMarqueeStyle := MARQSTYLE_HIGHLROW oBrw:CreateFromResource( 4047 ) oBrw:nColDividerStyle := 5 //LINESTYLE_BLACK // COLUNAS oBrw:lColDividerComplete := .T. oBrw:nHeaderHeight :=30 o...
by Wanderson
Thu Jul 21, 2016 12:42 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Ajuda com cdo email
Replies: 2
Views: 466

Re: Ajuda com cdo email

Obrigado karinha o primeiro link funcionou, está lento mas está enviando, vou tentar achar agora o problema da lentidão.
by Wanderson
Thu Jul 14, 2016 12:21 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Ajuda com cdo email
Replies: 2
Views: 466

Ajuda com cdo email

Hola,

Cdo funciona perfeito em windows10 e não no server 2008 (lento e não envia). Alguma sugestão?

Gracias
by Wanderson
Wed May 25, 2016 2:13 pm
Forum: FiveWin for Harbour/xHarbour
Topic: email CDO caracter problem
Replies: 13
Views: 1849

Re: email CDO caracter problem

karinha wrote:Wanderson, usando o meu RMAIL.PRG está normal. Veja - mira - look:

Image

Saludos, regards.
Karinha, pode disponibilizar? Obrigado!
by Wanderson
Wed May 25, 2016 1:09 pm
Forum: FiveWin for Harbour/xHarbour
Topic: email CDO caracter problem
Replies: 13
Views: 1849

Re: email CDO caracter problem

karinha wrote:xHarbour, normal:

Image
karinha, mostrando com um alert fica normal sim. Mas após enviar o email com esse texto no corpo o destinatário quando abre, aparece caracteres trocados por causa do cedilha e acentos. Valeu!
by Wanderson
Wed May 25, 2016 12:50 pm
Forum: FiveWin for Harbour/xHarbour
Topic: email CDO caracter problem
Replies: 13
Views: 1849

Re: email CDO caracter problem

local cTxt := OemToAnsi( "Segue convocação para assembleia geral extraordinária tendo como pauta negociação da convenção coletiva." )   .or. local cTxt := AnsiToOem( "Segue convocação para assembleia geral extraordinária tendo como pauta negociação da convenção coletiva." )   Re...