From: axtens <[EMAIL PROTECTED]>
> G'day everyone
>
> I've been trying unsuccessfully to re-compile JendaRex.pm, using the
> latest PDK (7.1) and the latest Perl (5.10).
>
> Everything seems to compile okay, whether I use PerlCtrl as is, or
> with Jenda's own PDKcompile, and the resulting DLL seems to register
> okay with RegSvr32.
>
> After that, nothing works. This VBScript code
> Set re = CreateObject("Jenda.Rex")
> gives me
> Microsoft VBScript runtime error: ActiveX component can't
> create object: 'Jenda.Rex'
>
> I get a similar report from VB.
>
> Has anyone got any idea why? I tried giving it a new GUID but to no
> avail. Is it that I'm doomed to comb through perldelta for some change
> in Perl syntax?
I don't think it's a change in Perl syntax. I think it's again the
problem with the Win32::Registry. Namely that you do not have the
patch that I submitted several years ago and was told it will become
the new official release again several years ago. Either install the
patch from http://jenda.krynicky.cz/#Win32::Registry2 or replace
$SystemEncoding = 'cp' .
(Win32::Registry::GetValue('HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSe
t\Control\NLS\CodePage', 'ACP') || '1252');
by
{
my $r;
$::HKEY_LOCAL_MACHINE-
>Open('SYSTEM\CurrentControlSet\Control\NLS\CodePage', $r)
or die "Can't open
HKEY_LOCAL_MACHINE\\SYSTEM\\CurrentControlSet\\Control\\NLS\\CodePage:
$^E\n";
$r->GetValue('ACP', $SystemEncoding);
$SystemEncoding = '1252' unless $SystemEncoding;
$SystemEncoding = 'cp' . $SystemEncoding;
}
near the top of the JendaRex.pm
Jenda
===== [EMAIL PROTECTED] === http://Jenda.Krynicky.cz =====
When it comes to wine, women and song, wizards are allowed
to get drunk and croon as much as they like.
-- Terry Pratchett in Sourcery
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
