The way I'm using the lending library is to check out something that may have multiple of the same item. Rather than making the same exact asset information, is there a way I can check-out the same asset to several people? I think this would cause issues with the Check-in/Check-out query but I'd rather have a function where I could check-out one ID to several people and change the check in where I would have to pick one of the people who have it checked out.
I am trying to use Microsoft's Desktop lending Library Template, I've altered it to suit me but there is one thing I can't seem to do.
On the (Asset List) their is a Action Column with Check Out in, when you click on it, it opens the Check out Form which is ok when you've only got one item to check out.
What I want to do is be able to Check out multiple items out to one contact in one foul swoop.
I am creating a barcode system for our school library and want to use lending library. All of the books are are listed in excel, is there an easy way to import them or amed the lending library template to bring the books in instead of having to retype them all in the eldning library?
I have value in the form call (welder) & based on the other data i will enter in form i need VBA to check if this welder is certified to do the job or not.
I have a problem building a query using multiple check boxes. The situation is as follows:
I have a database to monitor enquiries which come into a central email account. I have devised a system where several check boxes are used to define the nature of the enquiry. Users can tick any number or none of the options to describe the enquiry.
I would like to create a query where users can search the database based on the check boxes which have been ticked. For example, if users want to search for enquiries where a specific three check boxes have been ticked, I would like all of the records where these three boxes are checked to appear, and so on for all different combinations of check boxes ticked.
I've tried a few methods, including creating a seperate form for the query where users check their search criteria in line with the enquiry form, but I can't link this with the original form.
I hope my description adequetly conveys the problem I have!
I have several check boxes, that are however categorised, in my form. I was now wondering, in order to save some time, how could I make a check box that marks/unmarks all the boxes under that specific category ??
I am using a yes/no field to select a number of records for a report. Is it possible to deselect and turn them all back to no at one time when finished with the report. It would be nice if I did not need to deselect all of them individually.
i am very new to access and even vba. I have a form called FrmAgent. Here there are 5 check boxes [CheckBob] [CheckJim] [CheckNikita] [CheckNoe] [CheckKyle]. I have one button named "RecieveData". I have one table named "Agent" and a query called "QryAgent". in the same column there are five people Bob Jim Nikita Noe and kyle. What i need is to have the button when its clicked run my query to produce the data. However, if multiple boxs are checked i need the data for those people. As of right now if i click the button (doesnt matter how many boxs are checked) it gives me data for all five people. Is there a way i can do this where i can receive the data only for the people that their boxs are marked?
I have a table(Product Change) with these fields: Tracking Number Approved (a check box) Engineering (text box that represents department) Purchasing (text box that represents department) Quality (text box that represents department) Production (text box that represents department) Customer Service (text box that represents department)
I want my query results to show all records that have the "Approved" check box...checked, and then only the records that have one of the Department fields with a null value. So I'm looking to see only records that are "Approved" and out of those....only the records with at least one department field empty(Null).
Any help doing this is SQL view would be great...or even design view.
I have a table and in that table I have multiple columns one being check boxes and another is the description. There are others but these are the relevant ones. I filter under description for HR Payroll but this description is not uniform. After HR Payroll it could vary so the description is not always the same. I want to select all check boxes under this description and was told use a query no clue how to do that though.
When UseDDelivery is checked the three textboxes should be disable and when the form is opened UseDDelivery is set to be checked by default so the textboxes should be disabled when the form opens but they aren't. the two different ways of doing it are shown below.
Elements specific to my system :UseDDelivery = checkbox AltDeliveryAddress = textbox1 AltDeliveryTown = textbox 2 AltdeliveryPostcode = textbox3 Solution 1:
This is a bit of vba a friend wrote for me quickly, it includes all three textboxes but the checkbox enables them instead of disables.
solution 2:
Code: Private Sub UseDDelivery_AfterUpdate() If AltDeliveryAddress.Enabled = True Then AltDeliveryAddress.Enabled = False Else AltDeliveryAddress.Enabled = True End If End Sub
With this bit of vba I found the checkbox enables the textbox instead of disabling it and I can't figure out how to include the other two textboxes
I have a form that has three checkboxes (IDDocument, DrivingLicence and Certification) on it. What the form is looking to do is based on the selection it will open a scanned document of the requested documents. There are 5 permutations that could be selected (either first on only, second one only, third one only, first and second and first and third). How do I code the IF Statement this so that the system will look at the different options and then do certain things accordingly.The code I have at the moment is:
Public Sub ProcessRequest_Click() Dim Form1 As String Dim Form2 As String Path = "Staff" & Me!EmployeeName & "" If Me!IDDocument = True And Me!DrivingLicence = False And Me!Certification = False Then
Do one thing
ElseIf Me!IDDocument = False And Me!DrivingLicence = True And Me!Certification = False Then
Do a second thing
ElseIf Me!IDDocument = False And Me!DrivingLicence = False And Me!Certification = True Then
Do a thrid thing
ElseIf Me!IDDocument = True And Me!DrivingLicence = True And Me!Certification = False Then
Do a forth thing
ElseIf Me!IDDocument = True And Me!DrivingLicence = False And Me!Certification = True Then
Do a final thing
End If End Sub
All the bits work (the form stuff) but my IF statements are not working. It seems that access is seeing the checkboxes as null and so the IF is not working when i check box 1 and leave the other two unchecked.
I really hope someone will be able to help me with this one as I am sure im just missing something simple.
I have an unbound form which has 20 yes/no unbound check boxes. The purpose of the form is to allow users to tick the various fields and a subform return the results. The subform, which does requery when a check box is ticked is based off a query. Initially, I wanted all the records to display before any check boxes are ticked so I have used the following criteria:
Like IIf([Forms]![Search]![Field1]=False,"*",[Forms]![Search]![Field1])
Which basically reads if field1 is no then display all records, else display all yes. Now that works fine but what I would like to have working is that if a client ticks field1, field2, and field3 it displays all records that have ‘yes’ in either field. Currently, if more than field is ticked the query treats it like:
Field1 And Field2 And Field3 And etc = true
I want to be able to select several check boxes and have the query return results for each check box that was checked. I would like to avoid doing this by having an append and delete query per checkbox.
I have a form named Member, this form has field named hobbies, this field has multiple values selection i.e. a user could select football, cricket, listening to music and etc. these values are stored in another table and i have looked up the values in my form named member, i know access has multiple value option in combo box while we look up values from another table, but i don't want that the check boxes appear in combo box, they should be listed right in form so that i can see them without going inside the combo box and at the same time the values of these populated check boxes should be stored in a single field.
I have a table of data regarding companies (contact info, etc). The company I work for provides these companies with up to 10 different products. On my input form, I have created 10 check boxes (and thus, 10 columns of Yes/No data in the corresponding table).
Each company has at least 1 product checked off, and up to all 10.
I would like to create a combo box that lists all 10 products, and upon selecting one, a list box then populates with the names of the companies (primary key) that use that specific product.
So, for example,
Company A buys CATS and DOGS from us Company B buys DOGS Company C buys CATS and ELEPHANTS Combo box options: CATS, DOGS, ELEPHANTS
If I choose DOGS, then a list box gets populated with:
Company A Company B
and when I click either of these, the record should be brought up for the respective company.
All of this should take place in the header of the form, while the form itself can be updated based on search selections.
I have run into an issue with a basic DLookup. The database has grown in size and now we could have multiple entries, but I want it to return a certain one. So the information could be in it three times. Of course DLookup stops after the first one. How do I get it to loop to check the entire table? Someone mentioned to me to use a recordset, but how to write that as I have never used it before. Below is what I was using until this new request came up.
<code> Private Sub txtloan1_AfterUpdate() If IsNull(DLookup("[loan1]", _ "settlement", _ "[loan1]=""" & Me.txtloan1.Text & """ AND [status] = 'Open'")) = False Then Cancel = True MsgBox "Test", vbOKOnly, "Warning" End If End Sub </code>
This was also executing after the user entered the information within a text field. I did not want them to enter all the data and then have it come back as a duplicate.
I am using the following code to check for duplicate tickets when importing multiple records into a datasheet view form by using the paste append function.
Code: Private Sub Ticket_Number_BeforeUpdate(Cancel As Integer) DoCmd.SetWarnings False If DLookup("Ticket_Number", "Record_Store", "Ticket_Number= '" & Me.Ticket_Number.Value & "'") > 0 Then Cancel = True MsgBox "There were import errors, please open View Import Errors above." End If End Sub
The form is used to insert multiple records into the database at a single time.
That codes works to check for duplicates. And if there are none there are no popup messages.
If there are duplicates though it gives a popup for every single Ticket_Number that is a duplicate.
I am wondering if there is a way for it to give only a single popup once it completes checking all the records to be imported for duplicates.
I ran into this the other day and thought that I would post it here if anyone is interested.
CodeLib is an application that helps you to easily find and information gathering. Support Notes, Code, Files, Pictures, Web, URL save. 6 in 1 Utility.
A database for all your information.
* A Personal information manager (PIM). * A Knowledge manager (KMS). * A Document manager (DMS). * A Bookmark manager. * A Pictures manager. * A Notes manager. * A Code manager. * A Files manager. * A Web manager. * A Blog Writer. * ... and much more
Screenshot: Here (http://codelib.threeus.com/Manual/images/Snap90.gif)
Video:Here (http://codelib.threeus.com/Demo.htm)
News source:Here (http://codelib.threeus.com/)
Download free version for Access/Firebird/MySQL/MSSQL:Here (http://codelib.threeus.com/Manual/DownOld.htm)
There is a shareware version for $39. I have always wanted one of these and free is a very good price and if you want more functionality, there is the shareware version.
I have created a databse, that handles, names,addresses, items bought, and so on.
Because of this, the database uses the internal variable Date().
I recently fitted a new hard drive, and when I came to run the database, to print out addresses, it complained that a missing DLL (Iaiexplore.dll) was needed. I clicked OK, and every field or line of code that uses the Date() variable no-longer works without this DLL. Which is off because this particular DLL belonfs to the Intervideo WinDVD player! My database handles a lot of things, but it doesn't play DVD's!
If I create a new database, the Date() variable works, it juswt doesn't work in mine without that DVD player being installed. This has baffled me. I did have this app installed, but I switched to another DVD player, after fitting the new Hardrive.
For one-reason-or-another my database has a dependency for this DLL, and the Date() string won't work without it. And this of course, has a knock-on effect of stopping something else from working. I went to Macros/Tools/References, and removed it from there, but it still didn't cure the Date() problem. Although it didn't ask for this DLL again.
I cured it the last time by re-installing the DVD player, but this is ridiculous, and seems overkill.
1) I am making a library database. I created a simple query to identify books on loan.
I need a form to browse all books, not just the unavailible books. However it needs to show that the book is unavailible/onloan (like my query identifies), perhaps by changing the colour to red or an "on loan" tickbox,
How do I achieve this?
2) How do I run some code on startup? I found code to change the main background colour, but I don't want to assign a button to do it
Hi, i've developed a program in access 2003, but now i'm on access 2000 and seems that one / more library is/are missing..
i've this part of code
Private Sub List0_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Dim strOrd As String, strSql As String If Button = 1 Then If Y <= 225 Then If Right$(List0.RowSource, 5) = " Asc;" Then strOrd = " Desc;" Else strOrd = " Asc;" End If strSql = "SELECT cliente.CLI_ID, cliente.CLI_TITOLO, cliente.Cognome, cliente.Nome, cliente.Indirizzo, cliente.Cap, cliente.[Citta'], cliente.Regione, cliente.Nazione, cliente.CLI_SOCIO FROM cliente WHERE (((cliente.CLI_SOCIO)=Yes)) ORDER BY " Select Case X
and this is the screen with the libraries currently installed ..
Hi there! I haven't done any work on MS Access for some while now and I would like some help, to get back into things I want to do a library database system. I would like to have a table for 'customer' and 'books' and 'books out on loan'My idea for tables so far are:Customer{ CustomerNo - autonumber(PK) First Name - Text Second Name -Text Surname - Text HouseName - Text Street - Text County - Text Postcode - Text Phone - Number E-mail - Text}Books{ ISBN - Number(PK) Title - Text Author - Text On_Loan - Yes/No}On_Loan{ ISBN - Number(FK) Title - Text(FK) CustomerNo - Autonumber(FK) Date_Out - Date/Time Date_In - Date/Time(PK) Fine - Currency}Do these tables look ok?I'm know how to make these tables, but the forms and querys are a bit foreign to me after having time away from access, could anyone please advice me on how to go about this or show me examples of how to do this in access? I want all books taken out have an automatic 7 day renewal date from the current day! and all out standing books on loan to be printed off in a mail merge. Fine in table On_loan should be the cost of x amount after each day over the renew date. so if its 20p per day then after 3 days fine would be 60pAnd a page to add new customers/books.:)
