Jump to content
Fivewin Brasil

toya

Membros
  • Posts

    293
  • Joined

  • Last visited

  • Days Won

    15

Posts posted by toya

  1. Bom dia...

    Minha sugestão é que envies o vosso arquivo gerado para analise ( toyasis@yahoo.com.br )

    toya

    Ahora en la version 5.8

    toyasis@yahoo.com.br

    http://www.toyanet.com.br

    FWH 8.03+PellesC+xHarbour.org 1.1.0

    FW 2.4+WS 4.5+Blinker 7.0+Clipper 5.2E+Rpv

    Linux 2.4.29 - Slack 10.1 - (No@Say)

    Clippeiro por opção, Fivewiner por amor ao Clipper...

    Editado por - toya on 09/05/2008 08:58:00

  2. Ale, como ja te falei... faço o seguinte nas migraçoes:

    Ativo o FireBird, abro o .GDB via FireBird e exporto para .DBF via Exportizer Pro...

    toya

    (Ahora en la version 5.8)

    toyasis@yahoo.com.br

    http://www.toyanet.com.br

    FWH 2.6+PellesC+xHarbour.org 0.99 - MySql 5.0.12 Beta - SqlLib - Rpv

    FW 2.4+WS 4.5+Blinker 7.0+Clipper 5.2E+Rpv

    Linux 2.4.29 - Slack 10.1 - (No@Say)

  3. Careço do auxilio de pelo menos uns 3 colegas, especialmente de SP ou envolvidos com a CAT-52/SP para testarem um pequeno aplicativo que elaborei para a geração da Chave Privada e da Assinatura Digital (Registro tipo EAD) utilizando o OpenSSl.

    Tal aplicativo será disponibilizado gratuitamente à Comunidade Clippeira-Fivewin através do sub-projeto toyaOpen/Projeto tuareg da toyaNET.

    Os interessados em colaborar favor enviar e-mail para toyasis@yahoo.com.br assunto: TESTE CAT-52/SP-EAD

    http://www.toyanet.com.br/cat52sp/fwhcat52.jpg

    toya

    (Ahora en la version 5.8)

    toyasis@yahoo.com.br

    http://www.toyanet.com.br

    FWH 2.6+PellesC+xHarbour.org 0.99 - MySql 5.0.12 Beta - SqlLib - Rpv

    FW 2.4+WS 4.5+Blinker 7.0+Clipper 5.2E+Rpv

    Linux 2.4.29 - Slack 10.1 - (No@Say)

    Editado por - toya on 16/04/2008 07:33:33

    Editado por - toya on 16/04/2008 07:34:52

  4. Careço do auxilio de pelo menos uns 3 colegas, especialmente de SP ou envolvidos com a CAT-52/SP para testarem um pequeno aplicativo que elaborei para a geração da Chave Privada e da Assinatura Digital (Registro tipo EAD) utilizando o OpenSSl.

    Tal aplicativo será disponibilizado gratuitamente à Comunidade Clippeira-Fivewin através do sub-projeto toyaOpen/Projeto tuareg da toyaNET.

    Os interessados em colaborar favor enviar e-mail para toyasis@yahoo.com.br assunto: TESTE CAT-52/SP-EAD

    http://www.toyanet.com.br/cat52sp/fwhcat52.jpg

    toya

    (Ahora en la version 5.8)

    toyasis@yahoo.com.br

    http://www.toyanet.com.br

    FWH 2.6+PellesC+xHarbour.org 0.99 - MySql 5.0.12 Beta - SqlLib - Rpv

    FW 2.4+WS 4.5+Blinker 7.0+Clipper 5.2E+Rpv

    Linux 2.4.29 - Slack 10.1 - (No@Say)

    Editado por - toya on 16/04/2008 07:33:33

    Editado por - toya on 16/04/2008 07:34:52

  5. Evandro, mui grato pelos elogios...

    Mas é que tive bons mestres, tu fostes um deles...

    Para gerar o box tente algo assim:

    
    

    cBox:=''

    cBox+='{c=2;box=0, 0,11340,1080}'+CRLF

    cBox+='{c=2;box=0,1140,11340,14660}'+CRLF

    id=code>id=code>

    toya

    (Ahora en la version 5.8)

    toyasis@yahoo.com.br

    http://www.toyanet.com.br

    FWH 2.6+PellesC+xHarbour.org 0.99 - MySql 5.0.12 Beta - SqlLib - Rpv

    FW 2.4+WS 4.5+Blinker 7.0+Clipper 5.2E+Rpv

    Linux 2.4.29 - Slack 10.1 - (No@Say)

  6. Veja aqui a receita do bolo:

    
    

    <?xml version="1.0" encoding="ISO-8859-1" ?>

    xmlns:sngpc="urn:sngpc-schema" targetNamespace="urn:sngpc-schema"

    elementFormDefault="qualified">

    id=code>id=code>

    toya

    (Ahora en la version 5.8)

    toyasis@yahoo.com.br

    http://www.toyanet.com.br

    FWH 2.6+PellesC+xHarbour.org 0.99 - MySql 5.0.12 Beta - SqlLib - Rpv

    FW 2.4+WS 4.5+Blinker 7.0+Clipper 5.2E+Rpv

    Linux 2.4.29 - Slack 10.1 - (No@Say)

  7. Eu utilizo assim:

    ...

    win_exec( 'copy mfpc52.ini mp_pc52.ini' )

    ...

    ////////////////////////////////////////////////////////////////////////////////

    //

    ////////////////////////////////////////////////////////////////////////////////

    function Win_exec( cComando )

    local cExecute:=GetEnv( 'COMSPEC' ) + ' /C '

    if WinExec( 'start '+alltrim( cComando ), 0 ) < 32 // Tenta executar com START, se retorno < 32

    WinExec( cExecute+alltrim( cComando ), 0 ) // é Win 2000 ou superior, executa com CMD.EXE

    endif

    return nil

    '>

    ...

    win_exec( 'copy mfpc52.ini mp_pc52.ini' )

    ...

    ////////////////////////////////////////////////////////////////////////////////

    //

    ////////////////////////////////////////////////////////////////////////////////

    function Win_exec( cComando )

    local cExecute:=GetEnv( 'COMSPEC' ) + ' /C '

    if WinExec( 'start '+alltrim( cComando ), 0 ) < 32 // Tenta executar com START, se retorno < 32

    WinExec( cExecute+alltrim( cComando ), 0 ) // é Win 2000 ou superior, executa com CMD.EXE

    endif

    return nil

    toya

    (Ahora en la version 5.8)

    toyasis@yahoo.com.br

    http://www.toyanet.com.br

    FWH 2.6+PellesC+xHarbour.org 0.99 - MySql 5.0.12 Beta - SqlLib - Rpv

    FW 2.4+WS 4.5+Blinker 7.0+Clipper 5.2E+Rpv

    Linux 2.4.29 - Slack 10.1 - (No@Say)

  8. Com o exemplo abaixo eu retiro "todos" os chr(12)...

    
    

    ...

    TxtFile( 'arquivox.prn', strtran( memoread( 'arquivo.prn' ), chr(12), '' ), .t. )

    ...

    ///////////////////////////////////////////////////////////////////////////////

    // toya

    ///////////////////////////////////////////////////////////////////////////////

    function TxtFile( cFileName, aInfo, lCriaNovo )

    local hFile, cLine:=dtoc( date() ) + " " + time() + ": ", n:=0

    DEFAULT lCriaNovo:=.f.

    if valtype( aInfo )=='C'

    cLine:=aInfo

    else

    cLine:=''

    for n=1 to len( aInfo )

    cLine+=cValToChar( aInfo[ n ] ) + ' '

    next

    cLine+=CRLF

    endif

    if lCriaNovo

    fclose( ferase( cFileName ) )

    endif

    if !file( cFileName )

    fclose( fcreate( cFileName ) )

    endif

    if( ( hFile:=fopen( cFileName, FO_WRITE ) )!=-1 )

    fseek( hFile, 0, FS_END )

    fwrite( hFile, cLine, len( cLine ) )

    fclose( hFile )

    endif

    return nil

    id=code>id=code>

    toya

    (Ahora en la version 5.8)

    toyasis@yahoo.com.br

    http://www.toyanet.com.br

    FWH 2.6+PellesC+xHarbour.org 0.99 - MySql 5.0.12 Beta - SqlLib - Rpv

    FW 2.4+WS 4.5+Blinker 7.0+Clipper 5.2E+Rpv

    Linux 2.4.29 - Slack 10.1 - (No@Say)

×
×
  • Create New...