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
#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
SHELLEXECUTE(GETACTIVEWINDOW(),"open","https://tawk.to/chat/590bc71f64f23d19a89b0d0d/default")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
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