/ home / projects / blog / archive / 2005_04_26_archive.php :: . : ..

[ Home ] [ Projects ] [ Events ] [ Applications ] [ About ] [ Help ]

Tech notes, bookmarks, and misc. notes

Tuesday, April 26, 2005

RAA - mysql-ruby-win

posted by j 4/26/2005 07:14:00 PM

How to Use ZenTest with Ruby | Linux Journal

posted by j 4/26/2005 09:41:00 AM

Justin Rudd’s Thoughts » Blog Archive » Ruby, MySQL, and Windows

posted by j 4/26/2005 07:48:00 AM

RubyForge: Project Info- One-Click Ruby Installer

posted by j 4/26/2005 07:24:00 AM

#!/usr/bin/perl
use Win32::OLE qw(EVENTS);
my $URL = "http://www.jwalsh.net/projects/blog/";
my $IE  = Win32::OLE->new("InternetExplorer.Application")
    || die "Could not start Internet Explorer.Application\n";
Win32::OLE->WithEvents($IE,\&Event,"DWebBrowserEvents2");

$IE->{visible} = 1;

$IE->Navigate2($URL);

Win32::OLE->MessageLoop();

sub Event {
    my ($Obj,$Event,@Args) = @_;
    print "Here is the Event: $Event @Args\n";


    if ($Event eq "DocumentComplete") {
        $IEObject = shift @Args;
        print "URL: " .  $IEObject->Document->URL . "\n";
        print "Title: " .  $IEObject->Document->Title . "\n\n";
           # Win32::OLE->QuitMessageLoop();
    }

    if ($Event eq "onQuit") {
      Win32::OLE->QuitMessageLoop();
    }
}

posted by j 4/26/2005 06:41:00 AM