SetBinaryValue
Previous  Next

Sets the value of the specified key value.
Syntax: SetBinaryValue (SubKey As String, ValueName As String, Value As Byte() )
If the ValueName does not exist a new value will be created.

Example:
'Add a Registry object named reg.
Sub Globals
      dim binary(3) As Byte
End Sub

Sub App_Start
      reg.New1
      reg.RootKey(reg.rtCurrentUser)
      binary(0) = 100
      binary(1) = 254
      binary(2) = 12
      reg.SetBinaryValue("Software\My Application","Binary Value", binary())
End Sub