Recent content by Pappy

  1. P

    Code for a timeout

    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...
  2. P

    Kick Users

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

    Kick Users

    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...
  4. P

    Kick Users

    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.
  5. P

    Code for a timeout

    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
  6. P

    Add in a report

    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
  7. P

    Update Query by Month Only

    That worked wonderfully. Thanks for the help!
  8. P

    Update Query by Month Only

    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...
  9. P

    No message on update Query

    Worked Great, thanks for help!
  10. P

    No message on update Query

    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.
  11. P

    No message on update Query

    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
  12. P

    Excel into Table Date Problem

    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...
  13. P

    Print only the first 2 pages

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

    Print only the first 2 pages

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

    Print only the first 2 pages

    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...
Back
Top Bottom