[VB6] Chiusura programma e apertura

[Massimo Moretti]

Ho realizzato un programma con VB6 che preleva dati da un DB di Access.

Dopo aver aperto il programma, Inserisco alcuni dati e poi chiudo. Quando cerco di riaprire il software compare una nuova Finestra: "Run time error 3045. Impossibile usare
'C\Programmi\Running_VB\Running_VB.mdb.File gia' in uso"

Ho provato a premere Control+Alt+Del e mi accorgo che il mio programma è ancora in esecuzione nonostante sia stato chiuso, come potrei debellare questo problema?

[power.mobile]

ciao... con quale istruzione chiudi il programma? prima di chiuderlo chiudi anche la connessione al db?

[Massimo Moretti]

Private Sub cmdClose_Click()
End
End Sub

[oregon]

Sbagliato.

La End non deve essere usata.

Come apri la connessione al database? Quando la chiudi?

Quando termina il programma usa la

Unload Me

[Massimo Moretti]

... ho impostato il ControlBox del form principale su "True"
avendo una connesione aperta... posso chiudere il programma con quel pulsante o rischio di non chiudere la connessione al db

[oregon]

E cosa c'entra il ControlBox?

Ti avevo chiesto come hai aperto la connessione e come la chiudi ...

[Massimo Moretti]

' Apro la connessione: 
Dim Stringa As String
Stringa = "Select * from Tbl_Utente"
Set rs = New adodb.Recordset
rs.Open Stringa, "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Database.mdb", adOpenKeyset, adLockOptimistic, adCmdText

' Chiude la connessione: 
rs.Close
Set rs = Nothing

Ciao.

[oregon]

E quindi, se utilizzi

Private Sub cmdClose_Click()
  rs.Close
  Set rs = Nothing
  Unload Me
End Sub

il problema c'e' ancora?