Call Aufruf von Access in Perl uebersetzen - #81132 (Allgemeines zu Perl)

havi

2004-03-18 12:20

User since
2003-08-04
2036 Artikel
BenutzerIn

Hi Leute!

Ich moechte gerne eine Accessdatenbank mit Perl ansprechen.
Das alleine ist ja kein Problem.
Wenn ich eine Funktion eines Moduls direkt aufrufe mache ich das immer so:

Code: (dl )

#!/usr/bin/perl

use warnings;
use strict;

my $accessPfad = Win32::OLE->GetObject('PfadZuMeinerDatenbank\Datenbank.mde') or die;

my $funktion = $accessPfad->Eval(qq{Funktion("$Variable")});

Das Ergebnis der Datenbankfunktion habe ich dann in $funktion stehen.

Nun moechte ich aber ein Modul mit einem Call Aufruf ansprechen.
Dazu mache ich folgendes:

Code: (dl )

#!/usr/bin/perl

use warnings;
use strict;

my $accessPfad = Win32::OLE->GetObject('PfadZuMeinerDatenbank\Datenbank.mde') or die;

$accessPfad->Eval(qq{Call Modul("Tabelle", "Feld1", "Feld2")}); # funktioniert nicht

Kann mir da vielleicht jemand helfen?

Gruss\n\n

Perl-Zeitung - http://perl-zeitung.at/
Perl-Blog - http://usr-bin-perl.blogspot.com/