Predicates used in RDF files found by a FOAF crawler

<% RS = Server.CreateObject("ADODB.Recordset") sqlstr='select pred,count(pred) as b from rdf3b group by pred' RS.Open(sqlstr,"rdf") if (!RS.EOF) { Response.Write('') Arr=RS.getRows().toArray() FAl=Arr.length/2 stuff=new Array() for (i=0;i') } Response.Write('
Predicateoccurances
'+stuff[i].a+''+stuff[i].b+'
') } function sortFunc(a,b) { return (b.b-a.b) } %>