I went home last Friday with my Access 2003 apps (using ODBC SQL Server backends) working fine (and have functioned for several months). Monday I have issues with all of the True/False fields.
Investigation finds that only -1 is being recognized as True. Previously any non-zero value was...
This "feature" still exists in 2003. Very annoying! Whenever I open - then close a table the database window scroll bar freezes until the window is moved. I can't find any reference to it in the MS Knowledgebase.
You should be able to re-write the shell_cmd variable from your code as follows:
shell_cmd = "c:\folder~1\batchfile.bat c:\folder~1\log_file.txt"
You don't need the chr(34) anymore because there are no spaces in the path-filenames.
Just make sure that folder~1 is the correct 8.3...
Hi Aidan,
Spaces in Folder/File names can be a royal pain at times.
One thing you might try is using the old 8.3 folder / file name.
Your Folder With Space would be something like Folder~1.
You can see the 8.3 names by opening a Command Prompt (DOS Prompt) and typing DIR /X. The /X switch...
You might try to use the OpenArgs form property.
Pass the field(s) using the openargs argument of the openform action and then set the Orderby property of the form or append the fields to an Order By clause of the form's recordsource property.
Ken
Hi rlivermore,
If all records are updating to the same thing (Pass or Fail), then the comparison of the current date to the datefield (insurance expiration) is not working correctly.
Make sure that insurance expiration is a date/time data type field and not a text field.
Ken
Hi Marlun,
Since I do alot of checking for the existance of files, I use a simple User Defined Function called FileExists() which returns True if the file exists and False if not.
Function FileExists(PathFile as String) as Boolean
FileExists = len(Dir(PathFile))>0
End Function
Using this...
An update query should work.
In the Update To box of the insurancestatus field put
=IIF([insurance expiration]>Date(),"Fail","Pass")
Ken
If Exceed Order No is a text field you may need to use the single quote character:
WhereCondition:="[Exceed Order No] = '" & Me!Results & "'"
Ken
Try this:
If Dir("C:\TBLCLINETBLANK.XLS")= "" then
msgbox("The file is not at ...........")
Else
<your normal processing code goes here>
End IF
Ken
The Developer Edition will create stand alone applications. It contains the MS Access runtime executable which is packaged with the rest of the objects.
Ken
This is possibly caused by using "NAME" as a field name. Since NAME is also a property of several objects, it is best to avoid using it for fieldnames, control names, etc.
I would use FullName, LastName, FirstName or something like that.
Ken
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.