var server = new ActiveXObject("DataServer.Access");
var data = server.Object.Item
var tool = new ActiveXObject("ToolServer.Tool"); 

findResult(data,tool);

function findResult(data,tool) {
   tool.Clear;
   tool.Data = data;
...
}