Hi,
I'm wondering if the is a unique serial number for any hardware that can be used in order to condition the use of a BD.
I'm presently using the following code:
Dim HDVolume As String
HDVolume = VolumeSerialNumber("C:\") 'Shows the serial number of your Hard Disk
If HDVolume = "xxxx-xxxx" Then
With Me.ctlSbfPBV3.Form
.BarColor = vbBlue
.Max = 200
End With
Else
DoCmd.Quit
End If
Last week I came across two pc's with the same HD Serial Number??? I would like to be able to tighten up the exclusive use of our DB.
Another question: Is there any way to delete a form or report using the deleteobject function even thou the BD is MDE?
Thanks in advance.
I'm wondering if the is a unique serial number for any hardware that can be used in order to condition the use of a BD.
I'm presently using the following code:
Dim HDVolume As String
HDVolume = VolumeSerialNumber("C:\") 'Shows the serial number of your Hard Disk
If HDVolume = "xxxx-xxxx" Then
With Me.ctlSbfPBV3.Form
.BarColor = vbBlue
.Max = 200
End With
Else
DoCmd.Quit
End If
Last week I came across two pc's with the same HD Serial Number??? I would like to be able to tighten up the exclusive use of our DB.
Another question: Is there any way to delete a form or report using the deleteobject function even thou the BD is MDE?
Thanks in advance.