Export/import von Bildern

Hallo Leute, brauche Hilfe beim Export der Bilder der Artikeldatenbank von diner DB in eine andere.

Hallo, schreibe einen Report z.B. für Tabelle Artikel; Variable z.B. num = Typ wie Artikelnumme, pfad = text. Im OnAfterGetRecord-Trigger folgenden code: num := “Nr.”; path := ‘c:\impex’+num+’.bmp’; CALCFIELDS(Bild); IF Bild.HASVALUE THEN Bild.EXPORT(path,FALSE); Die Bilder werden unterC:\impex mit Artikelnummer+Endung .bmp abgespeichert. Für Bild.import eine codeunit für Tabelle File; Variable einlesen-record-subtype: file; Variable Datei = Text; WITH einlesen DO BEGIN SETRANGE(Path,‘C:\impex’); IF FIND(’-’) THEN repeat Datei := Name; mit STRLEN die Länge von Name in eine Variable (Länge) schreiben; mit COPYSTR [Length = Länge - 4] die Nummer in eine Variable schreiben und mit get den entsprechenden Artikel finden, falls vorhanden mit bild.import-Befehl zurückschreiben. until recFile.NEXT = 0; END;