Search results for query: *

Yes, Much faster!

Andy, Very smooth, thank you for your help. Acce45

Andy, Here is my latest attempt. While it does work, I know it is not correct because it moves like an old Chevy Vega, slow and jery. Dim rRemoteDB As String rRemoteDB = Me.DBUpDate Dim tdf As TableDef 'Set dbs = DBEngine.OpenDatabase("U:\Merge\A MAIN TABLES\DateCompareFORTEST.accdb") Set dbs...

I cobbled together the code below which is currently getting done what I need. However, if a Table is in the Remote Database that I have not placed in the code it will be missed. Also, creating all the necessary text boxes to simulate a Listbox is a pain. Looking for ideas... Accel45 Code...

Andy, Thank you for taking time to help, but neither option worked. Neither option brought in anything (Tables nor Row Counts) from the Remote Database. Accel45

I am using this to get a list of Tables from a Remote Database and place the list of Tables into a Listbox. This is working. Dim rRemoteDB As String rRemoteDB = "C:\Test\RemoteDB.accdb" Me![List40].RowSource = "SELECT [Name] FROM MSysObjects IN '" & rRemoteDB & "'" _ & " WHERE [Type]=1 AND NOT...

Thank you dhookom, that worked great.

The problem is due to a text field named "Description" which allows for non-standardized entries. (I have NO control over this) This field "Description" is the basis for the record being placed in a category. Most of the time "Description" will contain some variation of the words listed below...

That did the trick, Thank you for your help.

I located this code which was posted by Allen Browne - Microsoft MVP. SELECT MSysObjects.[Name] FROM MSysObjects IN 'C:\MyFolder\MyFile.mdb' WHERE (MSysObjects.[Type] = 1) AND NOT ((MSysObjects.[Name] Like "~*") OR (MSysObjects.[Name] Like "MSys*")) ORDER BY MSysObjects.[Name]; I’m using the...

Work great, Thank you strongm

BACKGROUND: I find myself creating help message boxes frequently so I put together a DB to help with creating the string for the msgbox. I enter the steps or instructions into a continuous form: How To Eat A Banana First, Remove the Peel Second, Open Mouth Third, Shove Banana in Mouth The...

Works fine dhookom. Thank you. And Thank you to Andrzejek. On question, when running the code stops when a note contains a ' or - or some other non letter characters. Not that big of a deal as the error message identifies the word containing the character. Thanks again, for saving me a lot of...

My example above shows three notes: ** some text that is the note ** some text that is the second note ** some text that is the third note I did not try your suggestion as I did not know how to complete the code to insert aryTemp(i) into table. btw thank you for helping me with this.

The actual text is confidential. What I provided above is how the text is formatted in the text file.

Using this thread to illustrate content of the text file. I have three notes here but the actual file has hundreds of notes: --- ** I have a TXT file containing hundreds of "notes". The TXT file does not have column headings. Some of the notes are short some are long. The only consistent...

I have a TXT file containing hundreds of “notes”. The TXT file does not have column headings. Some of the notes are short some are long. The only consistent pattern is that each note begins with “**”. I would like to import each “note” into a separate record with a table. I have tried using...

That solved the problem. Thank you DHOOKOM

Additionally, I am using a Listbox to select the search criteria. ListBox ------- Visible ........ Yes Enabled ........ Yes Multi Select ... Simple Tag ............ Where=tblDocs.Payee,String,[forms]![frmFilter4]![OpPayee]

Thank you for the responses. I made this change using 2 singles quotes as suggested. With the change I get a a Syntax error if there is an apostrophe and I get a Syntax error if there is not an apostrophe. '*********************** '* Save Where Clause * '***********************...