Memo-Fields und MS Access - #32281 (Datenbanken und Verzeichnisdienste)

Heromaster

2004-06-15 22:43

User since
2003-08-05
220 Artikel
BenutzerIn
[default_avatar]

Hmm, wenn Du Win32::OLE nutzt, müsstest Du mithilfe des ADO-Objekts die Größe des Memofelds herausbekommen. Ich schau mal im Objektkatalog nach, vielleicht findet sich ja was geeignetes.

edit: Ansonsten probiers mal damit, das sollte unabhängig von der Datensatzgröße sein:

Code: (dl )

use Win32::OLE;
$conn = Win32::OLE->new("ADODB.Connection");
$conn->Open("Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=D:\auftrag.mdb;Mode=Share Deny None");
$RS = $conn->Execute("SELECT memo FROM table");
if (!$RS) {
    $Errors = $conn->Errors();
    die "Errors:\n", map { "$_->{Description}\n" } keys %$Errors;
}

while ( !$RS->EOF ) {
    my $memo = $RS->Fields('memo')->Value;
    print "$memo\n";
    $RS->MoveNext();
}
$RS->Close();
$conn->Close();

\n\n

Derjenige, der zwei Hasen jagt, lässt einen zurück und verliert den anderen.