HRESULT Write(

[in] DWORD dwCount,

[in, size_is(dwCount)] OPCHANDLE * phServer,

[in, size_is(dwCount)] VARIANT * pItemValues,

[out, size_is(,dwCount)] HRESULT ** ppErrors

);

Writes values to one or more items in a group. The function runs to completion. The values are written to the DEVICE. That is, the function should not return until it verifies that the device has actually accepted (or rejected) the data.

Here is a code fragment from the VB sample provided with PC Access, I have added some comments:

Private Sub cmdWriteSync_Click()
On Error GoTo ErrorHandler
Dim i As Long
Dim Values(2) As Variant
Dim Errors() As Long ' Array for returned Item related errors

' Initialize the [IN] parameters for the SyncWrite call
' Values -> Values to write
Values(1) = txtWriteVal1.Text ' Read Value 1 from Text Box
Values(2) = txtWriteVal2.Text ' Read Value 2 from Text Box


' ItemServerHandles -> Server defined handles from the AddItems call
' At the timeyou added the items to the group, you had access to the handles for each tag
' MyItemServerHandles is an array ofintegers, create your array and populate it with the handle(s)
'for the tags you want to write. If you wantto write only one tag, create an array
' of length one and specify one item in your call. If two tags, array length of 2 and so on



' Write Values Syncronous
Call MyGroup.SyncWrite(2, MyItemServerHandles, Values, Errors)

' Check Item Errors
For i = 1 To 2
If Not Errors(i) = 0 Then MsgBox "Item " + Str$(i) + " FAILED. Error Code = " + Str$(Errors(i)), vbCritical
Next

Exit Sub