Search results

what I've got Here is my code I've been keying with, from my kick post. I want to have a msgbox pop up, and give them the option. If they don't click on anything for say another 10 mins, I then put them off. Right the timings are set to 5 or 10 sec just to play with it. Take a look and show...

I've actually added a msgbox, and I plan on also sending a email to everyone.

Thanks guys I created a table called tbllogout with a yes/no, and then put in the ontimer for the main page this code... Private Sub Form_Timer() Dim rs As ADODB.Recordset Set rs = New ADODB.Recordset Dim strSQL As String rs.Open "tblLogout", CurrentProject.Connection, adOpenKeyset...

If I want to make changes accross the board how would I kick out everyone using the database. I send out an email right now, but there is always someone not at their desk and has it open. All help is appreciated.

How would I go about kicking out a user if he is idle for 15 minutes? The users do not log on to the database. T he tables are based in SQL and access serves as the front. All help is appreciated

I'm sure this is simple but I keep getting #error. I have field being pulled from a qry called Send in ##/##/#### date format. I want to either add 30 to it, or use Date Add. [Send] + 30 dateadd("m",1,[Send]) All is appreciated :D

That worked wonderfully. Thanks for the help!

I have a date and need to increase each one by 4 months. I'm currently just adding 120 days to it, but some of the dates are being put into the wrong month. [tblMasterList]![Loan Effective Date]+120 I would like to just add 4 months to the month column and not touch the days. Example...

Worked Great, thanks for help!

I am running it from VB code, Dim stDocName As String stDocName = "UPQryJuly" DoCmd.OpenQuery stDocName, acNormal, acEdit Exit_Command34_Click: Exit Sub Err_Command34_Click: MsgBox Err.Description Resume Exit_Command34_Click But the prompt still pops up.

I know you can turn on the message prompt on the whole database using Tools...Options. How could I have the prompt not show up just on one particular update query that runs when a form is opened. Thanks in advance Paps

I have an excel spreadsheet which pulled off an old database where the DOB was in the following format 21853 72738 92342 I would like to change these either in excel, or in access when imported in as 2/18/53 or if possible 2/18/1953 7/27/38 7/27/1938 9/23/42...

in the end a macro called printout worked great, you can set the pages to be printed out. Thanks!

How do you use the top function? The report is pulling from a qry like this... [Forms]![frmMarch]![Policy #] Thanks

I have a report which pulls the current form's policy number off and sends the data to the report. Sometimes this form will bring several instances of a policy number with, so the report will want to print 4 pages. I only the first 2 pages of the report. So is there anyway to tell command to...

I have a report which pulls the current form's policy number off and sends the data to the report. Sometimes this form will bring several instances of a policy number with, so the report will want to print 4 pages. I only the first 2 pages of the report. So is there anyway to tell command to...

Solved, thanks everyone!

Thanks to Pat that works great except now the field stays highlighted even if I go to the next record. How can I have it change back, if the date doesn't match

code... If Me.Send_Notice150 = Me.Text33 Then Me.Send_Notice150.ForeColor = 255 End If where text33 equals a field which equals = now() I tried .backcolor too but nothing changes on the form. Thanks for the help guys Pappy

I want to assign a different color to a date field, if that date equals the current date. I tried to use conditional formatting, and some VB code but can't get it to work. Any suggestions would be appreciated