I want to insert records from one table into another from different dabases
in VB6.
The databses are all in Access

I copied the following code elsewhere, so I know it must work:
strFiles = ""
   With Application.FileSearch
       .NewSearch

Hello, I created a query in the MS Access query window and then copied the
SQL view into my VBA code. Although I've added the quotes and the sql string
designation, I can get the code to be accetable to my VBA code (I have the
code colors on).  Here is my query:

I need some help, to matching data!
eg: out of 20 elements: eg (10,2,4 17,24,5,30, 40, 50, 100, 23, 35, 200,
3501, 201, 245, 323,2000, 33, 44,265,etc)
I would want to know which of these elements eg: make up the sum 275??

I'm running queries in my code.  Is there some command or code to insert
after kicking off the query to ensure they query completes before the next
line of code is executed?  I have used a "DoEvents" in Excel and was
wondering if there is something similar in Access.  Thanks for ...

Have a long integer field that represents seconds. I use a query to total
seconds. Then in the query under SQL I put a format statement to convert
total seconds to days hh:nn:ss. This works very well, but the format
statement is long and confusing to read.

I know I'm pushing it with two problems in the same day!  I want to run a
delete query in SQL from a VB module.  How do I tell it not to run the delete
query if the table is empty?  Very many thanks.

I need to create an array from value in an listbox. So far I have the
following code:
_______
strSQL = "SELECT TblCallSLA.SLA_Number " & _

Hi  I'm trying to run the following update sql from a vb module and it tells
me there is a syntax error.  I just can't see it.  Is it really obvious and
where is it?
MySql = "UPDATE [t-CommentOutput] SET [t-CommentOutput].Country = " &

I have a database that contains records for contact escalations. "ECBData1"
is the table that holds the data. The record contains the Status, Date
Opened, Owner, Customer and Email Sent columns. I have a query ("RemQry1")
that returns all records that have a status of open and ...

is there some way to protect vba code from unintentional modification. i
thought that there was but don't seem to be able to locate the method. i
tried vba 'help' but it seemed to come back empty.
-ted

I want to change the value of EmailSentTL to 1 where EmailSentTl = 0 and where
the date is 2 or more days older than today. I'm trying the following
command but it obviouslt does not work. Thanks for the help.
DoCmd.RunSQL "UPDATE ECBData1 SET ECBData1.EmailSentTl = 1 WHERE

Group:
I have the following statement in a module that adds a column to an existing
table. The column is titled ID2 and it is formatted to accept numbers.
BackDb.Execute "ALTER TABLE [" & CoName & "] ADD COLUMN ID2 Number;"

I need to get the count of a certain product (with custom features) at
different locations. I also need to know if that Count is zero
So, something like:
SELECT A.STORE, Count(A.PRODUCT_ID) AS CountOfPRODUCT_ID

i need to search a string of chars within  a 2nd string but id like to ignore
certain characters in the 2nd string. specifically linefeeds, returnchars and
the like (in vba)
the catch is that i cannot remove [replace func] these chars from the 2nd