• WSMS_fan

    WSMS_fan

    @wsms_fan

    Viewing 15 replies - 451 through 465 (of 480 total)
    Author
    Replies
    • in reply to: Table fields do not get populated (Access2002) #921311

      Thanks a million. I just found out that our Access install was Customized, so some features does not included. They will reinstall MS Office now. Good Day and thanks again

    • in reply to: sort Data fields (Access2002) #921271

      THANKS it does work!!!

    • in reply to: sort Data fields (Access2002) #921272

      THANKS it does work!!!

    • in reply to: sort Data fields (Access2002) #921211

      I would love to but impossible task.
      There is Excel file that gets modified and I am pulling datat from this file and it is Text.
      Data is very abnormal as user gets to it easily, so I have to do it as simple as possible. all fields are text.
      Thanks

    • in reply to: sort Data fields (Access2002) #921212

      I would love to but impossible task.
      There is Excel file that gets modified and I am pulling datat from this file and it is Text.
      Data is very abnormal as user gets to it easily, so I have to do it as simple as possible. all fields are text.
      Thanks

    • in reply to: Table fields do not get populated (Access2002) #921145

      Can you please scren shot last 2 fields? Those are the problemed 2. I will have to show it to ppl to make them reinstall my Access.

      THANKS so much, HansV cheers

    • in reply to: Table fields do not get populated (Access2002) #921146

      Can you please scren shot last 2 fields? Those are the problemed 2. I will have to show it to ppl to make them reinstall my Access.

      THANKS so much, HansV cheers

    • in reply to: Table fields do not get populated (Access2002) #921131

      Hi!
      Trying to send mdb. Open form and insert 37988 in search. Click Search button
      Thanks a lot

    • in reply to: Table fields do not get populated (Access2002) #921132

      Hi!
      Trying to send mdb. Open form and insert 37988 in search. Click Search button
      Thanks a lot

    • in reply to: Excel data into Access (WinXP/MSOffice2002) #921051

      I’ve tried and it crashed.
      Should I be yelling to reinstall my Access?
      As far as I know there is a lady next to me who CAN import Excel into Acess. Does this mean it is corrupted on my PC?
      I’ve tried another one of my team-mate and it crashed.

    • in reply to: Excel data into Access (WinXP/MSOffice2002) #921052

      I’ve tried and it crashed.
      Should I be yelling to reinstall my Access?
      As far as I know there is a lady next to me who CAN import Excel into Acess. Does this mean it is corrupted on my PC?
      I’ve tried another one of my team-mate and it crashed.

    • in reply to: Table fields do not get populated (Access2002) #921036

      Hi
      I edited my post. The error I am getting at line DoCmd.RunSQL mSQL is “Datatype mismatch in criteria expression”
      So my code can not insert those fields Pay Date, Amount Charged and manual Check.
      All of those are mapped exactly as in master-data-charges. Text, Number, Number

      Without those fields I were able to insert.
      THANKS

    • in reply to: Table fields do not get populated (Access2002) #921035

      Hi
      I edited my post. The error I am getting at line DoCmd.RunSQL mSQL is “Datatype mismatch in criteria expression”
      So my code can not insert those fields Pay Date, Amount Charged and manual Check.
      All of those are mapped exactly as in master-data-charges. Text, Number, Number

      Without those fields I were able to insert.
      THANKS

    • in reply to: Table fields do not get populated (Access2002) #921012

      Edited by HansV to present data in table form – see post 164109

      Hi!

      Here is another problem I am dealing with.
      I am running code
      Private Sub cmd_Search_Click()

      Dim mSQL As String, ListSQL As String, StrRS As String, txtStr As String

      Set dbR = CurrentDb()
      DoCmd.SetWarnings False

      dbR.Execute “Delete from Search_Result”
      mSQL = “INSERT INTO Search_Result” _
      & “([Pay date],[EC Member], [Supervisor], [Last Name],[First Name], [Business Unit],” _
      & “[Cost Center], [Amount Charged], [Manual Check Date])” _
      & “SELECT [master-data-charges].[Pay date],[master-data-charges].[EC Member],” _
      & “[master-data-charges].[Supervisor], [master-data-charges].[Last Name],” _
      & “[master-data-charges].[First Name], [master-data-charges].[Business Unit],” _
      & “[master-data-charges].[Cost Center], [master-data-charges].[Amount Charged],” _
      & “[master-data-charges].[Manual Check Date]” _
      & “FROM [master-data-charges] WHERE” _
      & “[master-data-charges].[Pay date]=([Forms]![frm_Find_User]![txt_Search])” _
      & “or [master-data-charges].[EC Member]=([Forms]![frm_Find_User]![txt_Search])” _
      & “or [master-data-charges].[Supervisor]=([Forms]![frm_Find_User]![txt_Search])” _
      & “or [master-data-charges].[Last Name] = ([Forms]![frm_Find_User]![txt_Search])” _
      & “or [master-data-charges].[First Name]=([Forms]![frm_Find_User]![txt_Search])” _
      & “or [master-data-charges].[Business Unit]=([Forms]![frm_Find_User]![txt_Search])” _
      & “or [master-data-charges].[Cost Center]=([Forms]![frm_Find_User]![txt_Search])” _
      & “or [master-data-charges].[Amount Charged]=([Forms]![frm_Find_User]![txt_Search])” _
      & “or [master-data-charges].[Manual Check Date] = ([Forms]![frm_Find_User]![txt_Search]);”
      DoCmd.RunSQL mSQL

      ‘———————————————————
      Set rsResp = dbR.OpenRecordset(“Search_Result”, dbOpenTable)
      On Error Resume Next
      txtStr = rsResp![Last Name]
      If txtStr = “” Then
      MsgBox “Search Produced No Results! Please, try again!”
      End If
      ‘———————————————————

      List_Result.RowSource = “Select [EC Member], [Supervisor], [Last Name],[First Name], [Business Unit], [Cost Center] from Search_Result”

      End Sub

      When I run this code my table gets populated like this

      Pay date EC Member Supervisor Last Name First Name Bunit Cost Center Amount Charged Manual Check Date
    • in reply to: Table fields do not get populated (Access2002) #921014

      Edited by HansV to present data in table form – see post 164109

      Hi!

      Here is another problem I am dealing with.
      I am running code
      Private Sub cmd_Search_Click()

      Dim mSQL As String, ListSQL As String, StrRS As String, txtStr As String

      Set dbR = CurrentDb()
      DoCmd.SetWarnings False

      dbR.Execute “Delete from Search_Result”
      mSQL = “INSERT INTO Search_Result” _
      & “([Pay date],[EC Member], [Supervisor], [Last Name],[First Name], [Business Unit],” _
      & “[Cost Center], [Amount Charged], [Manual Check Date])” _
      & “SELECT [master-data-charges].[Pay date],[master-data-charges].[EC Member],” _
      & “[master-data-charges].[Supervisor], [master-data-charges].[Last Name],” _
      & “[master-data-charges].[First Name], [master-data-charges].[Business Unit],” _
      & “[master-data-charges].[Cost Center], [master-data-charges].[Amount Charged],” _
      & “[master-data-charges].[Manual Check Date]” _
      & “FROM [master-data-charges] WHERE” _
      & “[master-data-charges].[Pay date]=([Forms]![frm_Find_User]![txt_Search])” _
      & “or [master-data-charges].[EC Member]=([Forms]![frm_Find_User]![txt_Search])” _
      & “or [master-data-charges].[Supervisor]=([Forms]![frm_Find_User]![txt_Search])” _
      & “or [master-data-charges].[Last Name] = ([Forms]![frm_Find_User]![txt_Search])” _
      & “or [master-data-charges].[First Name]=([Forms]![frm_Find_User]![txt_Search])” _
      & “or [master-data-charges].[Business Unit]=([Forms]![frm_Find_User]![txt_Search])” _
      & “or [master-data-charges].[Cost Center]=([Forms]![frm_Find_User]![txt_Search])” _
      & “or [master-data-charges].[Amount Charged]=([Forms]![frm_Find_User]![txt_Search])” _
      & “or [master-data-charges].[Manual Check Date] = ([Forms]![frm_Find_User]![txt_Search]);”
      DoCmd.RunSQL mSQL

      ‘———————————————————
      Set rsResp = dbR.OpenRecordset(“Search_Result”, dbOpenTable)
      On Error Resume Next
      txtStr = rsResp![Last Name]
      If txtStr = “” Then
      MsgBox “Search Produced No Results! Please, try again!”
      End If
      ‘———————————————————

      List_Result.RowSource = “Select [EC Member], [Supervisor], [Last Name],[First Name], [Business Unit], [Cost Center] from Search_Result”

      End Sub

      When I run this code my table gets populated like this

      Pay date EC Member Supervisor Last Name First Name Bunit Cost Center Amount Charged Manual Check Date
    Viewing 15 replies - 451 through 465 (of 480 total)