2. Juli 2013 15:38
FileName := "419FMgt".BLOBImport(TempBlob, '*.pdf');
Tempblob.CalcFields(Blob);
Table."PDFBlobFeld" := TempBlob.Blob;
PDFBlob := FileName;
WHILE STRPOS(PDFBlob,'\') > 0 DO
BEGIN
Pos:= STRPOS(PDFBlob,'\');
IF Pos <> 0 THEN
PDFBlob:= COPYSTR(PDFBlob, (Pos+1) );
END;
Table.modify;
TempBlob.Blob := Table.PDFBlobFeld;
Tempblob.CalcFields(Blob);
"419FMgt".BLOBExport(Tempblob,'*.pdf',TRUE);
2. Juli 2013 16:09
2. Juli 2013 16:18
TempBlob.Blob := Table.PDFBlobFeld;
Tempblob.CalcFields(Blob);
"419FMgt".BLOBExport(Tempblob,'*.pdf',TRUE);
Table.CalcFields(PDFBlobFeld;);
TempBlob.Blob := Table.PDFBlobFeld;
Tempblob.CalcFields(Blob);
"419FMgt".BLOBExport(Tempblob,'*.pdf',TRUE);
2. Juli 2013 21:41
3. Juli 2013 09:01
NaCoder aus 2009 hat geschrieben:Hallo,
ich habe versucht eine Datei in eine Tabelle mit einem Blobfeld zu laden. Leider funktioniert das nicht. Es gibt keine Fehlmeldung. Wenn ich diese Tabelle exportiere ist die TXT und FOB-Datei viel zu klein. Es kann sich also nicht in der Tabelle befinden. Warum funktioniert das Table."PDFBlobFeld" := TempBlob.Blob; in diesem Fall nicht? Weiß wer Rat?
5. Juli 2013 10:04