Help for this page

Select Code to Download


  1. or download this
    Dim pcbApp
Set pcbApp = GetObject(, "MGCPCB.ExpeditionPCBApplication")
...
licenseToken = licenseServer.GetToken(key)

msgbox licenseToken
  2. or download this
    use strict;
use warnings;
...
my $key = $pcbDoc->Validate(0);
my $licenseServer = Win32::OLE->new('MGCPCBAutomationLicensing.Applica
+tion');
die "Automation license acquisition failed: " . Win32::OLE::LastError(
+) unless defined $licenseServer;
  3. or download this
    Automation license acquisition failed: Win32::OLE(0.1709) error 0x8007
+007e: "The specified module could not be
found"