Search results

  1. A

    Openform Is Closing Form

    I currently have 3 forms open and when I call a specific function and it gets to this line below it goes to the on close of 1 of my open forms closes that form before it opens the selected form in code (below) in design mode. It doesn't close all my forms....why does it do this? DoCmd.OpenForm...
  2. A

    import objects

    Yes, this is very helpful. Thanks!
  3. A

    import objects

    I want to export different objects (i.e. modules, reports,tables, queries...) from another ms access application. How can I list the objects so I can pick from them and then import them. I know ms access has a wizard and I am looking to do the same but a little different because I have an...
  4. A

    set default on control in the OnLoad Event

    I am now testing it on a button i put on the form. On click event for the button Forms(mainform)("Dyn_" & T rim(str(Project_ID)) & "_SubFrmTab03" & PT_Suffix & "_Approval").Controls("Groupid").DefaultValue = "=Forms!" & mainform & ".ClaimInfoGroupID" basically something like this below...
  5. A

    set default on control in the OnLoad Event

    I am dynamically trying to set a control default value. I have the code below in the On Load event of the form. I get an error msg that says "Run-time error '2467': The expression you entered refers to an object that is closed or doesn't exist." What I am doing wrong? Forms(mainform)("Dyn_"...
  6. A

    Get the names of subforms in a tab control

    Stopher, you're a genius! thanks!
  7. A

    Get the names of subforms in a tab control

    I have a main form that has a Tab Control. The tab control could have 5 to 10 tabs. Each tab has a subform and in some instances a tab could have a tab inside that tab with subforms as well. I want to be able to get the subform names in each tab. I am able to get the main form name by using...
  8. A

    working with selected records in a datasheet

    The 2 existing checkboxes are used for something else.
  9. A

    working with selected records in a datasheet

    Yes, that is an option I thought about, but I already have 2 other checkboxes and didn't want to have to add another if I could avoid it. I was hoping I could loop thru the selected records and send a command to sql to delete those ID's from the table in SQL.
  10. A

    working with selected records in a datasheet

    I have a SQL view linked into a ms access application. That view is used in a subform and in datasheet view. I want to select multiple records and click on a button that will delete those selected rows. I need the button because the view has 1 table and a subquery joined in the view and will...
  11. A

    Sum Time in Report

    this worked: =Int(Sum([TimeOut]-[TimeIn])*24) & ":" & Format(Sum([TimeOut]-[TimeIn]),"nn")
  12. A

    Sum Time in Report

    Your solution works for the total time for the day but not for the week...see results sample below: TimeIn TimeOut totaltime 9:15 AM 6:30 PM 9:15 9:45 AM 4:45 PM 7:00 1:33 PM 5:40 PM 4:07 9:33 AM 4:33 PM 7:00 Total time 3:22
  13. A

    Sum Time in Report

    I have a report that has 2 fields (TimeIn and TimeOut). I am totaling the time for the day using : =Format(TimeSerial(0,((DateDiff("n",[TimeIn],[TimeOut]))),0),"h:nn") In my report, I am grouping it by week and I need to sum the time at the report footer for that week. How can i do it? I...
  14. A

    sql with recordset

    I figured out what was wrong with my original code. I was using a field name in the sql command that did not exists in the table. I ended up using this code: Public Sub fFindNulls(strTableName As String) Dim rstAny As Recordset Dim iFldCount As Long Dim iLoop As Long Dim strFldName As...
  15. A

    sql with recordset

    I get the same error... Runtime error '3061': Too few parameters. Expected 1.
  16. A

    sql with recordset

    I should state...i remmed out the line below in part of the sql code (right before the OR) on purpose to simplify it...but it gives me the same error msg: strSQL = "Select * From tbl_Claims_Upload Where " & myField & " Is NULL" ' OR LEN(Rtrim(Ltrim(" & myField & "))) < 1"
  17. A

    sql with recordset

    I get an error msg below. I am trying to run a SQL statement and create a recordset. The first recordset is created with no problems...but the second one is a problem. This is the line that has the eror msg: "Too few parameters. Expected 1." Set rs_Null = dbs.OpenRecordset(strSQL) 'Full Code...
  18. A

    Import multiple dbf files and filename?

    I get the error msg: "External table is not in the expected format"
  19. A

    Import multiple dbf files and filename?

    How do I make this work for dbf files (foxpro 8)?
  20. A

    syntax error for querydef

    I am using sql 2007 and ms access 2007. This is the full code for those interested: Sub ListTablesSQL() On Error GoTo Err_ListTablesSQL Dim temp As String, temp2 As String Dim sql As String, sqlFrom As String, sqlJoin As String, sqlWhere As String, sqlOrderBy As String Dim rst As...
Back
Top Bottom