Ho considerato chiusa la discussione precedente sullo stesso argomento perché l'obiettivo che mi ero preposto era stato raggiunto, ma era un dettaglio.
Ora mi sono accorto che una serie di file html e relative immagini, residenti nella cartella del progetto, non vengono letti dal programma installato con le seguenti istruzioni:
Public Sub Form_Open()
...
Mod1.scocfil = user.home & "/cocfiles"
If Not Exist(Mod1.scocfil) Then
Mkdir Mod1.scocfil
Endif
...
End
...
Public Sub Menu3_Click()
Dim ss1 As String
ss1 = "solhelp.htm"
Message.Info("Clicca qui: <a href='" & ss1 & "'>Info solitgio: solhelp.htm</a>" & String$(2, Chr(9)))
End
In realtà il programma dovrebbe avviare il browser di default che a sua volta leggerebbe il primo file della serie e poi, su richiesta dell'utente, i successivi.
Ho voluto provare a mettere tutti questi file nella cartella creata nella home dell'utente finale e, per leggere il primo html ho cambiato l'istruzione
ss1 = "solhelp.htm"
in
ss1 = Mod1.scocfil &/ "solhelp.htm"
Questa modifica ha avuto successo nell'installazione sullo stesso computer, ma credo che non funzionerà quando installerò il programma in un computer diverso, perché qualcuno dovrà portare tutti questi file nel target. Credo che potrei aggiungere delle istruzioni che lo facciano, ma ho pensato che forse gli 'extra file' sono proprio questi. Così, con uno sforzo erculeo
, sono riuscito a mettere qualcosa a pagina 8 della procedura, che però Gambas3 non capisce
.
Nell'allegato potete vedere che cosa ho fatto. Guardate, riflettete e correggete. Grazie.