PC World Komputer 1997 May/Pcwk0597.iso/borland/ib/setups/intrabld/data.z/INTRABOT.JRP

Text File | 1996-12-11 | 7.4 KB | 253 lines

/****************************************************************************\
*                                                                            *
* Intrabot.jrp  -- The bulk of this form was generated by the report expert. *
* The only addition was to add <href="url"> tags to the                      *
* this.streamSource1.detailBand.HTML1.                                       *
*                                                                            *
* Intrabot.jrp is the report which summarizes the data gathered by           *
* intrabot.jfm.This report is best viewed through the netscape navigator     *
* browser. When viewed through the browser the urls become hyperlinks, so you*
* can instantaneously jump to your web pages.                                *
*                                                                            *
*                                                                            *
* Dependencies:  hosts.qry                                                   *
*                                                                            *
*                                                                            *                                                                            *
* Links to:                                                                  *
*                                                                            *
* Updated 8/21/96 by IntraBuilder Samples Group                              *
* $Revision:   1.3  $                                                        *
*                                                                            *
* Copyright (c) 1996, Borland International, Inc. All rights reserved.       *
*                                                                            *
\****************************************************************************/

// {End Header} Do not remove this comment//
// Generated on 11/08/96
//
var r = new INTRABOTReport();
if (INTRABOT.arguments.length == 2) {
   r.startPage = INTRABOT.arguments[0];
   r.endPage = INTRABOT.arguments[1];
}
r.render();
class INTRABOTReport extends Report {
   with (this) {
      title = "IntraBot Search Results";
      linkText = "Next Page";
   }


   with (this.hosts1 = new Query()){
      left = 0;
      top = 0;
      sql = "@hosts.qry";

      active = true;
   }


   with (this.hosts1.rowset) {

   }


   with (this.printer) {
      duplex = 1;
      orientation = 1;
      paperSource = 15;
      paperSize = 1;
      resolution = 4;
      color = 2;
      trueTypeFonts = 2;
   }


   with (this.pageTemplate1 = new PageTemplate(this)){
      height = 15000;
      width = 9000;
      marginTop = 0;
      marginLeft = 0;
      marginBottom = 0;
      marginRight = 0;
      gridLineWidth = 1;
   }


   with (this.pageTemplate1.streamFrame1 = new StreamFrame(this.pageTemplate1)){
      height = 12500;
      top = 1800;
      width = 9000;
      borderStyle = 1;
   }


   with (this.pageTemplate1.HTML1 = new HTML(this.pageTemplate1)){
      height = 500;
      left = 1250;
      top = 300;
      width = 7750;
      color = "804040";
      text = "<H2>Web Servers Found by <B><U>IntraBot</U></B></H2>";
   }


   with (this.pageTemplate1.HTML2 = new HTML(this.pageTemplate1)){
      height = 300;
      left = 1250;
      top = 800;
      width = 7750;
      color = "black";
      text = {||new Date()};
   }


   with (this.pageTemplate1.HTML3 = new HTML(this.pageTemplate1)){
      height = 300;
      top = 14000;
      width = 9000;
      color = "black";
      text = {||this.parent.parent.reportPage};
   }


   with (this.pageTemplate1.html2 = new HTML(this.pageTemplate1)){
      height = 300;
      top = 1400;
      width = 2000;
      color = "black";
      text = "<H3>IP Address</H3>";
   }


   with (this.pageTemplate1.html3 = new HTML(this.pageTemplate1)){
      height = 300;
      left = 4000;
      top = 1400;
      width = 5000;
      color = "black";
      text = "<H3>Server Type</H3>";
   }


   with (this.pageTemplate1.html1 = new HTML(this.pageTemplate1)){
      height = 300;
      left = 2000;
      top = 1400;
      width = 2000;
      color = "black";
      text = "<H3>Server Name</H3>";
   }


   with (this.pageTemplate1.image1 = new Image(this.pageTemplate1)){
      height = 1250;
      width = 1250;
      dataSource = "filename WEBSRC11.JPG";
      alignment = 4;
   }


   with (this.streamSource1 = new StreamSource(this)){

   }


   with (this.streamSource1.detailBand) {
      height = 0;
   }


   with (this.streamSource1.detailBand.crawlHTML = new HTML(this.streamSource1.detailBand)){
      canRender = class::crawlHTML_canRender;
      height = 1;
      left = 8000;
      width = 1000;
      color = "black";
      text = "<A href='intrasrv.isv?apps/webutils/crawler.jfm(" + '"' + "123.123.123.123" + '"' + ")'>crawl </A>";
   }


   with (this.streamSource1.detailBand.ipAddress = new HTML(this.streamSource1.detailBand)){
      canRender = class::ipAddress_canRender;
      height = 1;
      width = 2000;
      variableHeight = true;
      color = "black";
      text = "<A HREF='http://123.123.123.123/'>123.123.123.123</A>";
   }


   with (this.streamSource1.detailBand.serverType = new HTML(this.streamSource1.detailBand)){
      height = 1;
      left = 4000;
      width = 4000;
      variableHeight = true;
      color = "black";
      text = {||this.form.hosts1.rowset.fields["Server Type"].value};
   }


   with (this.streamSource1.detailBand.serverName = new HTML(this.streamSource1.detailBand)){
      canRender = class::serverName_canRender;
      height = 1;
      left = 2000;
      width = 2000;
      variableHeight = true;
      color = "black";
      text = "";
   }


   with (this.reportGroup) {
      groupBy = "";
   }


   with (this.reportGroup.headerBand) {
      height = 0;
   }


   with (this.reportGroup.footerBand) {
      height = 0;
   }

   this.firstPageTemplate = this.form.pageTemplate1
   this.form.pageTemplate1.nextPageTemplate = this.form.pageTemplate1
   this.form.pageTemplate1.streamFrame1.streamSource = this.form.streamSource1
   this.form.streamSource1.rowset = this.form.hosts1.rowset

   function crawlHTML_canRender()
   {
      var portNum=parseInt(this.form.hosts1.rowset.fields["port"].value);
      var serverName=new StringEx(this.form.hosts1.rowset.fields["Server name"].value);
      serverName=serverName.leftTrim();
      var portString="";
      if (portNum!=80 && portNum!=null){
         portString=":"+portNum;
      }
      this.text="<A href='intrasrv.isv?apps/webutils/crawler.jfm(\""+this.form.hosts1.rowset.fields["IP address"].value+portString+"\")'>crawl </A>";
      return true;
   }

   function serverName_canRender()
   {
      var name =this.form.hosts1.rowset.fields["SERVER NAME"].value;
      this.text=name.length == 0 ? "(Not Available)" : name;
      return true;
   }

   function ipAddress_canRender()
   {
      var portNum=parseInt(this.form.hosts1.rowset.fields["port"].value);
      var portString="";
      if (portNum!=80){
         portString=":"+portNum;
      }
      this.text="<A HREF='http://"+this.form.hosts1.rowset.fields["IP Address"].value+portString+"/'>"+this.form.hosts1.rowset.fields["IP Address"].value+portString+"</A>";
      return true;
   }

}