Search results

That sounds like what I want to do. On my new part form I want the user not to enter a new part number that is already in the product table. But I want to tell them before they have filled out the whole form only to find it is a duplicate. So where would you put this code

Thank you all for your help. I am very new to code so am finding it hard to follow. Please correct me if I am wrong I do not not want to save the to my table and have found that I can do that if I refresh the form in the before update. But you are saying I should use DLookup to check for the...

Thanks for your help for some reason my computer has just died black screen of death

Im trying to prevent duplicate entry when entering data into a field in a form. I want to know as soon as I enter the data that it is a duplicate. I have found that I can do it by using a macro Refresh in the after update The problem I now have is the standard response dialog boxes. I am...

Thanks for your help. I have found that I can do what I want with using the macro Refresh on the after update. The problem now is that the result is the standard warning boxes 3 of them I will see if i can find out if I can do the same thing with writing code and point it to the strings table...

Part Number is not my Primary key field but i have set it to no duplicates. The form is created from a quire that links my supplier table and other. My issue is that I do not get told that I have entered a duplicate part number until i have completed the form and the save the record. i would...

I have a form that is used to add new parts to my products table. The fields are Part number Description Location Supplier Cost When I open the form it goes to a new record that I can add a new part. all good The problem is that I can type a duplicate part number that is already in my products...

This is the code on the tick box Private Sub Posted_To_Inventory_AfterUpdate() On Error GoTo ErrorHandler Dim InventoryID As Long Dim ProductID As Long Dim Quantity As Long ProductID = Nz(Me![Product ID], 0) Quantity = Nz(Me![Quantity], 0) InventoryID =...

This is the code that I think should change the status to closed Public Sub InitFormState() Dim Status As PurchaseOrderStatusEnum Me.Supplier_ID.SetFocus Status = Nz(Me![Status ID], New_PurchaseOrder) Me.cmdSubmitforApproval.Enabled = (Status = New_PurchaseOrder)...

Thanks for that I did not know it was not fully functional that would explain so of the other problems I have over come. I don0t realy understand code so have copied a lot from Northwind maybe not a good idea then

Im using northwind to create a inventory database. I have found that when i receive in goods it dose not change the purchase order status to closed. Looking at the code I can see that I have met all the criteria but it does not change the status to closed. I can upload what I have but it does...

That worked fantastic thanks so much for that

I found it here it is Thanks SELECT Inventory.ID, Inventory.Location, Inventory.Description, Inventory.Item, [Inventory Stock Levels].[Current Stock], Inventory.Comments FROM Inventory INNER JOIN [Inventory Stock Levels] ON Inventory.ID = [Inventory Stock Levels].ID WHERE...

Thanks for your reply I will change it to the on update. Im sorry but I donot know where to find the SQL for the query to show you what it is i got how to do it of databasedev.uk and all it said to do was to put [Forms]![Search]![Combo0] in the criteria in the query. This works but only if you...

This is the code on the FORM drop down box Row Source SELECT Locations.Loc, Locations.Field1 FROM Locations; Event Procedure Private Sub Combo0_Change() DoCmd.OpenQuery "Copy of GET Stock Take P" Me.Combo0 = "" End Sub

I have made a form and are able to open the query with a drop down box selection. It only works if I put in all the correct information but I want to use the * wild card to bring in more information as below. Field contains values FS1A12 FS1A11 FS2A13 FS2A15 BA1A5 and so on. I have created a...