FiveTech Software tech support forums

www.FiveTechSoft.com
https://forums.fivetechsupport.com/

Para ANTONIO subo proyecto MARIADB sin funcionar REFRESH

https://forums.fivetechsupport.com/viewtopic.php?t=40908

Page 1 of 1

Para ANTONIO subo proyecto MARIADB sin funcionar REFRESH

Posted: Fri Oct 08, 2021 1:15 pm
by goosfancito
Antonio o quien desee probar

Te dejo el enlace del proyecto demo con una sola tabla para que veas que no esta funcionando el refresh del xbrowse con MARIADB si por favor
lo podes ver y decirme que es lo que estoy haciendo mal.

gracias.

https://mega.nz/file/W6ICWTha#2Yq8q2-z6 ... fOlh6FxuaE

Re: Para ANTONIO subo proyecto MARIADB sin funcionar REFRESH

Posted: Fri Oct 08, 2021 2:31 pm
by karinha
Que me falta?

https://imgur.com/undefined

Image

Regards, saludos.

Re: Para ANTONIO subo proyecto MARIADB sin funcionar REFRESH

Posted: Fri Oct 08, 2021 2:37 pm
by karinha
Compilado con HARBOUR, Download completo.

https://mega.nz/file/xENB2Qjb#Cq8iGIVn-6mmbthj1tJdZpoXgRrytuZyhPk-q9CcH3U

Regards, saludos.

Re: Para ANTONIO subo proyecto MARIADB sin funcionar REFRESH

Posted: Fri Oct 08, 2021 3:04 pm
by goosfancito
configura el servidor con mariadb.

Re: Para ANTONIO subo proyecto MARIADB sin funcionar REFRESH

Posted: Fri Oct 08, 2021 3:17 pm
by goosfancito
karinha wrote:Compilado con HARBOUR, Download completo.

https://mega.nz/file/xENB2Qjb#Cq8iGIVn-6mmbthj1tJdZpoXgRrytuZyhPk-q9CcH3U

Regards, saludos.


me lo rechaza el antivirus

Tú computadora no está bién. Instale el AVG ANTI VÍRUS. Como configura? No uso MySQL aún.

Tiens un email que no sea gmail.com ?

Regards, saludos.

Re: Para ANTONIO subo proyecto MARIADB sin funcionar REFRESH

Posted: Fri Oct 08, 2021 3:18 pm
by goosfancito
aviisa que tiene un troyano.

Re: Para ANTONIO subo proyecto MARIADB sin funcionar REFRESH

Posted: Fri Oct 08, 2021 3:26 pm
by karinha
https://imgur.com/w697e12

Image

Regards, saludos.

Re: Para ANTONIO subo proyecto MARIADB sin funcionar REFRESH

Posted: Fri Oct 08, 2021 3:29 pm
by goosfancito
karinha wrote:https://imgur.com/w697e12

Image

Regards, saludos.


no se que decirte aca avisa que tiene troyano y no lo deja descargar.

Re: Para ANTONIO subo proyecto MARIADB sin funcionar REFRESH

Posted: Fri Oct 08, 2021 3:32 pm
by karinha
Que está haciendo el download sin problemas.

Tiens un email que no sea gmail.com ? Que se pueda enviar .RAR?

Skype?

Regards, saludos.

Re: Para ANTONIO subo proyecto MARIADB sin funcionar REFRESH

Posted: Fri Oct 08, 2021 5:32 pm
by carlos vargas
Gustavo, aca este ejemplo me funciono bien, prueba con tu version de fwh
es un dialog, con database embebido como en el modulo que me mostraste ayer.

goss.prg

Code: Select all | Expand


#include "fivewin.ch"

//poner este prg en fwh\samples

REQUEST DBFCDX

procedure main()
   local oCn, oQry, cDataFolder, cLangFolder
   local oDlg, oBrw

   cDataFolder := "d:\fwh\samples\test\" //hacer esta carpeta
   cLangFolder := "d:\fwh\samples\"

   FWCONNECT oCn HOST cDataFolder LANGFOLDER cLangFolder DATABASE "fwh"
   if oCn == nil
      ? "Connect fail"
      return
   endif

   //luego de la primera ejecucion, puedes comentar estas dos lineas.
   oCn:importfromdbf( "states.dbf" )
   xbrowser oCn:states

   oQry := oCn:RowSet( "select * from states" )

   fwdbg oCn, oQry

   define dialog oDlg name "mydlg"

   redefine xbrowse oBrw id 101 of oDlg datasource oQry columns "code", "name" autosort

   redefine button id 102 of oDlg action AddRow( oCn, oQry, oBrw )
   redefine button id 103 of oDlg action oDlg:end()
   
   activate dialog oDlg
    
   oCn:close()

return

procedure AddRow( oCn, oQry, oBrw )
   oCn:insert( "states", "code,name", { "MG", "MANAGUA-" + time() } ) 
   ?"Error:", oCn:nError
   if oCn:nError <> 0
     oCn:ShowError()
   endif
   oQry:Requery()
   oBrw:refresh(.t.)
return


goos.rc

Code: Select all | Expand

// Generated by ResEdit 1.6.6
// Copyright (C) 2006-2015
// http://www.resedit.net

#include <windows.h>

#ifndef WC_TABCONTROL
#define WC_TABCONTROL   "SysTabControl32"
#endif

#ifndef MONTHCAL_CLASS
#define MONTHCAL_CLASS  "SysMonthCal32"
#endif

