Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Chris Miller on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

no current record 1

Status
Not open for further replies.

matrixindicator

IS-IT--Management
Sep 6, 2007
418
BE
Code:
Set rst = dbs.OpenRecordset("TblFileRecordCount", dbOpenDynaset)
    rst.MoveFirst
    rst.MoveLast
    rst.Edit
    rst!fileName = strFileName
    rst.Update
rst.Close

Hey,

If you like to fill up data in a table with a recordset and the table is empty you get the error "no current record".

Is a basic question, I can't remember how to fix it easily.
 
Code:
Set rst = dbs.OpenRecordset("TblFileRecordCount", dbOpenDynaset)
If Not rst.EOF And Not rst.BOF Then
    rst.MoveFirst
    rst.MoveLast
    rst.Edit
    rst!fileName = strFileName
    rst.Update
End If
rst.Close
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top