[VB6] Evento del primo avvio del programma

[Ketto93]

Il mio quesito è il seguente: esiste un evento del form che mi permette di far visualizzare un altro form automaticamente solamente durante il primo avvio del programma?

Mi spiego meglio. Quello che vorrei fare io è un form in cui si inserisce la home page predefinita del browser. Per il momento questo form l'ho collegato al form del browser tramite menù ma vorrei che il form che contiene la modifica della home si visualizzi solo la prima volta che si avvia il programma e poi, se si vuole modificare ancora, si va sul menù ecc...

Grazie

[MItaly]

http://forum.html.it/forum/showthrea...readid=1277576

[Ketto93]

Il link che mi hai dato riporta esempi per una installazione. Ora provo il metodo dell'integer 0/1 come detto da gibra

[Ketto93]

Allora, ho fatto così:

Nel form della gestione home (Form2) ho creato 3 Textbox.

Una per l'inserimento della home, una in cui viene caricato il numero di start.ini e una in cui è scritto il numero 1.

1 sta per: Già visitato.
0 sta per: da visitare.

Se il file contiene il numero 0 allora carica tutta la form. Se è 1, chiude la form e apre quella contenente il browser.

Poi, cliccando su Salva Modifiche, viene salvato il contenuto della 3° textbox (quella contenente il numero 1) nela file start.ini così da modificare lo 0 preesistente.


Se esiste un modo più corto postatelo, grazie

[oregon]

Il meccanismo del numero per capire se hai gia' aperto il form va bene, ma non ho capito la questione delle textbox ... perche' usi le textbox per memorizzare il valore 1 o 0 ?

[Ketto93]

Ad essere sincero è l'unico modo che mi è passato per la mente

[oregon]

Spiegati ... perche' un numero in una textbox?

[Ketto93]

Invio i codici così capisci meglio:

Private Sub Form_Initialize()
Open App.Path & "\start.ini" For Input As #1
Text2.Text = Input(LOF(1), #1)
Close #1
If Text2.Text = 0 Then
Unload Me
Form1.Show
End If
End Sub

Private Sub cmdCambiaHome_Click()
Open App.Path & "\homepage.ini" For Output As #1
Print #1, Text1.Text
Close #1
MsgBox "Home Page salvata con successo. Il tutto verrà aggiornato riavviando il browser. Tutto ciò vale anche per il tasto HOME", vbInformation
Open App.Path & "\start.ini" For Output As #1
Print #1, Text3.Text
Close #1
Unload Me
Form1.Show
End Sub

[MItaly]

Le variabili, queste sconosciute...

[oregon]

Originariamente inviato da MItaly
Le variabili, queste sconosciute...

Esatto ... perche' non usi le variabili al posto di tutte quelle textbox ?