FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexAll discussionsLogin (GitHub)
Board index FiveWin for Harbour/xHarbour FWH for Web - For Antonio
cdmmaui
Posts: 708
Joined: Fri Oct 28, 2005 09:53 AM
FWH for Web - For Antonio
Posted: Wed Oct 12, 2011 05:28 PM

Dear Antonio,

What is the outlook with FWH and providing a web enabled application development environment? If you have any timelines, I would really appreciate it. I have several projects that require web enabled applications and I would like to continue with FWH. I purchased FiveWeb but there are so many limitations and updates are slow. I need a reliable commercial development environment and I am really hoping FWH has something in the works.

I look forward to hearing back from you.

Sincerely,

*~*~*~*~*~*~*~*~*~*
Darrell Ortiz
CDM Software Solutions, Inc.
https://www.cdmsoft.com
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: FWH for Web - For Antonio
Posted: Wed Oct 12, 2011 06:31 PM
Darrell,

We are currently doing R+D on HTML5 WebSockets technology as we believe this is the right way to go:

https://groups.google.com/group/harbour-devel/browse_frm/thread/9f421006cf80e1b9?hl=es#

viewtopic.php?f=3&t=22609&start=0&hilit=TWebServer

We can't exactly say how long it will take, but we really want to deliver an easy and powerfull Harbour + FWH development for the web :-)
regards, saludos

Antonio Linares
www.fivetechsoft.com
ukservice
Posts: 417
Joined: Tue Feb 23, 2010 03:09 PM
Re: FWH for Web - For Antonio
Posted: Thu Oct 13, 2011 08:43 AM

Antonio,

So you are NOT going to develop something such as Fiveweb, that allows using the same FWH sintax but provides a web output?.

Thanks.

FWH 11.11, Harbour 3.1 and Borland C++ 5.82
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: FWH for Web - For Antonio
Posted: Thu Oct 13, 2011 10:24 AM

John,

We are working on its development :-)

regards, saludos

Antonio Linares
www.fivetechsoft.com
ukservice
Posts: 417
Joined: Tue Feb 23, 2010 03:09 PM
Re: FWH for Web - For Antonio
Posted: Thu Oct 13, 2011 12:17 PM
Antonio,

Thank you.

viewtopic.php?f=3&t=22609&start=0&hilit=TWebServer is a Web server such as IIS, Apache, etc, but does not allow to use FWH code as Fivewweb does:

Code (fw): Select all Collapse
#include "fiveweb.ch"

  Function Main()
  Local oWnd,oBmp
  Define Window oWnd Title "Bitmap in Web"
     @0,0 Bitmap oBmp File "c:\paysoft\webpay\www\fiveweb\imagens\spash.jpg" 
     oWnd:oClient := oBmp
  
  Activate Window oWnd Maximized
  Return Nil
FWH 11.11, Harbour 3.1 and Borland C++ 5.82
norberto
Posts: 566
Joined: Thu Aug 30, 2007 03:40 PM
Re: FWH for Web - For Antonio
Posted: Thu Oct 13, 2011 01:54 PM

I have much interest in this topic, I have a few projects to be done, but must have access to webservices and run in browser mode.

Enrico Maria Giordano
Posts: 9020
Joined: Thu Oct 06, 2005 08:17 PM
Re: FWH for Web - For Antonio
Posted: Thu Oct 13, 2011 06:04 PM
ukservice wrote:TWebServer is a Web server such as IIS, Apache, etc, but does not allow to use FWH code as Fivewweb does:


When we'll have a full working FWH webserver we can implement a FWH script interpreter into it.

EMG
Enrico Maria Giordano

e.m.giordano@emagsoftware.it
http://www.emagsoftware.it
http://www.emagsoftware.it/emgmusic
http://www.emagsoftware.it/spectrum
http://www.emagsoftware.it/tbosg
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: FWH for Web - For Antonio
Posted: Thu Oct 13, 2011 06:35 PM
FWH Class TWebServer already allows to place Harbour code into HTML pages! :-)

Please review Class TWebServer Method HtmlMerge(), whatever is placed in between <<...>> gets macro expanded:

Code (fw): Select all Collapse
METHOD HtmlMerge( cHtml, cParams, mSocket, cQuery ) CLASS TWebServer

   local nStart, nEnd, cBlock, bOldError

   private parameters := cParams

   private nSocket    := mSocket
   private Query      := cQuery
   private Cookie     := ::cCookie

   BEGIN SEQUENCE
      bOldError = ErrorBlock( { || DoBreak() } )
      while ( nStart := At( "<<", cHtml ) ) != 0
         nEnd = At( ">>", SubStr( cHtml, nStart + 2 ) )
         cBlock = SubStr( cHtml, nStart + 2, nEnd - 1 )
         cHtml = SubStr( cHtml, 1, nStart - 1 ) + ;
            If( ! Type( cBlock ) == "U", cValToChar( &( cBlock ) ), "( expression error )" ) + ;
                SubStr( cHtml, nStart + nEnd + 3 )
      end
   END SEQUENCE
   ErrorBlock( bOldError )
   nSocket = 0

return cHtml
regards, saludos

Antonio Linares
www.fivetechsoft.com
Enrico Maria Giordano
Posts: 9020
Joined: Thu Oct 06, 2005 08:17 PM
Re: FWH for Web - For Antonio
Posted: Thu Oct 13, 2011 08:11 PM

Great! :-)

EMG

Enrico Maria Giordano

e.m.giordano@emagsoftware.it
http://www.emagsoftware.it
http://www.emagsoftware.it/emgmusic
http://www.emagsoftware.it/spectrum
http://www.emagsoftware.it/tbosg
norberto
Posts: 566
Joined: Thu Aug 30, 2007 03:40 PM
Re: FWH for Web - For Antonio
Posted: Thu Oct 13, 2011 08:42 PM

antonio, have a litle sample?

Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: FWH for Web - For Antonio
Posted: Thu Oct 13, 2011 09:45 PM

Norberto,

Example:

...
<h1><<Date()>></h1>

</body>
</html>

regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion

Static archive · New replies & topics via GitHub Discussions