FWH for Web - For Antonio

[cdmmaui]

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,

[Antonio Linares]

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

[ukservice]

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.

[Antonio Linares]

John,

We are working on its development

[ukservice]

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: Select all  Expand view

#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

 

[norberto]

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]

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

[Antonio Linares]

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: Select all  Expand view

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
 

[Enrico Maria Giordano]

Great!

EMG

[norberto]

antonio, have a litle sample?

[Antonio Linares]

Norberto,

Example:

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

</body>
</html>