Hi!
i use the following code to insert a number of records in a access table from a recordset (pulled from a dbase file):
rext is a recordset who get the data from dbase.
rext.Open _
"select nrf from invoice", cntext, adOpenStatic, adLockOptimistic
rstdt is a recordset who help me to put data in a access table
rstdt.Open "select * from lf", cntdt, adOpenStatic, adLockOptimistic
Do While Not rext.EOF
With rstdt
.AddNew
.Fields("nrf") = rext!nrf
.Update
End With
rext.MoveNext
ListRow = ListRow + 1
Loop
rext.Close
Set rstdt = Nothing
let's say that i have 2 variables:
n1 who store the number of records from the first recordset and a form opened modal.
i want in the caption of the form, named message to put the incremented counter when i pull data with select and then when i put data in the access table
like: 1/1256.. wait
2/1256.... wait.. and so on
thanks
i use the following code to insert a number of records in a access table from a recordset (pulled from a dbase file):
rext is a recordset who get the data from dbase.
rext.Open _
"select nrf from invoice", cntext, adOpenStatic, adLockOptimistic
rstdt is a recordset who help me to put data in a access table
rstdt.Open "select * from lf", cntdt, adOpenStatic, adLockOptimistic
Do While Not rext.EOF
With rstdt
.AddNew
.Fields("nrf") = rext!nrf
.Update
End With
rext.MoveNext
ListRow = ListRow + 1
Loop
rext.Close
Set rstdt = Nothing
let's say that i have 2 variables:
n1 who store the number of records from the first recordset and a form opened modal.
i want in the caption of the form, named message to put the incremented counter when i pull data with select and then when i put data in the access table
like: 1/1256.. wait
2/1256.... wait.. and so on
thanks