FiveTech Support Forums

contrib/hbwin/win_rpc.c
contrib/hbwin/tests/testrpc.prg

Dear Cristobal,
thank you.
Can you show me how to pass harbour variable to javascript.
Also a little sample how to show harbour variables inside html code would be great.
Best regards
Otto

Otto,

Your code is fine. The only observation is that you are generating it on the client side.

On a next example lets see how to generate it on the server side

Otto,

Using fields values in HTML code:

use < and > in both extremes, can't write them here:
input id="builder" name="builder" type="text" class="form-control" value="{{_Value('builder')}}"

Where function _Value( cFieldName ) is:

function _Value( cFieldName )

return FieldGet( FieldPos( cFieldName ) )

C5843854-4DB4-1DB9-CCDB08473109
UUID generated on the server

function Main()

   BLOCKS
      ... begins the script
         var value = sessionStorage.getItem( "MyId" );
       
         if( value == null )
         {
            value = "{{generateUUID()}}"; 
            sessionStorage.setItem( "MyId", value );
         }

         d ocument.write( value );
      ... ends the script
   ENDTEXT

   ? "UUID generated on the server"

return nil

function GenerateUUID()

   local cChars := "0123456789ABCDEF"
   local cUUID  := ""

   for n = 1 to 8
      cUUID += SubStr( cChars, hb_Random( 1, 16 ), 1 )
   next
   
   cUUID += "-4"

   for n = 1 to 3
      cUUID += SubStr( cChars, hb_Random( 1, 16 ), 1 )
   next

   cUUID += "-"

   for n = 1 to 4
      cUUID += SubStr( cChars, hb_Random( 1, 16 ), 1 )
   next

   cUUID += "-"

   for n = 1 to 12
      cUUID += SubStr( cChars, hb_Random( 1, 16 ), 1 )
   next
 
return cUUID

Dear Antonio,
would you please be so kind to make me a screenshot of the code insite the post.
Best regards
Otto

Otto,

Using fields values in HTML code:

use < and > in both extremes, can't write them here:
input id="builder" name="builder" type="text" class="form-control" value="{{_Value('builder')}}"

Where function _Value( cFieldName ) is:

function _Value( cFieldName )

return FieldGet( FieldPos( cFieldName ) )

Dear Antonio,
thank you.
can you make me a sceenshot of this code too.
Thank you and best regards
Otto

Using fields values in HTML code:

use < and > in both extremes, can't write them here:
input id="builder" name="builder" type="text" class="form-control" value="{{_Value('builder')}}"

Where function _Value( cFieldName ) is:

function _Value( cFieldName )

return FieldGet( FieldPos( cFieldName ) )

Dear Antonio,
thank you.
Is it possible to change "{{_Value('builder')}}" with xZTranslate.
to HB2HTML('builder').
input id="builder" name="builder" type="text" class="form-control" value=" & HB2HTML('builder').
Thank you in advance
Otto

Otto,

We need to use {{ ... }} so mod_harbour knows what to replace in the view.

You can use ANY function from inside it

Dear Antonio,
I mean hb_htlm() {{ ... }} would be more familiar to us CLIPPER heads.
Does xTranslate also translate code inside BLOCKS ?
Thank you in advance
Otto