🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.lang.perl.misc
Article #302

PB opening access .mdb

#302
From: Olivier Maas
Date: Mon, 20 Sep 1999 00:00
43 lines
2130 bytes
Hi
I have an access database and I do not succeed in opening it, I used the
same syntax described in the win32::OLE doc, but it seems that my file
is not found.
(same syntax works with excel)

I tested with "cheminbase" with / instead of \\, with local path, also
by putting the data base in the root, in the cgi-bin,
no way.

Anyone would have an idear


$cheminbase="d:\\InetPub\\wwwroot\\Base\\test.mdb";

 $application=Win32::OLE->new('Access.Application') || die "Impossible
de créer un objet OLE";

 $Base=$application->OpenCurrentDatabase($cheminbase);
 $Recset=$application->CurrentDb->OpenRecordset("Terminology");
 $Recset->AddNew;
print "<BR>add new ok<BR>";
 $Recset->Fields(1)->{'Value'}=localtime(time);
 $Recset->Fields(2)->{'Value'}=$NomFichOrig;
 $Recset->Fields(3)->{'Value'}=$NomFichLocal;
 $Recset->Fields(4)->{'Value'}=$email;
 $Recset->Fields(5)->{'Value'}=$nom;
 $Recset->Fields(6)->{'Value'}=$prenom;
 $Recset->Fields(7)->{'Value'}=$l_source;
 $Recset->Fields(8)->{'Value'}=$l_cible;
 $Recset->Fields(9)->{'Value'}=$themes;

$Recset->Update;

 $application->CurrentDb->Close(1);
 $application->Quit();
 DESTROY ($application);

any help welcome,
Blue skies and soft landings
olivier
If possible also send email of answer to maas@ensae.fr
thanks anyway
Technical Details
Message-ID: <37E653CB.A785A710@at-lci.com>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 112333,74cde2d6470f85d7,start
X-Google-Attributes: gid112333,public
X-Google-Thread: fa0ae,74cde2d6470f85d7,start
X-Google-Attributes: gidfa0ae,public
From: Olivier Maas <olivier.maas@at-lci.com>
Subject: PB opening access .mdb
Date: 1999/09/20
Message-ID: <37E653CB.A785A710@at-lci.com>
X-Deja-AN: 527467867
Content-Transfer-Encoding: 7bit
X-Accept-Language: fr
Content-Type: text/plain; charset=us-ascii
X-Complaints-To: abuse@oleane.net
X-Trace: minus.oleane.net 937841483 4886 62.161.249.201 (20 Sep 1999 15:31:23 GMT)
Organization: Guest of OLEANE
Mime-Version: 1.0
Reply-To: maas@ensae.fr
NNTP-Posting-Date: 20 Sep 1999 15:31:23 GMT
Newsgroups: comp.lang.perl.misc,Perl-Win32-Users,Mailing,List,digest,fr.comp.lang.perl