I made some minor changes in my data entry form, the table and the query form. I believe they are all consistent. But now my query comes up empty no matter which parameters I choose. How do I figure out what went wrong?
View RepliesI have a burron to run a query that auto populates 'start time' with NOW().
It has worked for 3 years and now I get an error message see attached. The only thing I did was change the program fromm 2000 to 2002.
any and all suggestions welcome.
Thanks
Hello...
This should be an easy one for many of you..
I have the following to code to let the user select a file..
It worked before but suddenly stopped working...I remember adding some reference but I dont remember exactly the name of the reference..
After I did this, I converted the database from 2000 - 2002/2003 ..back and forth...I did not change/remove any references.
I have access 2003 but my database is in 2000 format because my teammates have 2000.
Thanks in advance for the help.
-------------------------------------------
Dim fDialog As Office.FileDialog
Dim varFile As Variant
' Set up the File Dialog.
Set fDialog = Application.FileDialog(msoFileDialogFilePicker)
With fDialog
' Allow user to make multiple selections in dialog box
.AllowMultiSelect = False
' Set the title of the dialog box.
.Title = "Please select a file"
' Clear out the current filters, and add our own.
'.Filters.Clear
' .Filters.Add "All Files", "*.*"
'.Filters.Add "Access Projects", "*.HTM"
'.Filters.Add "Access Projects", "*.HTML"
'.Filters.Add "Access Projects", "*.DOC"
'.Filters.Add "Access Databases", "*.VST"
'.Filters.Add "Access Databases", "*.VSD"
'.Filters.Add "Access Databases", "*.TXT"
'.Filters.Add "Access Databases", "*.MDB"
'.Filters.Add "Access Projects", "*.XLS"
' Show the dialog box. If the .Show method returns True, the
' user picked at least one file. If the .Show method returns
' False, the user clicked Cancel.
If .Show = True Then
'Loop through each file selected and add it to our list box.
For Each varFile In .SelectedItems
DocsPath_TB.Value = varFile
Next
End If
End With
End Sub
---------------------
Hey
This worked fine for some short (but blissfull) time
On Error GoTo MANError
pathbgc = Path & "Man.xls"
DoCmd.TransferSpreadsheet acImport, , "B_Man", pathbgc, vbYes
MANError:
If Err.Number = 3011 Then ExitSub
'--------------------------------------------------------------------------
Now the damn error message pops and says error 3011, can't find the file..
Why isn't On Error stopping it anymore ?
:(
Hi All,
Have a problem with the Toolbox functions when in form design mode; they have suddenly stopped working this afternoon.
For example add button no longer brings up the wizard asking about the various options, combo box wizard no longer appears.
Has anyone encountered this before?
Have tried a reboot but no luck.
Thanks
Hawk
Access 2003.
Auto complete was working with a combo box. After adding much functionality
to a database I find that auto complete does not work on any combobox in any
form. So I create a blank database and a simple test shows that auto complete
works. When a form from the faulty database is imported in the test database,
auto complete stops working on the test form. Even if the imported faulty
form is removed, auto complete still does not work.
I tried creating a new database and importing the faulty form after removing
all controls and events from the form except for the combo box. Auto complete
still stops working. Not only on the imported form but also on the existing
form which works prior to the import.
I checked auto expand and it is 'Yes' in all conditions.
What ever is causing the problem on the faulty form seems to cause some
property of the database to change.
Is there some database option or property setting that controls auto complete?
Is is possible that importing a form will cause a database property to change?
--
RobGMiller
I am calling a continous form from a combo box on another form. The code below used to warn me that there were no records and shut the form down to avoid showing a blank form.
Private Sub Form_Load()
If IsNull(Me.TxtUnit) Then
MsgBox "There are no operations recorded for this Unit", vbOKOnly, "No Recorded Operations"
DoCmd.Close
End If
End Sub
All was working fine until I changed the properties of the continous form to "Allow Additions = No" to remove the spare blank line at the bottom of the records (just for neatness really).
Now, if there are no records to display, the Me.TxtUnit is not Null anymore. It does not seem to exist. If I hover the mouse over it (in VBA) I get no response at all.
How can I get my Msgbox back please ?
Oscar
Access 2013 stops working when I open any table in design mode, and select any field with the type "Number". I can edit Text, Date or Yes/No fields, but not Number ones.
View 7 Replies View RelatedMy form with record source of query has stopped allowing edits.
I have reviewed property setting and do not understand what's going on.
I am thinking about creating a DB using Access for a business. However, my wife mentioned to me that her company is looking at software for database work and has some Access DB's they are trying to convert because, according to a technical support person, Microsoft intends on getting rid of Access as a DB! I am posting here to ask anyone, professional or otherwise, if anyone has heard that Microsoft intends to stop supporting or implementing Access. Is Access 2003 the last version? I haven't been able to find out anything along this line. I thought, maybe Microsoft is thinking about supplanting Access with SQL Server. Before I go to the toil of building a DB system in Access, I want to know I am not wasting my time doing it. If anyone on this forum has heard a thing about Microsoft dumping Access, please let me know. Thank you. :o
View 8 Replies View RelatedDear All,
I prepared times ago a database that contains important data that will be frequently updated.
Since yesterday I cannot load the database anymore. I get a pop-up with following statement:
Quote
The Microsoft Jet database engine stopped the process because you and another user are attempting to change the same data at the same time
Unquote
If I click ok, the loading process will be aborted.
I'm the only user of this database, neither the database nor the directory containing the database is sharable. It is located on the harddisk of my computer which nobody from outside can access.
What can I do to recover the access to my database?
I use MS Office 2003 but tried to open the database also on MS Office 2000 with the same result.
The Help function of MS-Access does not really help.
Who knows how to solve the probleem????
With regards
Siegfried
I've been using code similar to that below to send an alert from a pc triggering the event from my database. I used to get the pop up warning giving the user the choice to cancel the email in case it was a hoax but now get an error message stating. "Microsoft Access can't send a message for the reason stated in the preceding alert"
There is no preceding alert and the email no longer sends. has anyone managed to solve this problem?
What the hell is MS doing?
Private Sub cmdFindPrint_Click()
On Error GoTo Err_cmdFindPrint_Click
DoCmd.RunCommand acCmdSaveRecord
DoCmd.OpenReport "rptFinder", acPreview, "", "[StrayRef]=[Forms]![frmOwnerDetsFinder]![txtStrayRef]"
Dim strEmail As String
Dim strBody As String, strSubject As String
strEmail = "me@here.co.uk"
strSubject = "Owner collecting from finder"
strBody = "Finder's details have been given to a claiming owner. Seizure Sheet Number " & Me!txtStrayRef & " " & Me!txtColour & " " & Me!txtBreedType & " "
DoCmd.SendObject , , , strEmail, , , strSubject, strBody, True
Exit_cmdFindPrint_Click:
Exit Sub
Err_cmdFindPrint_Click:
MsgBox Err.Description
Resume Exit_cmdFindPrint_Click
End Sub
Hello,
I've searched MSFT, this forum and Googled it with no success. My first post, I hope this is correct section.
Sometime in past few days Access Documenter will only display object name regardless of what properties are selected in the Options menu. Selections always default to back to "Nothing" after trying viewing. It is not related to any specific.MDB file. Have tried with more than 12.
Uninstalled and reinstalled Access and Office. Did not correct the problem.
When using Documenter (located on another computer on the network) for the same database(s) it works fine. So it is machine specific. Running XP with all current updates and Office 2003 with SP2.
Any help or suggestions willl be greatly appreciated.
Don
Hi All
My department has customer database using microsoft access with the main table being a linked table to SQL-Server database down in IT department.
I've only been recently made aware that the staffs have been having problem when trying to change or delete old data. It keeps on bringing up the error message
The Microsoft Jet database engine stopped the process because you and another user are attempting to change the same data at the same time.
which is hardly the case since each staff are assigned only one customer to work on.
While it is technically possible to have many people working on the same data, business wise, it is impossible to do that.
I still come up with the same error even when the IT department confirms that no one accessing the SQL-Server table and I was the only one logged in.
This leads me to believe that there is something in the code that somehow preventing the table being edited or deleted. The problem is the database is so huge and was designed by my predecessor so I do not have any knowledge of the complete working of the codes behind it.
If it's the problem with the code, can anyone tell me what sort of codes caused this? If not, can anyone tell me what happened?
Any help would be most appreciated.
Thank you
Hello!
I am working on a database that uses a table from another access database. I am not sure but I think the problem started after this line was added to the code:
Set dbk = OpenDatabase("D:My documentsJapiOritaColorBazeKnjigovodstvo1.1.md b")
The database still works fine on one machine. When I copy it to another machine, that is when I receive 3197 error.
When I copy database to another machine without the code that contains the line from above, and copy the same code in the same form after opening copied databse, the problem is solved.
Does anybody know why is this happening? How can I fix this?
Thank!
I have created a db that is used strictly for data entry. I have one main form with about 6 embedded subforms and the db is broken down into a FE/BE. I currently only have one user in the database and sometimes when the user tabs into one of the subforms the will receive error 3197. I have searched the forum and have read that this error may be caused by a OLE or memo field but I have neither. There is no pattern to the error it seems to happen sporadically. Any ideas?
Thanks in advance
I am facing an issue The Custom Macro Stopped report from rendering. I have report which is having two sub reports inside. The report is opening in the report view properly but when the ExportWithFormating macro runs, it throws this error.
View 1 Replies View RelatedI am using Access 2003 and there is a from with barcode scanner to update the shipping data. This form has a sub-form which is working perfectly fine and updating data but the barcode scanner assigned with main form stopped working today. I tried different scanner too and different system too but its not working.
View 5 Replies View RelatedI attempted to add new queries, reports, and a form to a shared database. It bombed out and I found that a user was changing data in the tables at the same time.
Now I cannot access the database at all (front or backend) and receive the error message: “The Microsoft Jet database engine stopped the process because you and another user are attempting to change the same data at the same time”. (I have verified that no users are currently logged in.)
Access to the data is critical to my department and I’m scrambling to fix this. Can anyone assist me?
Thanks!
Hi,
I hope someone is able to help me. I've been working on this for days. I have a report which has a 2 subreports in it. I have the subreport bound and have a query working in the recordsource. Here is the recordsource:
SELECT [Casual Roster Information].ID, [Casual Jobs/Dates].LinkID, Sponsors.SponsorID
I have one report with the Master/Child fields filled in and set but the sponsors subform I cannot fill in the Child field. It says I need to put SponsorID in the recordsource. I thought I did have this(see above.) That's my first problem.
My bigger problem which I think the previous problem is contributing too is my subreport shows up blank. When I run my query it works perfect. But, when I run it with the rest of the program the subreport shows up blank.
Anyone know how I can go about fixing this??
Thanks!!
Nick
I recently upgraded a DB from 2003 to 2013 and ran into the following problem.
I have a button that opens a file dialog box and allows the user to upload a file to a predetermined location (and store the address as a hyperlink). I borrowed this code from someone else on here and modified it slightly.
In any case, the button still works, but now when it opens it doesn't have an option for "All files" under file types. So I can upload MS Office files, text files, etc., but not PDF files which are by far the most common types my users upload.
Private Sub Command35_Click()
Dim dd As Integer
Dim fileDump As FileDialog
Set fileDump = Application.FileDialog(msoFileDialogOpen)
dd = fileDump.Show
Dim Yourroute As String
Dim yourrouteName
Yourroute = fileDump.SelectedItems(1)
yourrouteName = StrReverse(Yourroute)
yourrouteName = StrReverse(Mid(yourrouteName, 1, InStr(yourrouteName, "") - 1))
FileCopy Yourroute, "us170fp00dataWBO_Tool_RoomDrawings" & yourrouteName
Me.Drawing_Link = yourrouteName & " # us170fp00dataWBO_Tool_RoomDrawings" & yourrouteName
End Sub
Hi all,
I have a problem with a delete query i am trying to set up and hopefully one of you experts can help me out.
I have a table called [PMI] and a table called [Referrals]
The tables have a one to many relationship and are linked by the primary key field Patient_No.
I want to delete all records in [PMI] that have no records in [Referrals] and this is what i'm having problems with. I have created a select query where i can return the records i want to delete but its the removing of them from PMI that i cannot figure out.
Hope that makes sense, all help is greatly appreciated.
Thanks in advance.
Hi all,
I'm sure this is easy to do but for some reason i just cannot get it working. Hopefully someone here can tell me where i'm going wrong.
I have two tables in a database and the have a linking unique field. I want to update a column in one table from a column in another where the linking ID field matches.
Here's what i have at present.
Update Table_1 inner join Table_2 On Table_1.ID = Table_2.ID
Set Table_1.[CHI Number] = [Table_2]![CHI_No]
This is just returning the CHI Number column as blanks instead of what i expected would be the same as Chi_No.
Can anyone shed some light on this for me?
Thanks in advance
SELECT count(Workitem) AS ["Total Workitem"]
FROM qryReport
WHERE qryreport.date >(08/10/2005); 'MM/DD/YYYY
Secondy how do i supply dates dynamically.
we have a main table for tracking pickups....some of the fields are combo boxes with relationships to other tables....one such relationship is units (ml, gallon, ounce, etc)...in the main table everything works just fine....a user enters the location info, the amount and the corresponding units. thus, an example would be a user picks up something from building X, room 101, 10, Gallons.....the 10 refers to the gallons, the user picked up 10 gallons...
now for the query:
i'm creating a query for which i will base a report on...in query design if i just select the above info everything works fine....it comes out on the report as 5 Gallons....however, what i'd like to do is concatenate the two fields so that they take up less space on the report and are more visibly appealing...here's what i tried in query design:
Amt: [amount]&Space(1)&[units]
this does not work....in the units table that provides Gallons as a selection in the combo field, Gallons has a key value of 5.....thus, when i run the query using the above code i get 10 5 - where 10 is the amount the amount and 5 is the key from the combo box...
i've tried bringing in the units table but then i get a type mismatch....how can i concatenate the two fields and show the proper units? this has to be simple but i cannot get it to work... :mad:
I have a a table that changes monthly, and each month I need to find the records from the old table that are not in the new table and visa versa. I made the entire row in the table the key.
and wrote two find unmatched queries.
However, the queries are not finding all the information that is no longer there or that has been added.
Can someone please take a look and see what I am doing wrong?
Any help appriciated!!
Thanks
the tables are imported from Excel