Searching for a specific string when using Webbrowser

[moss lovell]

Cheers Colin

I have had a look and ran it

The one problem is where it finds the number of jobs sometimes the results could be Jobs 1-4 of 4 so the part where you have put strText1 = Mid(strText1, InStr(strText1, "Jobs 1-25 of ") + 13, 5)



That would be different as sometimes there are only a few jobs showing

But thanks anyway for your help

Moss

[isladogs]

Hi

I did wonder about that. Also whether the number will ever reach 100,000

I've updated it to check for output less than 5 digits.
If so, it discards the last character, and rechecks until its just a number
So e.g. 123?> becomes 123
So as long as the string isn't something like 123?5 it will work

TestOutput:        If IsNumeric(Right(strText1, 1)) = False Then
            strText1 = Left(strText1, Len(strText1) - 1)
            GoTo TestOutput
        End If

HTH

[moss lovell]

THANK YOU RIDERS

A lot has been going on with this thread as I basically didn't know what I was doing.

Riders52 has been answering the abundance of emails I have sent regarding this thread and has solved it for me. He hs looked at my data base and even tidied it up and added items to make it work better.

The best thing of all he didn't get fed up with my questions and has been a great help (Mentor).

I think that I jumped into the deep end with my project as this morning I now know that I need to learn more as I don't even understand relationships between tables and went straight into VBA.

Again thank you. 5 Stars.

Moss