Recent content by dbay

  1. D

    ADODB Best Update Method?

    I would have over 350 users connected.
  2. D

    ADODB Best Update Method?

    Another question. What happens when using a Command.Execute method to Update a record that has been locked or deleted by another user? When using a Recordset you can check whether or not the record supports updating at the moment using the .Supports(adUpdate) property and if the record still...
  3. D

    ADODB Best Update Method?

    Are you suggesting all transactions should be done with stored procedures?
  4. D

    ADODB Best Update Method?

    Explain? Please don't say linked tables.
  5. D

    ADODB Best Update Method?

    I am in the process of moving my systems from Access backends to SQL Server. I am now learning about ADO methods and am getting overwhelmed with all the different methods to do the same thing. My question is which one is the more "Correct" method and why?? Private Sub Save_System() Dim...
  6. D

    Check if Excel workbook is open in Access

    Here is what I use to check if a file is open or not. Just pass it the Path to the file. If it is Open it will return False. Public Function Check_Open_File(ByVal STR_Path As String) As Boolean Dim INT_Number As Integer On Error GoTo err_proc INT_Number = FreeFile() Open...
  7. D

    JOIN Query to return most recent record

    Thank you for your reply. The working SQL: SELECT TBL_FINDINGS.FIN_Finding_Index, TBL_FINDINGS.FIN_Finding_Number, TBL_RESPONSE.RES_Response_Status FROM (TBL_FINDINGS INNER JOIN (SELECT RES_Finding_Index, Max(RES_Response_Index) AS Max_Index FROM TBL_RESPONSE GROUP BY RES_Finding_Index )...
  8. D

    JOIN Query to return most recent record

    I have two tables with a one to many relationship. The tables are linked by the INDEX column. EXAMPLE: TABLE_1 INDEX NAME 1 Name_A 2 Name_B 3 Name_C TABLE 2 INDEX NUM_INDEX STATUS 1 1 REJECTED 1 2...
  9. D

    Best method to save Images

    I save a lot of images with the applications that I create. My current method is to create a specific folder in a folder named "Storage" per record (up to 5 images per record) using VBA and then save the image in that folder. Each image has a unique name of its own. My question is, what is the...
  10. D

    Store all records in one field

    Even though it is not the correct way to store data in a "typical" database. Here is a solution. Concatenate your data using a delimiter ("," or ";"). Here is an example to retrieve the data. Private Sub Get_Data() Dim DB As DAO.Database Dim RS As DAO.Recordset Dim VAR_Array...
  11. D

    Major Boating of backend

    Yes, it brings it back down to 81mb. The boating happens when there are more than one person accessing the backend while inserting around 20k records. If only one person is dumping records the bloating is not that bad. There are no bound forms in this split database. Everything is handled with...
  12. D

    Major Boating of backend

    I need to know the best way to insert data into the backend without cause major bloating of the backend. I am currently inserting about 20k rocords at a time using an INSERT INTO statement. The backend went from 83mb to 511mb trying to insert the last 20k records. Thank you.
  13. D

    Importing Excel into a premade Access Form

    I import data from an Excel sheet into a form so it can be modified if need be before saving it to a table. Private Sub CMD_Browse_Files_Click() On Error GoTo err_proc Dim OBJ_File As Object Dim OBJ_XL As Excel.Application Dim OBJ_WKB As Excel.Workbook Dim OBJ_SHT As...
  14. D

    What makes a form go completely blank?

    I know if you have your Form set to "Allow Additions = No" and you open the Form on a blank Record this will happen.
  15. D

    Pls Help !!! Assigning values to Excel cells from access database

    Sorry, found some more things. Dim DB As DAO.Database Dim RS As DAO.Recordset Dim RS_Filtered As DAO.Recordset Dim OBJ_XL As Excel.Application Dim OBJ_WKB As Excel.Workbook Dim OBJ_SHT As Excel.Worksheet Dim STR_SQL As String Dim recCount As Long Dim i...
Back
Top Bottom