Hi all,
I have a Perl program that runs perfectly on the command prompt.
When I put the same code (after a bit of modification), into an ASP it hangs
when trying to open a DB.
Here it is in PerlScript:-
<%@ Language=PerlScript %>
<HTML>
<BODY> <%
use ASP qw(:strict);
use strict;
use warnings 'all';
use Win32::OLE;
my $site = "site";
my $domainName = "table";
$Response->Write("<BR>Creating server object");
my $srv = Win32::OLE->new("App.Server");
$srv->{allowAuthentication} = 1;
$Response->Write("<BR>Opening $site");
my $db = $srv->openDB($site);
$Response->Write("<BR>Getting definitions for: $domainName");
my $Defs = $db->getDefs($domainName);
my @Fields = split(/;/, $Defs);
foreach my $Temp(@Fields)
{
$Response->Write("<BR>$Temp");
}
%></BODY>
</HTML>
>From what I see my $db = $srv->openDB($site);
is the cause of the hang.
Anybody have any ideas why the DB cant be contacted
when called from an ASP?
The App has been installed on both client and server.
Regards
Just in
_______________________________________________
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
