XYplorer Beta Club

timhatz wrote:Is there a way to get the fileversion of a .dll in a column? I can see it in the /info/ window, but I was hoping not to click on every file to check.

Thanks.

serendipity wrote:Hard: You can run a script once which will show all file versions of you dlls in comments column. If you need that script let me know.

ale wrote:

serendipity wrote:Hard: You can run a script once which will show all file versions of you dlls in comments column. If you need that script let me know.

It would be a clever way to use comments I'm not interested in the actual script but may I ask how would you proceed to get file info informations? parsing a generated report, let's say to clipboard, and then populating comments? is there a more direct way?

//Set global value
  global $itemscount;
//filter dll files
  filter ".dll";
//getinfo of number of items in list
  $itemscount= getinfo ("countitems");
  focus;
//select item 1
  sel 1;
//goto subscript "_comment"
  sub "_comment";

//subscript comment
"_comment"
//declare global value
  global $itemscount;
//getinfo of item position
  $itempos = getinfo ("focusedpos");
//compare position number and total file number
  IF ($itempos == $itemscount) {
//goto subscript "_end"
  sub "_end";
  }
  ELSE {
//write file version of file to comments column
  comment <curver>;
//select next file
  sel +1;
//goto subscript "_comment"
  sub "_comment";
  }
"_end"
//remove filter
  filter;
//show status "Done"
  status "Done";

timhatz wrote:Serendipity,

I modified your great script, and came up with this, for my needs. Since this was my 1st attempt at a script (even though i stole it from you) are there any glaring issues?

A few questions, when I cut and pasted your script, I had issues, with the // comments. Once I removed them all, the script worked. Also, are there any spaces required in a script from the beginning of a line?

Thanks, Tim

Code: Select all

  global $itemscount;

  $itemscount= getinfo ("countitems");

   if ($itemscount <= 0) {
         status "No files to process.";
         end true;
         }

  focus;
  sel 1;
  $rowcounter = 1;

  while($rowcounter <= $itemscount) {
     comment <curver>;
     sel +1;
     $rowcounter = $rowcounter+1;
  }
  status "Done";
  end true;

serendipity wrote:... any script line should start with a space, else the script wont work...

admin wrote:I don't like this anymore! I don't have a head for this right now but in the long run this "any script line should start with a space" thing should be replaced by something better.

"Some menuitem..." nameOfScript {
foo;
echo "no spaces and I don't care!!";
$i = answer('life, everything...');
}
function answer($question) {
// this one is "hidden" as in as no menuitem associated with it...
return 42;
}

"Menu item : nameHere" { something; }

jacky wrote:

admin wrote:I don't like this anymore! I don't have a head for this right now but in the long run this "any script line should start with a space" thing should be replaced by something better.

...yeah, like adding user-functions and then each menu could be associated with a function or something

Code: Select all

"Some menuitem..." nameOfScript {
foo;
echo "no spaces and I don't care!!";
$i = answer('life, everything...');
}
function answer($question) {
// this one is "hidden" as in as no menuitem associated with it...
return 42;
}

Alright, so I guess technically adding brackets is all it takes..

Code: Select all

"Menu item : nameHere" { something; }

..but isn't it more fun with user-functions?

timhatz wrote: are there any glaring issues?

Code: Select all

  global $itemscount;

  $itemscount= getinfo ("countitems");

   if ($itemscount <= 0) {
         status "No files to process.";
         end true;
         }

  focus;
  sel 1;
  $rowcounter = 1;

  while($rowcounter <= $itemscount) {
     comment <curver>;
     sel +1;
     $rowcounter = $rowcounter+1;
  }
  status "Done";
  end true;