Search results

I found the answer of mile Mile-O-Phile Right at the top of your form's code module in the declarations section put your variable. i.e. code:--------------------------------------------------------------------------------Option Explicit Option Compare Database Dim MyDate As Date Sorry...

does that mean that the variables are cleared when passing the 'end sub'?

Hi I had a big procedure and I wanted to split it out in smaller parts. But - bad luck - I saw that if I declare the recordsets in the first sub and after I try to use them(like rc.movefirst etc) in a called sub, it ain't work. like this: Sub example() Dim db as dao.database Dim rc as...

Thank you Kev, have a nice day. And actually, yes, I'd need some help on a topic posted a while ago, where I still don't find a solution http://www.access-programmers.co.uk/forums/showthread.php?s=&threadid=54188 If you got some time or mood or both, you're wellcome :-) Thanks again Dan

Thank you Kev, that was what I was looking for So keeping the same names for the splitted table will make me able to use the code that I have without big chages. Thanks again

Hi Kev Maybe I didn't make myself clear (not maybe, sure) I don't want to install MS SQL server. The database has 1500 max 2000 new lines in the main table a month. I can eventualy empty it from time to time, once a year, if I want to, so not the size is the problem. The thing is I...

Here is the question I have an access 2002 db and I want to make it an ADP project. I install everything I need, I import the tables and the forms, copy the queries and rebuild the relationships. Is it going to work? If so easy it would be wonderful. Dan

actualy it was case weekday(now) case 1 blabla case 2 blabla ..etc

I needed the first and the last day of the week. I wrote this: Private Sub Commande10_Click() Select Case semaineencours Case Weekday(Now) = 0 Me.datedebut = Now - 6 Me.datefin = Now Case Weekday(Now) = 1 Me.datedebut = Now Me.datefin = Now + 6 Case Weekday(Now) = 2...

Hi Mailman and thanks a lot for help Is doing the same, an infinite loop I already tried this version. I am really stocked with this one

talked too fast as usual its working but making planning for the days that are not checked.. :-) and for the checked ones nope

i did this and it works Private Sub Commande16_Click() Dim rsth As DAO.Recordset 'Horaire Dim rstP As DAO.Recordset 'planning Dim mydate As Date 'Dim i As Integer Set rsth = Me![tblHoraire subform].Form.Recordset Set rstP = CurrentDb.OpenRecordset("tblPlanning", dbOpenTable)...

unfortunately its making a infinite loop lile this I have tried a lot of things but I dont know how to restart the loop, because its jumping after to the next date and missing the rest. Here is the db, thanks for helping

actualy, what I should do is an if before mydate=mydate+ 1 that would check the other recordsets for the same day, and if he finds to restart the loop on the next recordset based on the form(rsth). easy to say in words...:-)

calling Mailman (hopping not on vacation) I tried but I didn't get it working If I put two lines in the tblhoraire with the same day, it makes the planning for the first one, and its skiping the second or the third(cause at the end of loop the date is incremented) I killed my neurons but I...

boblarson, you just made my day is is working so nice your piece of code until now I was doing huge stupid loops to get this in DAO thanks

hi Rich can you explain me please a little more precisely what you did cause I have the same problem and I didn't get the idea Thank you

Thank you Pat

Why do I have problems with manipulating a dao recordset on a form based on a query? Its always giving me the same error, "too few parameters", but working just fine when it's a subform or a table. ANy tip is welcome, thanks in advance.

That's what I was thinking, Pat So if I share a normal Access database(not a project) in network and there are two persons working on it in the same time, it should be ok