Recent content by fabby1

Ken Thanks for the reply Maybe I didn't explain myself properly I want to do this for all Database Object e.g. Table, Forms, Queries, Report etc. SO that they are not visible in the Database window Regards Phil

Hi In the Design windows I usually right click go to properties and click the hidden button. Is there a way to do this via code for ALL database objects Regards Phil

Thanks Ken Did what you originally sugessted Thanks

Ken Thanks Pal, your right that is one option butI would like to keep it clean and buttron free if possible, if not then I will use you suggestion Thanks Phil

HI I have 12 screens with have a button which takes them all back to the main switchboard where there is an exit button. On each screen in the top right is the X close button, how can I if the user presses this button exit the database. At the moment when you press is it closes the screen but...

Hi I have a query that is used in different screens What I want is to change the criteria using the following code Private Sub cboUser_AfterUpdate() Dim qdf As DAO.QueryDef Dim rst As DAO.Recordset Set qdf = CurrentDb.QueryDefs("MainDetailsQuery") Set dbs_Current = CurrentDb G_Surname =...

Mordja Got that sorted One last thing, I think I need to append the changed query back to the query definitions how to I do this Phil

Mordja Nearly there I understand what you are trying to do now, Only problem I have it when I try and append the string to the SQL it comes back with error '3142' Character found after end of SQL statement this is the current Query ?qdf.SQL SELECT dbo_MASTER1.STATUS...

Hi I have an input box for the date and the user then enters the number of days off Is there a function I can use to add the number of days onto the selected date and exclude weekend and bank holidays Thanks Phil

Mordja Thought I had it. I'm OK with the first part it's this bit Im struggling with Now the underlying SQL of your query will have been modified. For the above to work you need to to add the Microsoft Data Access Objects Library (Tools - References) Last do Set qdf = Nothing Sorry about...

Thanks I think I've got that now, thanks for you patience Cheers Phil

MOrdja Thanks for the post. Yes I have built a query in design view & would prefer to keep that as I have several screens that use the same query. I'm not sure how to use what you have suiggested in my problem. If G_AStaffNo = "100473" Then SQLStr = SQLStr & "Where Location Like BES"...

Hi I have a global variable G_LOCATION that is either set to "Like BES" or "NOT Like BES" I then have a wrapper function Public Function LOCATION() As String LOCATION = G_Location End Function This is called from with in a query e.g. Field: Location Table: dbo_Master1...

HI Can anybody help me Im desperate

Hi Im using a wrapper function in a query to hopefully choose between two different events. I set a global variable using Private Sub cboUser_AfterUpdate() G_Surname = Me.cboUser.Column(0) G_Forename = Me.cboUser.Column(1) G_AStaffNo = Me.cboUser.Column(2) G_Password = Me.cboUser.Column(3)...