Recent content by constantG

Hi, I modded this code for my own needs and until recently it has been working fine. The code simple scans each line of the source of the webpage and looks for specific HTML tags. It then simply parses the address from that line and, in my case adds it to a table for further interrigation. This...

I created an MDE file for my application it's a split db when I hit the exit command button on the MDB version it quits the application correctly but when I do the same thing on the MDE version, it leaves the database window open on the taskbar.

After searching google I still can't get this to work.

Google does but exact search syntax is not always at the forefront of my mind. Thanks for the spot.

Hi, My application relies on whether Outlook is open and more importantly, with the correct Exchange profile selected. To ensure this I have the following code which, on the work PCs (Windows XP and Office 2003) works correctly. If Outlook_is_Running = True Then Set myOlApp =...

Hi, I use the following to enable users to create an address report and display it for printing. Sub LabelWizard() 'On Error GoTo ErrorHandler Dim dbs As Database Dim Rpc As Container Dim rpt As Document Set dbs = CurrentDb Set Rpc = dbs.Containers!Reports...

Beginning VBA (reference book) question (SOLVED) Hello, I am currently working on the reference book "Beginning Access VBA 2007" by Denise Gosnell and am stuck at attempting to get the code from Chapter 13 to work. The code is as follows: Function ProcessRecordset(strSQLStatement As String)...

I've removed the "Solved" tag in the title of this as I need the code to do a little more. The code I originally had counted characters as they were input and using a key_press and key_change event I could limit the users input to a specific amount of characters. Here's the code I used: Sub...

Agreed, I will use yours so that extra spaces are discounted. Thanks again.

Apologies to you Stopher, I work quickly at trying to solve these problems, and the solution that I have found is perfect for my needs. Thanks for your input.

Re: Word count as I type into a text box (SOLVED) Solved Private Sub txtText_Change() If Not IsNull(Me.txtText) Then Me.txtWordCount = Len(Me.txtText.Text) - Len(Replace(Me.txtText.Text, " ", "")) + 1 Else Me.txtWordCount = 0 End If End...

After a bit of digging around I have found this Private Sub txtText_Change() If IsNull(Me.txtText) Then Me.txtWordCount = 0 Exit Sub Else Me.txtWordCount = Len(Me.txtText) - Len(Replace(Me.txtText, " ", "")) + 1 End If End Sub which works...

My apologies for only making it a link. here's the code that I am using and but it only updates on the first keypress or when the text initially changes but after that I've noticed that it doesn't call the procedure at all. txtWordCount is a text box in the form. Private Sub...

Hi, I am trying to utilise this module to count words in a text box. The example shows how many words but only After update of the text box. How can I get it to show the word count as words are typed into the text box? All help appreciated. Thanks

Thanks to all, as usual expert advice. The source path was made up from values in a table and I had missed a "\" in making up the path. Look and ye shall find!!!!!!!!