See also HOWTO: Fix Index Corruption at Run Time with Visual FoxPro MSKB #
168762 HTH
>Hello all
>I get this error message Error 2005, Index does not match the table, Delete the index file and re-create the index. ? Has anyone got this error before,if so how to handle the delete and recreate index in the multi-user environment.
>my reindex routine isCLOSE TABLES
FOR i = 1 to ADBOBJECTS(laTables, "Table")
IF !EMPTY(laTables[i])
IF !USED(laTables[i])
USE (laTables[i]) IN 0 EXCL
SELECT (laTables[i])
WAIT WINDOW "Reindexing : " + UPPER(ALLTRIM(laTables[i])) + ".DBF" NOWAIT
PACK
REINDEX
ELSE
MESSAGEBOX('Other Users on Network may be using the system'+;
chr(13)+'Cannot Reindex if others are using the system',16,'Network Conflict')
Thisform.release
ENDIF
ENDIF
ENDFOR
CLOSE TABLES
