Hi there,
This may mean stupid question to you but I find that some of the events or types in the properties which give me 'no meaning' at all.
For example, has module on form, on retreat on report. THIS IS ONLY A sample, my list would be endless.
Thanks in advance
I created a database that has a field called "Corrective Actions." I want the user to be able to type in a series of numbers, in the following format: 001, 002, 051, 123. Each number has a certain meaning. For example, 001 means "Upgrade to current revision," 002 means "Replace Unit," and so on. Here is what I would like to happen: The user will type in the numbers in the appropriate format. When the user presses the tab key to go to the next field, I want the numbers to be replaced with the actual meaning. My problem is that I can not figure out how to accomplish this. Can anyone help me?
View 5 Replies View RelatedI have a database I want to load tire and brake measurements into. I have created a table which I enter records into, including the date, measurement, the wheel position and the item (tires or brakes) being measured.
On the form I have a picture of a tire and a brake at each wheel position and I would like to be able to display in the control by each item the latest measurement in the main table that matches that wheel position and item.
I have an MS Access DB, that uses a list box to give users a view of the possible selections to choose among.
It works great, but the database has grown to the point there are nearly 3,000 items in the list box.
I found that if you type in the first letter, it will take you to the first alphabetically in the list with that letter.
So if I type in "A" it takes me to "Aardvark". But even this could use improvement, as typing in the first letter with 3,000+ selections means the users may scroll a few hundred to find what they are looking for.
Is there any code, or property setting that can set it up, so the users can type in the entry and it will narrow it down?
So if they type in "AS" it goes to "Assumption" rather than "Aardvark" then jumps to "Sail" (as it does right now).
Thank you for your help,
T.J. Bernard
ok i have 3 tables.
JOB TABLE
jobid(pk)
date
companyid(fk)
staffid(fk)
COMPANY
companyid(pk)
name
STAFF
staffid(pk)
companyid(fk)
name
the primary and foreign keys are joined and RI is enforced. like this infact http://www.cambridgeupholstery.co.uk/relate.JPG
using a method ive just learnt ;) thanx pat and rv the user can choose a company and a staff member for each job. the relevant id is placed in the job fields and thats all good.
the form looks like this. http://www.cambridgeupholstery.co.uk/myform.JPG
eventually there will be many companies and many more staff members.
what i would like to happen on the form is when the user selects which company they are dealing with...only the relevant staff who work for that company are displayed in the listbox.. in other words i want to filter the staff names by the chosen companyid.
what code do i need to place and where.. my company list box is called "complist" and my staff list box is called "stafflist" and the form they are on is called "enterjob"
i hope that is clear.. thank you very much for any potential replies.
Please see attached database
Main form is frmPatients
If you click on the main form called frmpatient you will see 2
text boxs one called Primary Insurance the other Called Secondary Insurance
Above those text boxes are to hyper links which open the list box
What I'm trying to do is if a user double clicks the name of the Insurance
From the List Box it will insert that Name of the Insurance Into either
The Primary Insurance or Secondary Insurance Text Fields
I do not Want to Use combo Boxes because I have about 1,000 Insurances in my database.
Please Help
Hi
I have placed a ListView on the form. I have written a DblClick event for the ListView. The application is a multi-user one. The issue is that the DblClick event was working for few days and now it does not work for any of them but it is working only in my system.
Is it related to reference ? I developed the tool on my system and placed in a shared folder from which everybody uses. Do I need to give reference in all the system ? Please help. I am stuck with this problem.
I currently use this code to trigger a not in list event, ask the user if they want to add it to the respective table, and then add it.
I'd like to be able to add the text in the combo box that triggers the event to show up in the msgbox.
Private Sub cboCategory_NotInList(NewData As String, Response As Integer)
Const Message1 = "The data you have entered " & me.cbocategory.text &" is not in the current dataset."
Const Message2 = "Add now?"
Const Title = "Unknown entry in CATEGORY Field..."
Const NL = vbCrLf & vbCrLf
[Code] ....
I have a basic form linked with a subform inside of it. The main form has a list of customers in a combobox and the subform lists all the things they have ordered from us. This all works perfectly fine, I can add data to the list of things ordered and it's ok.
I decided instead of using a whole extra form to add customers I'd just have a not in list event and allow users to add customers through there, bit more intuitive and cut down on forms.
It works to certain extent except one small problem, if I add a customer I have to close and reopen the form to be able to add/remove data from them in the subform. If I leave the form open and try to enter in data in the subform immediately it just shows whatever customer I had last on the combobox and adds it to the last customer as well.
It works perfectly fine if I reopen it so I thought it was some kind of query or update snafu but all the VBA code examples I found don't seem to do anything. Not exactly sure where to go from here.
PHP Code:
Private Sub cboDept_NotInList(NewData As String, Response As Integer)
Dim oRS As DAO.Recordset, i As Integer, sMsg As String
Dim oRSClone As DAO.Recordset
Response = acDataErrContinue
If MsgBox("Add dept?", vbYesNo) = vbYes Then
Set oRS = CurrentDb.OpenRecordset("tblDepartments", dbOpenDynaset)
[Code] .....
I have a form (about patients) containing a listbox (list of visit dates) and a subform (showing medications at that date). When you click on the listbox, the subform is re-queried with the selected date as a parameter to show the medications that were in use on that date. This is working fine.
However, when you move to a new record (patient), the subform is initially blank because the listbox hasn't been clicked on yet. This means that it looks like the person isn't on any medications, which is causing some confusion.
I need a way to have the subform show the "top" (most recent) date because that is the current medication list, and the thing most people want to see first. It is always the top of the list, so I would like to do something like this (pseudocode)
Code:
Private Sub Form_Current()
Forms![MedSearch].SelectDateBox.Requery
Send MouseClick Event to line 0 of SelectDateBox
End Sub
I would like to create a combo box (or something similiar if a combo box simply can't do it) where the list of choices in the pulldown shows only the matches of what a user types in. The list of choices are coming from a field in a table. Also I would like the "search" of the user's input to include what is "within" each choice, e.g. if a user type "ber", then valid results should be bertha, october, robert.
View 1 Replies View RelatedIn a query I'm trying to return a list of rows sorted by Service Type Ascending and then the last item in the list should be a row called "Add Edit Value".If I 'ORDER BY 2' then the "Add/Edit" row appears at the top which is not what i want.
My SQL:
SELECT '' As ServiceTypeID, 'ADD/EDIT VALUES' As ServiceType FROM ServiceTypes UNION SELECT ServiceTypes.ServiceTypeID, ServiceTypes.ServiceType FROM ServiceTypes
ORDER BY 1 DESC;
I am trying to populate a list box with an event after update in a combo box. I can get the formula to work using 2 criteria, the problem is i nee to add a third criteria. When I try to add it I get the run-time 13 error.
Here is the code I am trying to use:
Private Sub cboStatusRFQ_AfterUpdate()
Me.cboSupplier.RowSource = "SELECT DISTINCT [Consolidated_Master_Req_Pool.RFQ Contact] " & _
"FROM Consolidated_Master_Req_Pool " & _
"WHERE consolidated_master_req_pool.Complete = FALSE AND [Consolidated_Master_Req_Pool.RFQ Supplier] = '" & Nz(cboStatusRFQ.Value) & "'" And "[cosolidated_master_req_pool.Status] = '" & "[SUPPLIER_RFQ FOLLOW-UP]" & "'" & _
"ORDER BY [Consolidated_Master_Req_Pool.RFQ Contact];"
Me.cboSupplier = Null
End Sub
I've almost completed the DB I'm working on, but still have a few loose ends to tie up that I can't seem to figure out. I've spent many hours already on this forum searching for solutions, and have tried a few different things, but I still can't work out these bugs.
First, I need my form to open with the latest records filtered first, so that the most recently added records will be easiest to find and edit. I'm not sure how exactly to do this. I've tried a run query when the form is opened, but I still need all the records displayed or accessible. The form is called frmDenial, and I would like it to be looking in the DateLogged field of the form. Any suggestions?
Second, I have command buttons that will export data in the fields to MSWord Templates via bookmarks. The button runs well by opening the document, inserting the data, and printing. I have also tried several different code syntax to close word once it is done, but it is still staying open after printing. Here is a sample of the code:
________________________________________
Private Sub Print_Letter_Click()
Dim objWord As Word.Application
'Start Microsoft Word 2000.
Set objWord = CreateObject("Word.Application")
With objWord
'Make the application visible.
.Visible = False
'Open the document.
.Documents.Open ("G:PharmacyPrior Auth Docs and DataRevised Pharmacy Denial ProcessesKAN Not Nec or Benefit2.dot")
'Move to each bookmark and insert text from the form.
.ActiveDocument.Bookmarks("bmkFirstName").Select
.Selection.Text = (CStr(Forms!frmDenial!MBRFirst))
.ActiveDocument.Bookmarks("bmkLastName").Select
.Selection.Text = (CStr(Forms!frmDenial!MBRLast))
.ActiveDocument.Bookmarks("bmkHRN").Select
.Selection.Text = (CStr(Forms!frmDenial!MemberNumber))
.ActiveDocument.Bookmarks("bmkAddress1").Select
.Selection.Text = (CStr(Forms!frmDenial!MBRAddress1))
End With
Print_Letter_Click_Err:
'If a field on the form is empty, remove the bookmark text, and
'continue.
If Err.Number = 94 Then
objWord.Selection.Text = ""
Resume Next
End If
objWord.Application.Options.PrintBackground = False
objWord.Application.ActiveDocument.PrintOut
objWord.Application.ActiveDocument.Close SaveChanges:=wdDoNotSaveChanges
'Quit Microsoft Word and release the object variable.
objWord.Quit
Set objWord = Nothing
Exit Sub
End Sub
_______________________________________
Finally, I have two cascading combo boxes set up that will auto pop related fields based on the selection made. But, if an item is not in the list, I would like the user to add it to the linked table to appear in the list. I also have this working well, with a pop up asking the user if they want to make the addition, type in the new item, and add to the list without requiring the user to refresh or exit then re-enter the form. But it will only add the item name, and not the item description (another field in the form and another column in the table). How can I modify the code to prompt the user to enter these other details? I can link it to a pop up sub form to enter the data, but if possible, would rather the boxes pop up to have the user type in the data. Here is the code I have so far in the NotInList Event...
__________________________________________
Private Sub DrugName_NotInList(NewData As String, Response As Integer)
Dim DB As DAO.Database
Dim rs As DAO.Recordset
Dim strMsg As String
strMsg = "'" & NewData & "' is not an available Drug" & vbCrLf & vbCrLf
strMsg = strMsg & "Do you want to add the new Drug to the current Database?"
strMsg = strMsg & vbCrLf & vbCrLf & "Click Yes to add or No to re-type it."
If MsgBox(strMsg, vbQuestion + vbYesNo, "Add new model?") = vbNo Then
Response = acDataErrContinue
Else
Set DB = CurrentDb
Set rs = DB.OpenRecordset("tblDrug", dbOpenDynaset)
On Error Resume Next
rs.AddNew
rs!Drug = NewData
rs.Update
If Err Then
MsgBox "An error occurred. Please try again."
Response = acDataErrContinue
Else
Response = acDataErrAdded
End If
rs.Close
Set rs = Nothing
Set DB = Nothing
End If
End Sub
______________________________________________
The two other colums in the tblDrug that I need the user to be prompted to fill are Denial Reason (column 3) and Alternative (column 4). What would be the best way to accomplish this?
I would really appreciate any help or suggestions with any of these problems. Thank you so much! :o
I have no experience with Access Modules which I think I need to find all the queries that reference a field, in this example: LAWSON_LHSEMPDEMO.R_STATUS
I would like for the module to list all the queries for me that reference this table and field of "LAWSON_LHSEMPDEMO.R_STATUS"
Is there an easy way to do this?
I am relatively new to Access and i am wondering why i cannot find a specific field from a table on the control source when i am and attached it to a check box.
I have created the field on the table, and now i want to attached it to the check box on a form however when i go down the list of control sources i cannot see it.
Why it is not work???
I have got one list control and i want to populate it with values of one query
:
ListItem1.RowSource = "Select " & fld & _
" from " & tbl & ", Stock where ( " & tbl & "." & fld & " NOT IN (Select SerialItem from Stock ) ) AND (BIN=0) AND StockItem = '" & tbl & "' group by " & tbl & "." & fld & ";"
i try it with simple query and it is not working:
ListItem1.RowSource = " Select id from stock ; "
I try this in ms access 2k2 it work.
Or it is problem of VusialBasic ???
I need solution from MSAccess 2k.
help me plz
With ColdFusion and MSAccess 2003, the following query :
SELECT A.*, B.entry_id
FROM A.blog_entries, B.blog_subscriptions
WHERE B.blog_id = #variables.blog_id#
AND B.user_id = '#variables.userInfo.user_id#'
AND A.user_id = B.user_id
returns this error :
[Macromedia][SequeLink JDBC Driver][ODBC Socket][Microsoft][ODBC Microsoft Access Driver] Could not find file 'C:WINDOWSsystem32B.mdb'.
Please advise. ThankYou
I need to use various activeX controls in MsAccess2003. I downloaded a few activeX controls but I am having a problem with licensing. I registered the controls and the registration succeeded but when I try to add this ActiveX control on a form in MSAccess, I get the message that I don't have the license required to use this ActiveX control and that I should obtain the appropriate licence from the company that provides the licenced OLE object or ActiveX control. Any ideas on how to overcome this problem?
View 3 Replies View RelatedHey guys!
I got a Ibase/firebird database and I need to convert it to MS-ACCESS format.
I searched on google, on this forum but I couldn't find a solution.
I appeciate any help!
Thank you!
Is there any way to compare two tables and write out the records that don't match to a third table?
thank you.
Is there a way to change the caption "Record" to "My Record" on navigation
bar in a MSAccess Form?
:rolleyes:
Thanks in advance.
Hello,
1/ I occasionally run into this error: "The instruction at "0x77fc823" referenced memory at "0xfffffff8". The memory could not be "read".
Click on OK to terminate program."
Do you know if this error message occurr ONLY on certain computers using Access 2000? Since this error popped up on one of my co-worker but NOT on mine. I even tried to re-install Access 2000 again, but the error message still pop up when tried to open a report. Also, the last three digits of instruction number "0x77fcZZZ" change everytime. Please help!!
2/ For some reason, I was coding VBA on one of the procedure on Form_Load, then certainly Access 2k does NOT let me go in the code of any control. WHY!! I am frustrated!! I tried to go in different way, but does not work
Thank you so much.
hi,
I am a newbie in ms access. I am ask to do some coding to help me with massive duplicate datas in my database in access.
But i do not know where to start from?
Im very confuse.
As i do not know if ms access itsself can be program using codes?
or am i suppose to use SQL? or VB? or VBA?
I really need help urgently...
thanks alot
I'd like to know when a user has modified their records on my site. Is it possible to include code to stamp the datelastmodified per record? And if so, how?
I'm using MS Access and ASP vbscript
Thanks
Sandra
the compact and repair on Access enable us to compact or database bec when we delete records the space consumed is not removed. in ASP my Access is increasing rapidly almost 10MB and sometimes downloading this file takes a lot of time for a slow internet. is there a script i can use to automatically compact the database?
View 4 Replies View Related