[AccessD] Query runs and doesn't run

[Rocky Smolin]

If you delete everything in [tbl Initial Pattern Factors] then run the code,
does anything appear in [tbl Initial Pattern Factors]?

I assume that [tbl Initial Pattern Factors] has six fields that match the
datatypes in Allocations, yes?


Rocky Smolin
Beach Access Software
760-683-5777
www.bchacc.com
www.e-z-mrp.com
Skype: rocky.smolin
 


-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Kaup, Chester
Sent: Tuesday, January 09, 2018 1:50 PM
To: 'Access Developers discussion and problem solving'
Subject: [AccessD] Query runs and doesn't run

I have the following query that run just fine from the query grid

SELECT Allocations.ChildPID, Allocations.ChildPTYPE, Allocations.PID,
Allocations.PTYPE, Allocations.Date, Allocations.Factor_1,
Allocations.Factor_2 INTO [tbl Initial Pattern Factors] FROM Allocations
WHERE (((Allocations.PTYPE)="PATT") AND ((Allocations.Date)=#6/1/1935#));

I have the same query in VBA but it generates no output. I am at a loss as
to what is going on. Here is the VBA part.

Dim dbs As DAO.Database
Set dbs = CurrentDb

strSQL = "SELECT Allocations.ChildPID, Allocations.ChildPTYPE,
Allocations.PID, Allocations.PTYPE, Allocations.Date, Allocations.Factor_1,
Allocations.Factor_2 INTO [tbl Initial Pattern Factors] " & _
                  "FROM Allocations " & _
                  "WHERE Allocations.PTYPE='PATT' AND
Allocations.Date=#6/1/1935#;"

        dbs.Execute strSQL


What is even stranger is the following statement does not fail although I do
not see the table in the list of tables

DoCmd.DeleteObject acTable, "tbl Initial Pattern Factors"
--
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com