Search results

Hi This is a little complicated. I have had to create a table of Rules that are translated via code into dates and times. I.e staffid, first monday after start of month , 09:00 , 11:00, location 2,rule#. would create a record containing the staffid , date of the first monday in the month and...

Hi Glad that was of some use,:D , There's no need to create a blank db and import etc you can just copy the DB onto the server/hardrive and then view the DB properties in windows explorer and take off the readonly check. You could try ziping the file and then copying it to the CD. It's...

Hello again i tried this and it seemed to work. Dim rst As DAO.Recordset Set rst = CurrentDb.OpenRecordset("qryDynamic_QBF") ' just in case it isn't populated fully rst.movelast rst.movefirst Do Until rst.EOF = True strEmail = strEmail & ";" & rst![Email] rst.MoveNext Loop 'lose the...

Hi Lynsey, Still looking at the list box thing, however the CD problem is one that i have come across before when i was at college handing in assignments and unfortunatley the only solution i know is to package the db in an installer. As CD's are (usually) read only the default is readonly...

Hi Thanks for the help sorry not be on line to reply sooner. AncientOne; I had originally tried the suggestion you gave and came across this problem. You are correct in that a shift can have 1 location, 1 date and 1 time. If you create another link table with the PK shift_id and staff_id...

Hi Thanks to Len Boorman for his previous help with this we went through this recently and came up with the following ( i'll take responsibility for any balls-ups!) Basically . I want to be able to create a unique work shift that allows mutliple staff members to be assigned to each shift but...

Hi No not 4 years on this! LOL :D , I'm usually really uptight about getting the relationships right, had a good teacher. I knew this was wrong but i just couldn't see it. As you say woods and trees. I'm off to the pub now to finish the cream cheese process. I'm sure if Pat H sees this i'm in...

Hi len Posted at the same time so didn't see your last reply. AM and PM are just that before and after 12 mid day. Basically for each day each unit will have two shifts and these need filling by a number of staff. Say 6. one lot Am and one lot Pm. You wouldn't believe i've been doing this...

Hi Told you it was a cream of Brain cheese day! Tbl_Location.................Tbl_Rota.............................Tbl_Staff .....................................Rota_ID(PK) Location_id-------------<Location_id_fk Location.......................Staff_ID_AM(FK)>------------Staff_ID...

Hi Len, so what you are saying is; Tbl_Location.................Tbl_Link.........................Tbl_Rota Location_id-------------<Location_id_fk Location.........................Rota_ID_Fk>--------------Rota_ID...

Hi Mike To clarify a unit will be assigned a number of staff on any given day. Therefore 1 unit may have many staff and 1 staff member may work in many units. This many to many relationship is not allowed in relational databases. So i created a link table using the date This gives 1 unit...

Hi My brain is being reduced to the consistency of cream cheese today (way to hot :cool: and tired :o ). I'm trying to develop a Rota system for a hospital department and i've got to the point of trying to store the actual data that makes the Rota. My intention was to create a table of...

Hi Mile No worries i've done it. ShowCalendar(ByRef TxtDate As TextBox, ByRef Datetype As String) As you can see i've added another variable DateType which is either A+date or D+date e.g A01/08/2003 or D01/08/2003 I've then used get and set functions to store this value (i'll try open...

No worries

Hi Mile The openargs is exactly the type of thing i want but how do you actually use that in conjunction with the activex control? I've only used it to pass a SQL string to the opening form, for say a recordsource. Sorry being thick here, Private Sub ctlCalendar_click()...

Hi I think this may be what you need. Basically it finds the postion of the first full stop. Counts that it has found 1 and then cuts the string from behind that full stop so and then analyses the next part of the string. Public Function GetNumStops(MemoStr As String) As Integer ' do...

Hi Mile/ anybody I'm using the Active-X calendar control that Mile posted on a number of occasions. I was wondering if it is possible to limit the days available for selection. Basically i need a start and end date and i don't want the users to be able to select a start date that's after...

Hi Rich Well i didn't know that (surprised? I'm not!). I'll have to give that a try. I wonder why it only works with the bound column displayed? Cheers Chris

Hi Thanks for all your help Fizz. :D I've come up against this sort of problem before and resorted to removing the table from the relationship. Which worked by the way! It just doesn't seem logical/right though, i always think that i must of made a mistake somewhere and i'm working around...

Hi You need to set the response to response = acDataErrContinue this should suppress the access message Private Sub lengthmeasureselect_NotInList(NewData As String, Response As Integer) MsgBox "Please select a value from the list.", vbOKOnly + vbInformation, "Value Not Found in the List"...