sub Select_Tapes ($@) {
    my $wh_DataCopier = shift;
    
    Win32::Sleep(700);
    
    my @handles = FindWindowLike ( $wh_DataCopier,"List1", undef ,undef);
    my $listview = $handles[0];
    print "List view is at  $listview \n";
    print "There are :". Win32::GUI::ListView::Count($listview)."Tapes listed in the Listview\n";