Bonjour

J'ai le message d'erreur suivant, à l'exécution d'une Sub

Le nombre de verrous disponibles pour le partage des fichiers est dépassé.
Augmentez l'entrée de registre MaxLocksPerFile...

Je vois bien de quoi il s'agit, mais je ne comprend pas pourquoi ça se produit à l'exécution de ma sub.

Celle ci ouvre un recordset, avec une chaine SQL, comme ça
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
Set MaBase = CurrentDb
Set Lignes = MaBase.OpenRecordset(LeSQL, dbOpenDynaset)
Ensuite, je passe en mode édition, d'un champ numérique, sur tous les enregistrements de la table, et je mets à jour ce champ......

La chaine SQL opère en fait un filtre sur les enregistrements de la table, avant la mise à jour
Le nombre de lignes à mettre à jour est très élevé : plus de 20 000....

Qui peut m'expliquer le rapport avec le partage de fichier ?
Je suis seul à utiliser la base...

J'ai vu qu'on pouvait augmenter le nombre d'entrée par un SetOption,
mais ça parle de "workspace"... et je n'en définit pas, puisque j'utilise la CurrentDB par défaut....

Merci d'avance pour les explications et la syntaxe éventuelle pour définir cette option..

Didier71