• Hi Guest Just in case you were not aware I wanted to highlight that you can now get a free 7 day trial of Horseracebase here.
    We have a lot of members who are existing users of Horseracebase so help is always available if needed, as well as dedicated section of the fourm here.
    Best Wishes
    AR

Scraping Utility for Those New to Scraping

this goes back a few years.
Happy to take a look at it again and see what I can come up with.

Any specific filters you're after Roger?
 
leftinthestalls said:
this goes back a few years.
Happy to take a look at it again and see what I can come up with.

Any specific filters you're after Roger?
Click to expand...


Hi thanks

Could the macro show something do do with going or distance?
These tend to weed out the horse with no chance, or at least a false favourite.
Class filter also a good one.

A more simple one could be showing speed over last run, 2 last runs, and last 3 runs etc
Filter is called 'Run Order' on there.

Amazing how you VB exerts can do this stuff, Ive a lot to learn!
 
not working for me.
got 4 buttons to the right
GET MAX SPEEDS
GO BACK
GO FORWARDS
START PAGE
any advice?
 
I can't take credit as I didn't write it. Been lurking in my computer for a few years now it has. I think it was written by leftinthestalls.
 
O.k. Guys now its working do I just save a copy and erase or will it overwrite when I get tomorrow's figures? :minigun:
 
Here's a draft version of the PatternForm scraper which should get figures for Going, Run Order and Distance for the "look back" period you choose.

You can run the cards for either today, tomorrow or yesterday.

This will take a few minutes to run and should create a new file in your "my documents" folder e.g. PatForm_17022013_6 Months.xls


I have not tested this fully so there may be a few bugs.
 

Attachments

  • PForm_scraper.xls
    88.5 KB · Views: 81
Hi Kev,

Using 2007.
References look ok



Error is here
 

Attachments

  • Capture.PNG
    Capture.PNG
    42.4 KB · Views: 39
  • Capture1.PNG
    Capture1.PNG
    9.2 KB · Views: 36
here's a 2007 version.

I have replaces all instances of SHDocVw.InternetExplorer with just InternetExplorer

Either version works for me.
 

Attachments

  • PForm_scraper.xlsm
    46.6 KB · Views: 67
weird! Can't see anything wrong with the code in 2003 or 2010

You could try removing all references, save & close, then add them again.

Try using Set IE = CreateObject("InternetExplorer.Application") instead and set the .visible property to True to check if the webpage has opened.

Code: 
Set IE = CreateObject("InternetExplorer.Application")
    With IE
        .Visible = True
        .navigate sURL
        While .Busy Or .readyState <> READYSTATE_COMPLETE: DoEvents: Wend
        Set HTMLdoc = .document
    End With

Are you using Win7 64bit by any chance?
 
Yes I am using windows 7 64 bit.
I set visible to true on the first version and IE navigates corectly to the page.
It seems that ie.document is not compatible with HTMLDoc.
 
You must log in or register to reply here.
Back
Top