Help for this page

Select Code to Download


  1. or download this
    my $key= new Win32::TieRegistry "LMachine/Software/Kerridge/KPrint/Que
    +ues/", { Delimiter=>"/" };
    my $success= $key->AllowSave(1);
    $key->RegSaveKey( "KPrintQueues_new.hive", [] );
    
  2. or download this
    my $remotepks = $Registry->Connect ( "$zielserver", "LMachine/Software
    +/Kerridge/KPrint/", { Delimiter=>"/" } );
    my $allowload2 = $remotepks->AllowLoad( 1 );
    my $loadkey2 = $remotepks->Load( "KPrintQueues_new.hive", "Queues" );
    $remotepks->{"LMachine/Software/Kerridge/KPrint/Queues"}=$loadkey2;