Antonio, las pruebas las estoy haciendo con hostspain y con los servidores de dinahosting, servidores linux, en dinahosting tengo en la carpeta cgi-bin un binario de ceca compilando en linux y funciona perfectamente.
Un saludo
FiveTech Support Forums
FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour FiveWeb de FiveTech (gratis hasta la versi贸n 1.0)
Javier,
Prueba a copiar y ejecutar harbour (el compilador) en el servidor
Antonio, he copiado harbour y lo he ejecutado y me da este error: Segmentation fault
Un saludo
Javier,
Se me ocurren dos opciones:
-
Que construyas Harbour en el Linux del propio hosting. Asi tendr谩s un Harbour compatible con 茅l. Es muy sencillo, aqui tienes las instrucciones:
a) comprueba que svn est茅 instalado en el servidor. Escribe svn desde una ventana terminal por SSH.
b) En caso de no tenerlo, puedes instalarlo: sudo apt-get install subversion
c) Descarga Harbour: svn checkout https://harbour-project.svn.sourceforge ... ject/trunk harbour
d) ve a la carpeta de Harbour y haz "make" (escribelo y lo ejecutas) -
Que me envies por email el acceso a tu servidor y yo lo reviso desde aqui
luego cambias tu contrase帽a cuando yo termine.
+ A帽adida la Clase TWindow para usar la ventana principal (por defecto)
+ A帽adido el ejemplo samples/demo.prg
http://www.fivetechsoft.net/cgi-bin/demo
demo.prg
+ A帽adido el ejemplo samples/demo.prg
http://www.fivetechsoft.net/cgi-bin/demo
demo.prg
#include "FiveWeb.ch"
//----------------------------------------------------------------------------//
function Main( cParam )
聽 聽SET BACKIMAGE TO "http://fiveweb.googlecode.com/svn/trunk/images/beach.jpg"
聽 聽
聽 聽@ 聽80, 80 SAY "Pulldown Menu" URL hb_argv( 0 ) + "?pdmenu"
聽 聽@ 140, 80 SAY "Dialog" URL hb_argv( 0 ) + "?dialog"
聽 聽do case
聽 聽 聽 case cParam == "pdmenu"
聽 聽 聽 聽 聽 聽BuildMenu()
聽 聽 聽 聽 聽 聽
聽 聽 聽 case cParam == "dialog"
聽 聽 聽 聽 聽 聽BuildDialog()
聽 聽endcase 聽 聽 聽 聽
return nil
//----------------------------------------------------------------------------//
function BuildMenu()
聽 聽local oMenu
聽 聽
聽 聽MENU oMenu
聽 聽 聽 MENUITEM "Info"
聽 聽 聽 MENU
聽 聽 聽 聽 聽MENUITEM "About..." ACTION MsgInfo( "FiveWeb power" )
聽 聽 聽 ENDMENU
聽 聽 聽
聽 聽 聽 MENUITEM "Files"
聽 聽 聽 MENU
聽 聽 聽 聽 聽MENUITEM "Clients"
聽 聽 聽 聽 聽MENUITEM "Stock"
聽 聽 聽 ENDMENU
聽 聽 聽
聽 聽 聽 MENUITEM "Reports"
聽 聽 聽
聽 聽 聽 MENUITEM "Help"
聽 聽ENDMENU
聽 聽
return nil
//----------------------------------------------------------------------------//
function BuildDialog()
聽 聽local oDlg
聽 聽
聽 聽DEFINE DIALOG oDlg TITLE "Hello FiveWeb"
聽 聽
聽 聽ACTIVATE DIALOG oDlg NOWAIT
聽 聽
return nil 聽 聽 聽
//----------------------------------------------------------------------------//
Antonio Linares wrote:+ A帽adida la Clase TWindow para usar la ventana principal (por defecto)
+ A帽adido el ejemplo samples/demo.prg
http://www.fivetechsoft.net/cgi-bin/demo
demo.prg
#include "FiveWeb.ch" //----------------------------------------------------------------------------// function Main( cParam ) SET BACKIMAGE TO "http://fiveweb.googlecode.com/svn/trunk/images/beach.jpg" @ 80, 80 SAY "Pulldown Menu" URL hb_argv( 0 ) + "?pdmenu" @ 140, 80 SAY "Dialog" URL hb_argv( 0 ) + "?dialog" do case case cParam == "pdmenu" BuildMenu() case cParam == "dialog" BuildDialog() endcase return nil //----------------------------------------------------------------------------// function BuildMenu() local oMenu MENU oMenu MENUITEM "Info" MENU MENUITEM "About..." ACTION MsgInfo( "FiveWeb power" ) ENDMENU MENUITEM "Files" MENU MENUITEM "Clients" MENUITEM "Stock" ENDMENU MENUITEM "Reports" MENUITEM "Help" ENDMENU return nil //----------------------------------------------------------------------------// function BuildDialog() local oDlg DEFINE DIALOG oDlg TITLE "Hello FiveWeb" ACTIVATE DIALOG oDlg NOWAIT return nil //----------------------------------------------------------------------------//
Antonio la soluci贸n de usar hb_argv( 0 ) para mi no es buena ya que en vez devolver la ruta url ,devuelve la ruta "f铆sica" del archivo .
En mi caso en vez "/localhost/cgi_bin/demo ? loquesca" me devuelve "localhost//Library/WebServer/CGI-Executables/demo?loquesea"
una solucion seria usar cFileNoPath() y usar una posiccion absoluta ,pero cFileNoPath() no est谩 implementada a煤n.
Saludos.
Manuel,
A ver si nos sirve esta:
A ver si nos sirve esta:
function cFileNoPath( cPathMask ) 聽// returns just the filename no path
聽 聽 local n
聽 聽 cPathMask = StrTran( cPathMask, "/", "\" )
聽 聽 n = RAt( "\", cPathMask )
return If( n > 0 .and. n < Len( cPathMask ),;
聽 聽 聽 聽 聽 聽Right( cPathMask, Len( cPathMask ) - n ),;
聽 聽 聽 聽 聽 聽If( ( n := At( ":", cPathMask ) ) > 0,;
聽 聽 聽 聽 聽 聽Right( cPathMask, Len( cPathMask ) - n ),;
聽 聽 聽 聽 聽 聽cPathMask ) )function AppName()
return cFileNoPath( hb_argv( 0 ) )Solucionado el bug del dise帽ador de ventanas!
Finalmente hemos podido solucionar el problema de jquery ui que nos estaba parando el desarrollo del dise帽ador de ventanas:
la soluci贸n ha sido no modificar la propiedad innerHTML sino usar el objecto DOM y a帽adirle los controles.
http://www.fivetechsoft.net/cgi-bin/fiveform
Finalmente hemos podido solucionar el problema de jquery ui que nos estaba parando el desarrollo del dise帽ador de ventanas:
la soluci贸n ha sido no modificar la propiedad innerHTML sino usar el objecto DOM y a帽adirle los controles.
http://www.fivetechsoft.net/cgi-bin/fiveform
He a帽adido la edicion al ejemplo "otto" en el repositorio. Ya podemos clickar en el browse y editar el registro selecionado . 
A帽adido soporte de barras de progreso en el dise帽ador de ventanas:
http://www.fivetechsoft.net/cgi-bin/fiveform
http://www.fivetechsoft.net/cgi-bin/fiveform
Antonio querido: no se detenga con el proyecto fiveweb es el futuro de los sistemas v铆a intranet... 茅xitos yo sigo esperando el producto terminado. juan carlos.
Soporte de folders para el dise帽ador de ventanas de FiveWeb:
http://www.fivetechsoft.net/cgi-bin/fiveform
http://www.fivetechsoft.net/cgi-bin/fiveform