Hi,

I'm using ActiveState Perl v5.10.1. I'm on Windows XP Professional version 2003, sp3.

This question has to do with automating Access 2007 using Win32::OLE, but really the question applies to any application of Win32::OLE, I suppose.

Let's say I have written a public function called foo() in a module in my Access database. Foo() takes a couple of arguments, param1 and param2, the first a string, the second an int. I want to write a Perl script using Win32::OLE that automates Access and runs this function in my Access database and passes it values for these parameters. What would that look like?

This is what I have so far. I haven't yet tried the argument passing yet: 

use strict;
use warnings;
use Win32::OLE;

my $oAccess;
my $oDatabase;
my $filename = "C:\\mydb.accdb";

$oAccess = Win32::OLE->GetActiveObject('Access.Application');
$oAccess->OpenCurrentDatabase($filename);
#$oAccess->{DoCmd}->RunCommand(myfunction());
#$oAccess->{DoCmd}->RunCommand("myfunction()");
$oAccess->{DoCmd}->RunCode('myfunction()');

[download]

The commented out lines are some of the things I've tried, but I can't get my function to run at all.

It's not clear to me from reading the Win32::OLE documentation at CPAN how to do this. If this is not possible with Win32::OLE, can you tell me how I might accomplish this?

Thanks for any help.

Thanks,
John

In reply to Win32::OLE -- How do you call a function within the application? by beartiger

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.