Kamis, 04 Mei 2017

[MS_AccessPros] One computer error

 

I have Access 2016.  I have a Front end running on 4 computers with a BE on one server.

On one of my main forms on the FE I have a button that had the following code (this is part of the code).

 

Private Sub Command30_Click()

 

            DoCmd.RunCommand acCmdSaveRecord

           

    Select Case Me.ComTypID

        Case 8

             DoCmd.OpenForm "f_HealthRatesInput", WhereCondition:="ComCusID = " & Me.ComCusID

        Case 9

             DoCmd.OpenForm "f_LifeRatesInput", WhereCondition:="ComCusID = " & Me.ComCusID

        Case 10

             DoCmd.OpenForm "f_STDRateInput", WhereCondition:="ComCusID = " & Me.ComCusID

        Case 11

             DoCmd.OpenForm "f_LTDRateInput", WhereCondition:="ComCusID = " & Me.ComCusID

        Case 12

             DoCmd.OpenForm "f_DentalRatesInput", WhereCondition:="ComCusID = " & Me.ComCusID

 

Case Else

            MsgBox "Invalid Group Insurance Line"

   End Select

End Sub

 

 

 

This works perfect on every computer except one.  On one computer all of the options work except for

 

Case 12

             DoCmd.OpenForm "f_DentalRatesInput", WhereCondition:="ComCusID = " & Me.ComCusID

 

 

Any idea as to why this would work on all the computers except one?

 

Thanks for your help.

 

 

Bill Singer

Minnesota

 

 

__._,_.___

Posted by: "Bill Singer" <Bill.Singer@at-group.net>
Reply via web post Reply to sender Reply to group Start a New Topic Messages in this topic (1)

Have you tried the highest rated email app?
With 4.5 stars in iTunes, the Yahoo Mail app is the highest rated email app on the market. What are you waiting for? Now you can access all your inboxes (Gmail, Outlook, AOL and more) in one place. Never delete an email again with 1000GB of free cloud storage.


.

__,_._,___

Tidak ada komentar:

Posting Komentar