#ifndef DATETIMEPICK_CLASS
#define DATETIMEPICK_CLASS "SysDateTimePick32"
#endif

#ifndef VOS__WINDOWS32 
#define VOS__WINDOWS32          0x00000004L
#endif

#ifndef VFT_APP
#define VFT_APP                 0x00000001L
#endif

#ifndef VFT2_UNKNOWN
#define VFT2_UNKNOWN            0x00000000L
#endif

#ifndef WC_STATIC
#define WC_STATIC  "Static"
#endif

#include "resource.h"

//
// Dialog resources
//
MYDLG DIALOG 0, 0, 304, 177
STYLE DS_3DLOOK | DS_CENTER | DS_MODALFRAME | DS_SHELLFONT | WS_CAPTION | WS_VISIBLE | WS_POPUP | WS_SYSMENU
CAPTION "Dialog"
FONT 8, "Ms Shell Dlg"
{
    CONTROL         "", 101, "TXBrowse", 0x50020000, 7, 12, 290, 138, 0x00000000
    PUSHBUTTON      "Button", 102, 7, 155, 56, 15, 0, WS_EX_LEFT
    PUSHBUTTON      "Button", 103, 241, 155, 56, 15, 0, WS_EX_LEFT
}
 

resource.h

Code: Select all | Expand


#ifndef IDC_STATIC
#define IDC_STATIC (-1)
#endif
 

Re: Para ANTONIO subo proyecto MARIADB sin funcionar REFRESH

Posted: Fri Oct 08, 2021 5:32 pm
by carlos vargas
Gustavo, aca este ejemplo me funciono bien, prueba con tu version de fwh
es un dialog, con database embebido como en el modulo que me mostraste ayer.

goos.prg

Code: Select all | Expand


#include "fivewin.ch"

//poner este prg en fwh\samples

REQUEST DBFCDX

procedure main()
   local oCn, oQry, cDataFolder, cLangFolder
   local oDlg, oBrw

   cDataFolder := "d:\fwh\samples\test\" //hacer esta carpeta
   cLangFolder := "d:\fwh\samples\"

   FWCONNECT oCn HOST cDataFolder LANGFOLDER cLangFolder DATABASE "fwh"
   if oCn == nil
      ? "Connect fail"
      return
   endif

   //luego de la primera ejecucion, puedes comentar estas dos lineas.
   oCn:importfromdbf( "states.dbf" )
   xbrowser oCn:states

   oQry := oCn:RowSet( "select * from states" )

   fwdbg oCn, oQry

   define dialog oDlg name "mydlg"

   redefine xbrowse oBrw id 101 of oDlg datasource oQry columns "code", "name" autosort

   redefine button id 102 of oDlg action AddRow( oCn, oQry, oBrw )
   redefine button id 103 of oDlg action oDlg:end()
   
   activate dialog oDlg
    
   oCn:close()

return

procedure AddRow( oCn, oQry, oBrw )
   oCn:insert( "states", "code,name", { "MG", "MANAGUA-" + time() } ) 
   ?"Error:", oCn:nError
   if oCn:nError <> 0
     oCn:ShowError()
   endif
   oQry:Requery()
   oBrw:refresh(.t.)
return


goos.rc

Code: Select all | Expand

// Generated by ResEdit 1.6.6
// Copyright (C) 2006-2015
// http://www.resedit.net

#include <windows.h>

#ifndef WC_TABCONTROL
#define WC_TABCONTROL   "SysTabControl32"
#endif

#ifndef MONTHCAL_CLASS
#define MONTHCAL_CLASS  "SysMonthCal32"
#endif

#ifndef DATETIMEPICK_CLASS
#define DATETIMEPICK_CLASS "SysDateTimePick32"
#endif

#ifndef VOS__WINDOWS32 
#define VOS__WINDOWS32          0x00000004L
#endif

#ifndef VFT_APP
#define VFT_APP                 0x00000001L
#endif

#ifndef VFT2_UNKNOWN
#define VFT2_UNKNOWN            0x00000000L
#endif

#ifndef WC_STATIC
#define WC_STATIC  "Static"
#endif

#include "resource.h"

//
// Dialog resources
//
MYDLG DIALOG 0, 0, 304, 177
STYLE DS_3DLOOK | DS_CENTER | DS_MODALFRAME | DS_SHELLFONT | WS_CAPTION | WS_VISIBLE | WS_POPUP | WS_SYSMENU
CAPTION "Dialog"
FONT 8, "Ms Shell Dlg"
{
    CONTROL         "", 101, "TXBrowse", 0x50020000, 7, 12, 290, 138, 0x00000000
    PUSHBUTTON      "Agregar", 102, 7, 155, 56, 15, 0, WS_EX_LEFT
    PUSHBUTTON      "Cerrar", 103, 241, 155, 56, 15, 0, WS_EX_LEFT
}
 

resource.h

Code: Select all | Expand


#ifndef IDC_STATIC
#define IDC_STATIC (-1)
#endif
 

Re: Para ANTONIO subo proyecto MARIADB sin funcionA (RESUELTO)

Posted: Sat Oct 09, 2021 11:03 am
by goosfancito
BUEN DIA.

gracias a todos.

Carlos pudo ver el error que estaba teninedo. mi version de fwh no estaba actualizada y justamete en la que yo estaba usando tenia un bug.

gracias
All times are UTC
Page 1 of 1

Powered by phpBB® Forum Software © phpBB Limited