Search results

I have a smal Access application that works in the network. When some users try run application received error that network drive is disconect. Therfore I would like put for application some VBA code that establish network connection to specific drive... something like this Set WshNetwork =...

On current event I have some code that locking record for edition depending on the flag (bolean).I would like as well lock this line for deleting depending on the flag. Can someone give me some tip how to do this? Private Sub Form_Current() If Me.approved = True Then Usluga.Locked = True...

In the main Form I have some code which locking records (is put 'On current' event). Code works properly for records which were entered before to table ie. records with flag can not be edited and vice versa. The problem is when I would like add some new records then is not possible to put any...

How to easly restricted fill-in records? The idea should work in such way that if somebody would like enter records by form in period that is locked, system not allowing for entry... Thank you in advance.

Hi All. What I did wrong wit enclosed code? No, action after push the button.. Private Sub klik_Click() Dim dbsRejestr As DAO.Database Dim rstColor As DAO.Recordset Set dbsRejestr = CurrentDb Set rstColor = dbsRejestr.OpenRecordset("TblCar") rstColor.MoveFirst Do Until...

I created a simple database to record time for manufacturing department. End users (about 15), day by day, for each worker register data using a special dedicated form. Within one month of the table is registered about 10 - 12 thousand of records. At the end of the month registered time is being...

Hi All I use two miltibox to filter sub-form. Generally filter work perfect but in one of the option when I mark some Model and Family is Null then I received error. Example of my code and simple data base is enclosed. Your help will be appreciated ;-) Private Function BuildFilter() As...

Welcome The code below filters the list box depending on the selected option 1, 2, 3, 4, 5 Unfortunately, after filtration in the list box is visible only EmployeeID, and I would like to see surname as well. WybPrac.RowSource = "Select Prac.IDemploy" & _ I tried to modify the code in this...

Hello I would like to ask for support for my new data base. The data base work properly but I would like to add another functionality that will help collect data in better way. Unfortunetelly so far I didn't find possible solution:( In the subform 'FormWprG' are being filled: Day Hours...