Acronis protects the complete Microsoft technology stack: Windows Server, Windows PC, laptop and Surface data; Microsoft business applications; Microsoft Hyper-V; Azure VMs; Microsoft Windows Server 2016; Microsoft Exchange 2016 and SQL Server 2016.
Private Sub Form_Current() Dim frm As Form frm = forms.Form.sub1 If gUser = "User" And Me.RecordLock = -1 Then With frm .AllowAdditions = True .AllowDeletions = False .AllowEdits = False End With Else With frm .AllowAdditions = True .AllowDeletions = True .AllowEdits = True End With End If gInvID = Nz(Me.IDInvoice.Value) End Sub
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
|GA Ribbon creator||9||60|
|Intermittent OleDbConnection Error||20||52|
|Access 2013 - User getting error when exporting preview reports from their machines.||18||51|
|Access 2003, percentage between two fields||18||15|
Join the community of 500,000 technology professionals and ask your questions.