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
I have no idea if this will work for you but it may be worth a shot.
START C:\commands\MSAC2K21.exe I:\office\Access\RatingsEWR.mdb /xRatingsRun
START opens a new window and checks some registry settings
Ken
You can use the command START to avoid entering the path/filename of the Access executable.
Start <Optional:path/msaccess.exe> c:\mydatabase.mdb
This has the added benefit of opening the application in a new window so that the DOS window closes. If you run the batch file from a hyperlink...
1. Type this in the declarations section of a module:
Global gCName as String
2. When you check the username and password, assign the value of the cname field to gCName:
gCName = rs("cname")
3. Put a unbound textbox (txtUserName) on each form where you want to display the name. In...
I setup the data source first, then used that to link the Oracle tables to the Access mdb.
The line Set db = ws.OpenDatabase ... just automatically refreshes the ODBC connection so that no user response is needed.
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.