This is my code
Sub UpdateNulls()
Dim strSQL As String
Dim rs As DAO.Recordset
For Each tdf In CurrentDb.TableDefs
If Left(tdf.Name, 4) <> "Msys" And tdf.Name <> "01UMWELT" Then
strSQL = "Select * From [" & tdf.Name & "] a Inner Join 01UMWELT On a.fall = [01UMWELT].fall Where...
Hello PHV
you had given this query
To shorten the number of fields:
strSQL = "Select a.* From [" & tdf.Name & "] a Inner Join [table1] On a.fall = [table1].fall Where a.Status = 5"
but when i use this the first table is getting missed out i.e it is not getting updated.
I modified the code to update the fields which ar e given from a text file.
Sub UpdateNulls()
Dim strSQL As String
Dim rs As DAO.Recordset
For Each tdf In CurrentDb.TableDefs
If Left(tdf.Name, 4) <> "Msys" And tdf.Name <> "01UMWELT" Then
strSQL = "Select * From [" & tdf.Name & "] t Inner...
I am trying now that instead of updating all fields it would be better updating only a few fields due to size constraints.
would it be possible to have a text file containing only name of the fields which have to be checked and filled.
example if there s a field speed then only the field speed...
When i run this(given at the start) code half way through the database i get an error 3001 invalid arguments.
i found out that this is because the databse has reached the 2gb size limit. any methods to to get through this.
sorry
i meant the code posted at the beginning of thread
but ya i have got through it. i took a back up of the database and deleted the current and tried running the code on teh new on e and so far it seems to be ok
thanks
while runnin this code i get a run time error 3190 too many fields
i googled the error but only thing i can find is that the database must be compact and repaired and then query must be run again.still the error occurs
i dont have more than 255 fields in any tables also.
any insight in this error
actually only the braces need to be added on 01umwelt and teh code runs, at some point an erro too many fields is popping out, but i ll look into it.
one more doubt will a vba code i have written in excel work in access. i had written a code in excel vba for writing data to a word file . can i...
that works
thankyou very much
now i ll get back to implement this in the code.
but now in the code i guess the same provblem will occur or should i change the sql string
the duplicates wizard asked for only one table
i tried unmatched query wizard and it aske dfor two tables
here is a sample query
SELECT [01UMWELT].FALL, [01UMWELT].OLDCASE
FROM 01UMWELT LEFT JOIN 03_PERSDAT ON [01UMWELT].FALL = [03_PERSDAT].FALL
WHERE ((([03_PERSDAT].FALL) Is Null));
Well I am getting the same error
syntax error missing operator in query expression
'tblT.fall = table1.fall'
Also no table1 is not the name
as i said the database is in german and the table names are too. here it is 01umwelt.
i used table1 as it was simpler.but while running the query i am...
THis is the query I am running in query design window
SELECT * from table1 a inner join ON table1 a.fall = table1.fall where a.status = 5;
i am getting syntax error in from clause
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.