Help for this page

Select Code to Download


  1. or download this
    sub Select_Tapes ($@) {
        my $wh_DataCopier = shift;
    ...
        print "List view is at  $listview \n";
        print "There are :". Win32::GUI::ListView::Count($listview)."Tapes
    + listed in the Listview\n";
    
  2. or download this
      
       print "The First Item is $tape{'-text'}\n";
        
    ...
        }