Recent content by HarleyQuinn

It was worth a try! Biting on comments like that helped me learn a fair bit over the years! [smile] Weirdly, I've just had to do this very task (and display the found files). Only really to see if I could write a faster solution than my boss did using LINQ. My Python solution served me pretty...

Not a single bite there Mr Strong...[lol] Andy --------------------------------- Zebracorn: 50% Zebra, 50% Unicorn = 100% Real. http://lessthandot.com

Yep, that's a nicer way of doing what my last post did [smile] Andy --------------------------------- Zebracorn: 50% Zebra, 50% Unicorn = 100% Real. http://lessthandot.com

There are more elegant ways, but to make it work that way with my suggestion, try something like:Split(yourString, "\")(UBound(Split(yourString, "\")))Hope this helps Andy --------------------------------- Zebracorn: 50% Zebra, 50% Unicorn = 100% Real. http://lessthandot.com

Did you try my suggestion? Andy --------------------------------- Zebracorn: 50% Zebra, 50% Unicorn = 100% Real. http://lessthandot.com

That's no problem, if you change the (1) to (3) in my code that should sort it for you. Hope this helps Andy --------------------------------- Zebracorn: 50% Zebra, 50% Unicorn = 100% Real. http://lessthandot.com

Another way:yourString = "D123\UNIX" outputString = Split(yourString, "\")(1)Hope this helps Andy --------------------------------- Zebracorn: 50% Zebra, 50% Unicorn = 100% Real. http://lessthandot.com

Hmm, mine defaults to 24 hour clock from the get go when I select time... If yours doesn't, then change then Format property to Custom and change the CustomFormat property to HH:mm:ss Hope this helps Andy --------------------------------- Zebracorn: 50% Zebra, 50% Unicorn = 100% Real...

Taking the above ideas and sticking them in a regex solution... Public Function TheNumber(s As String, LookFor As String, Optional length As Long = 6) As String Dim m As Variant With CreateObject("VBScript.Regexp") .MultiLine = False .Global = False .IgnoreCase = True .Pattern...

Ooops! Sorry, hadn't seen you'd posted again in this thread before I replied [blush] Andy --------------------------------- Zebracorn: 50% Zebra, 50% Unicorn = 100% Real. http://lessthandot.com

You could use something like this:Public Sub GetWebDetails() Dim sSrcUrl as String sSrcUrl = yourURL Dim MyString as String MyString = GetHTML(sSrcUrl) GetRegexDetails(MyString) End Sub Function GetHTML(sURL) As String ' Create an xmlhttp object: With CreateObject("Microsoft.XMLHTTP")...

If you want to do this in the application rather than on the database side, then you don't need regex. A standard replace would do the job just as well. But I'd be tempted to do this when you retrieve your data from the DB rather than in your UI layer. Hope this helps Andy...

I meant to type we're using IIS 6.0, no idea why I typed 4... Andy --------------------------------- Zebracorn: 50% Zebra, 50% Unicorn = 100% Real. http://lessthandot.com

Hi, I've got an issue with an internal company website that when run while connected to our company network directly is running as expected. Superb. We have several users that aren't able to access the network directly, so they connect through an SSL VPN and that works fine for all of the...

Yep, I get the idea [smile] Pseudo code looks something like this: Select your range (or cell in your range). Call the dialog (Application.Dialogs(xlDialogPatterns).Show), this will change the interior colour of the selected range/cell. Ccode should then be set to the Interior.ColorIndex of...