Search results

  1. A

    call sub in another control

    found the answer: call tabmain_change
  2. A

    call sub in another control

    I have a form "mainform" and I have 2 controls on that form that ("chk_ClaimHistory" and "TabMain"). One is a checkbox and the other a Tab control. When the checkbox is unchecked, I want to call the "On Change" Event of "TabMain". I tried putting : Call...
  3. A

    Concatenate Sql String

    found the answer... strOldTable = Split(strSQL, " from ")(1) strOldTable = Left(strOldTable, InStr(strOldTable, " ")-1 strSQL = Replace(strSQL, strOldTable, strNewTable)
  4. A

    Concatenate Sql String

    I have a string in a variable that has a sql string. I need to pull out the table name and replace it with another name. These are 2 examples of the string that I get: "Select * from mytable;" "Select field1, field2, field3 From table2 Where Field2 = 123 Order by field1" I want to replace...
  5. A

    Create new field

    thanks! this was the answer
  6. A

    Create new field

    I tried creating a new field using variables like this: nFldType = "dbText" nFldSize = "20" tdf.Fields.Append tdf.CreateField(TblCol, nFldType, nFldSize) But it does not like "dbText", when I use this it works: tdf.Fields.Append tdf.CreateField(TblCol, dbText, nFldSize) How can i get it to...
  7. A

    Listbox Index

    I found the answer: Forms("ReportManager")("lstReportName") = Forms("ReportManager")("lstReportName").ItemData(ListIdx) Thank you!, Allen Brown
  8. A

    Listbox Index

    I'm setting the controlsource in several textboxes.
  9. A

    Listbox Index

    I have a form that has a listbox. I am calling a procedure from a module and then it closes my form and reopens it. I want my listbox to keep the same location, in other words the selected value will be the same so that it does not loose it's place. Below was my attempt to do this. I get an...
  10. A

    Create controls with formatting

    the criteria selected in a form will run a pivot table code in sql server and then I create a passthrough query that I use to display on my form. The fields are always different names.
  11. A

    Create controls with formatting

    I am creating a form on the fly and I am creating all the fields in the form as well by looping on each field and creating the field on the form. I want to format the textboxes to round on decimal 2. in SQL Server it is showing as .99 and in ms access it shows as 0. How can I format my form...
  12. A

    open form in same monitor as application

    I have an application that opens a popup form and sometimes it opens in another monitor and not the monitor the application is on. How do i get it to open on the same monitor as the application is on ?
  13. A

    concat string

    MarkK , thanks! this is exactly what I needed.
  14. A

    concat string

    There won't be joins. I'm thinking I may use an array to do this..grab the value after from...
  15. A

    concat string

    This worked, but there has to be a better way??? Mid(Mid("Select * from mytable where x = 1",instr(1,"Select * from mytable where x = 1", "from") + 5),1, instr(1, Mid("Select * from mytable where x = 1",instr(1,"Select * from mytable where x = 1", "from") + 5)," "))
  16. A

    concat string

    How to I get a portion of a string into a variable? I want to capture the table name of a recordsource. The problem is sometimes the recordsource is "Select * from mytable where ID = 6" or "Select * from mytable" or "mytable" I want to put "mytable" in a variable for later use.
  17. A

    Conditional Formatting

    The cells are not being filled with the color (backcolor).
  18. A

    Conditional Formatting

    I have conditional formatting working in a subform. But I have another form with another subform and it is not working there. Do you see anything wrong here: Dim objFrc As FormatCondition Dim db As DAO.Database Dim rs As DAO.Recordset Dim strSQL As String Set db =...
  19. A

    error 2450 when setting form

    I am getting an error msg when i get to the line "Set frm = Forms(vFormname).Form". Error 2450, cannot find the referenced form... 'Code: Dim frm as form ' Check If saved dynamic field exists SqlStr = "Select ReportListID, DynFieldName, DynCalc, FormName, UserName From DynFields Where...
  20. A

    OpenRecordset and ODBC linked tables

    Yes, I even tried opening an empty table with over 50 columns and it took longet than a table with half the fields that has records.
Back
Top Bottom