Page 2 of 2

Re: Talk.to chat in ActiveX

Posted: Wed Feb 03, 2021 7:24 pm
by Otto
Hello Christiano,
I don't think you can add mod Harbour on to any hosted service.

The only server offering hosted services is xBhosts.com

https://www.modharbour.club/mh_videogallery/index.prg

But don't you have the possibility to host a web server on your PC. It is an onclick installation.

Best regards,
Otto

Re: Talk.to chat in ActiveX

Posted: Thu Feb 04, 2021 2:36 pm
by karinha

Code: Select all

#Include "FiveWin.Ch"

Static oWnd

Function Main()

   LOCAL cUrl, cParam, cUrlFin, oDlg, oBtn, oFnt, oFont

   cUrl    := ( "https://tawk.to/chat/590bc71f64f23d19a89b0d0d/default" )

   // Nao entendi o que faz isso, pelo menos, abre o Navegador(IE).
   cParam  := ( "#hl=br&gs_nf=1&cp=5&gs_id=m&xhr=t&q=fivewin&pf=p&biw=1024&bih=502&sclient=psy-ab&oq=fivew&gs_l=&pbx=1&bav=on.2,or.r_gc.r_pw.r_cp.r_qf.,cf.osb&fp=531bac45c1a76a40" )

   cUrlFin := ( cUrl + cParam )

   //-> Invisibilizo a Janela
   DEFINE WINDOW oWnd FROM -10, -10 TO -5, -5

   ACTIVATE WINDOW oWnd                                                      ;
      ON INIT( ( MeuWinExec( "Start Iexplore.Exe " + cUrlFin, 0 ) ), oWnd:End() )

Return Nil

FUNCTION MeuWinExec( cParametro )

    LOCAL cExecute := GetPvProfString( "" )

    // NT, 2000 e XP
    IF  IsWinNT() .OR. IsWin2000()
        cExecute := GetEnv( "COMSPEC" ) + " /C "
    ENDIF

RETURN WinExec( cExecute + cParametro, 0 )

//-> Fim do programa
 

Re: Talk.to chat in ActiveX

Posted: Thu Feb 04, 2021 4:40 pm
by ctoas
Hello João.

This way I already do it and in a much simpler way.

Code: Select all

SHELLEXECUTE(GETACTIVEWINDOW(),"open","https://tawk.to/chat/590bc71f64f23d19a89b0d0d/default")
 
I would like to open it within a system dialog, it would be more professional. I've looked at a lot of ActiveX but for some detail it doesn't open.

Thank you.

Re: Talk.to chat in ActiveX

Posted: Thu Feb 04, 2021 7:30 pm
by Otto
Hello Christiano,
Thank you for showing us tawk.to.
I signed in and added the script to my test web page
https://www.modharbour.club/winhotelqr/index.prg
Do I understand you well that you want a customer to open a chat from your Fivewin program?
Can you please post a screenshot of how you imagine your input screen?
Best regards,
Otto

Re: Talk.to chat in ActiveX

Posted: Thu Feb 04, 2021 7:50 pm
by Otto
Christiano, where do you get the link from: https://tawk.to/chat/590bc71f64f23d19a89b0d0d/default? Would this also be the link you insert into an email.
Best regards,
Otto