FPT File korrupt

[Horst]

Hallo

Im Anhang ist eine DB , wen ich mit dem dBAdministrator die Struktur ändere stürzt das ab und die Meldung kommt 'Corruption detected in memo-file'

In DB's mit vielen Änderungen habe ich das öfters. Ich habe dann die Memoeinträge auf fix 150kb aufgeblasen umd dann läuft das stabil.

Mit einem kleinen Prg kann ich die Daten retten.

Code: Select all

DO WHILE ! odbServerAlt:EoF
		
	? NTrim(odbServerAlt:RecNo)

      	odbServer:Append ()    
      	FOR nCnt := 1 UPTO ALen (aStruct)
      		cName := aStruct [nCnt][01]
			odbServer:FIELDPUT (cName		,odbServerAlt:FIELDGET (cName))
      	NEXT nCnt
		
	odbServerAlt:Skip (+1)
	
ENDDO

Gibt es eine Möglichkeit eine DB und sein FPT File zu überprüfen? Dann würde ich einen Service installieren der das macht.

Gruss Horst

[wriedmann]

Hallo Horst,
um das zu überprüfen, lesen ich die DBF sequentiell mit allen Feldern, und sobald ein Lesefehler auftritt, weiß ich den Datensatz, der korrupt ist.
Wolfgang

[Horst]

Hallo Wolfgang

Mein kleines PRG liesst ja die Datei und schreibt das File neu. Da bekomme ich keine Fehlermeldung.

Horst