Xit, questo codice che usi è un mio esempio e manca nel pulsante questo:

g_strConnection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" _
& App.Path & "\db1.mdb; Persist Security Info=False"

Dim dbConn As New ADODB.Connection
Dim strConnectionString As String
Dim strSQL As String

Dim iNome, iCod As String
iNome = txtNome
iCod = MaskCodf


dbConn.ConnectionString = g_strConnectionString
dbConn.Open

controlla bene.............. e aggiusta il codice
in quanto hai chiuso la connessione al db.
quindi devi riconnetterti
guarda il tuo modulo.bas............ dove c'è:
g_strConnection, che è una variabile pubblica ecc, ecc.



link
homepage
http://%77%77%77%2e%74%77%6f%72%6b%2e%69%74/
software
http://%77%77%77%2e%74%77%6f%72%6b%2...programmi.html
forum
http://%77%77%77%2e%74%77%6f%72%6b%2...um/default.asp