LockTable sur RecordSet

Bonjour a tous :)

j'utilise VBMySQLDirect sous VB6, avec une base MyIsam.
Je voulais donc utiliser "LockTable" et "UnlockTables", mais je
n'sais pas vraiment ou les inserer :? , avant ou après la
création du RecordSet ? Exemple :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

Dim r As MYSQL_RS   'Crée un nouvel objet RecordSet Set r = New MYSQL_RS   ObjMysql.LockTable "Table1", MY_LOCK_WRITE   '... 'manipulations sur la base '...   r.CloseRecordset   ObjMysql.UnlockTables   Set r = Nothing

---