/ home / projects / blog / 2005_04_26_archive.php :: . : .. : uploaded_images : 2004 : labels : hello : nopub : 2009 : 2003 : 2010 : 2006 : CVS : archives : 2001 : 2008 : 2007 : 2002 : 2005 : archive [ Home ] [ Projects ] [ Events ] [ Applications ] [ About ] [ Help ]

Tech notes, bookmarks, and misc. notes

archives


Tuesday, April 26, 2005

 
RAA - mysql-ruby-win

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

 
How to Use ZenTest with Ruby | Linux Journal

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

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

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

 
RubyForge: Project Info- One-Click Ruby Installer

posted by j 4/26/2005 07:24:48 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 Hello

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


This page is powered by Blogger. Isn't yours?