Notice: Undefined offset: 2 in /home2/icentarb/public_html/icentar/classes/class.permissions.php on line 735
Dim rs As DAO.Recordset Dim MyDB As DAO.Database StrSQL = "SELECT * FROM TBLDATA" Set MyDB = DBEngine.OpenDatabase(App.Path, True, False, "dBASE IV;") Set rs = MyDB.OpenRecordset(StrSQL) rs.AddNew rs("ID_FIELD") = rs