Search the Community
Showing results for tags 'vb'.
Found 1 result
-
All, I need to write to a timer preset and am getting an 'object' error using the .net driver. I'm sort of between a rock and a hard place... THanks in advance. Below is the 'function' that attempts to write - Public Function Write_TimerPreset(ByVal tmrIndex As Int16, ByVal TmrValue As integer) As Boolean Dim values As Object() = New Object(2) {} Try values(0) = DirectCast(TmrValue, Object) Catch System.Windows.Forms. MessageBox.Show("One of more of the values are not valid") Return False Exit Function End Try Dim wo As WriteOperands = New WriteOperands() With wo .NumberOfOperands = 1 .OperandType = OperandTypes.TimerPreset .StartAddress = tmrIndex .Values = values .TimerValueFormat = TimerValueFormat.SecondsFormat End With Dim rw(0) As ReadWriteRequest rw(0) = wo Try plc.ReadWrite(rw) Catch Dim ErrorMessage As String = "Could not communicate with the PLC" & vbCrLf & "Error # " & Str(Err.Number) & " was generated by " _ & Err.Source & vbCrLf & Err.Description 'Display the message as a critical message. MsgBox(ErrorMessage, MsgBoxStyle.Critical, "PLC Connection Error") CaptureErr(EquipmentPK, "Unitronics Class", "Write_TimerPreset", Str(Err.Number), Err.Source, Err.Description, Now(), EmployeePK, 0) Return False End Try Return True End Function
