run time 70 permissions denied trying to update( delete info) on a vista Pc,

[steve proctor]

run time 70 permissions denied trying to update( delete info) on a vista Pc, how do i get round this, some say MTS??? but can't find that anywhere on the vista Pc, (using VB6)created the program on my XP PC, works fine!!!but when loaded on to a vista the only parts that won't work are the Update, i tried

'////////////////////////////////////
sql = "update tblBooked set book = false, bookdate = null, bookedby = null where book = true"
 dbAbbeytheatre.Execute (sql) 
'//////////////////////////////////////////
and 
'//////////////////////////
sql = "Select * from tblbooked where tblbooked.book = True"
Set recset = dbAbbeytheatre.OpenRecordset(sql)
 
                   recset.MoveLast: recset.MoveFirst
                                num = recset.recordcount
              If num > 0 Then
 
                  Do While num > 0
                    recset.Edit
                     recset!book = False
                     recset!bookdate = Null
                     recset!bookedby = Null
                      recset.update
                    recset.MoveNext
                      Loop
            End If
'////////////////////////////////////////
and running a query 
CurrentDb.Execute "bookedclearquery"

and while all three work on XP on vista ......Nothing!!!
any clues folks?