Search results

I did that also, but now it gives me the MsgBox and that shouldn't happen.

Compile Error: End If without If Block If (Me.CompCode = "KM") And ((CurrentUser() <> "cmoratz") Or (CurrentUser() <> "bhoward") Or (CurrentUser() <> "kwilliams") Or (CurrentUser() <> "bwilliams")) Then _ MsgBox "You are not authorized to enter this claim. Please take it to MCRATS."...

Thanks MSAccessRookie, I will try it. KenHiggs, I would like to learn your way as well. Since I have several of these per form.

Thanks KenHigg, but I am not sure how to do that.

I have tried several ways of doing this and can not get it to work. Here is the If statement: If (Me.ComponentCode = "KM") And (CurrentUser() <> "user1") Or (CurrentUser() <> "user2") Or (CurrentUser() <> "user3") Or (CurrentUser() <> "user4") Then _ MsgBox "You are not authorized to enter this...

LPurvis - Thank you, I really appreciate the code....

How do you call the UserGroups like you call the CurrentUser() in VBA?

missinglinq - Thanks for your reply. I understand what you are saying.

One Form or Two seperate ones I have 2 groups that access a form that looks the same in general. But one group enters more information than the other. I currently have two seperate forms. Would it be good practice to have it all on one form and have the fields/textboxes invisible to one group...

boblarson - thanks.... I appreciate it.

I know this is stupid, but I am losing my mind on it. I want to set the Default value of a combo box using VBA. I have set the values to be listed in combo box with VBA and I am not sure if that is what is causing the problem. This is what I have: Me.Order_Type.DefaultValue = "PRC" Thanks in...

Fixed the problem, but still have a type mismatch.....

boblarson, thanks, I have major issue in my eyes. the Catcode on the form is 2 colums and I need it to display the second column. on the for that is what it displaying, but not pulling it that way. I really appreciate your time on this. Craig

I have a violation error for type coversion failure. The only field I see could be an issue is: Reason in the table it is a memo field. here are the variables from the table: ClaimNo = long int DN_Date = Date DNclerk = text Catcode = text DN_Reason = memo there are 2 other fields but the...

boblarson - Thank you so much for the help.

I am trying to do this in VBA, but have been unsuccessful. I don't i may even be doing it wrong. I have search all over the site for an exampl of what I am tryin gto do. When a user hits btnSave VBA decides whether to run an insert or update sql. Right now the code stops at the DoCmd.RunSQL...

namliam - Thank you so much for clearing that up for me. I will put that in my notes.

georgedwilkinson - Thank you so much. '" & aStatus & "' setup gets me everytime, just don't understand how that works or why it has to be there. other times it is " & aStatus. just confusing to me.

I have a table that needs to be updated after it is imported. It keeps asking me for a perameter. Here is what I have. Dim uSDN As String Dim aStatus As String aStatus = "A" uSDN = "UPDATE tblSDN Set tblSDN.Status = aStatus WHERE tblSDN.Status Is Null" DoCmd.RunSQL uSDN I went as far as...

DCrake - Like I said i am new to this and was just asking, not trying to point out a mistake. Thanks for your help.