目前国内使用WTOPCsvr.dll的大有人在,使用WTOPCSvr.dll开发OPC服务器是非常方便的,而且其源码也是非常优秀的,唯一遗憾的是这个开发包毕竟是老美开发的,他们最初的时候估计也不知道在中国的使用者会有这么多,竟然不支持汉字。解决办法就是修改代码了,让它支持UNICODE就可以了。需要的朋友可以加我的 QQ:760807322
另外VB环境里开发OPC服务器的时候,StringToByte的函数修改成如下:
Sub StringToByte(strString As String, ByteArray() As Byte)
‘将字符串转换成字节数组,汉字占2字节
Dim i As Integer
Dim j As Integer
Dim A As Long
On Error Resume Next
For i = 0 To Len(strString) - 1
A = Asc(Mid$(strString, i + 1, 1))
If A < 0 Then
ByteArray(i + j) = Int((65536 + A) / 256)
j = j + 1
ByteArray(i + j) = Int((65536 + A) Mod 256)
Else
ByteArray(i + j) = A
End If
Next
ByteArray(i + j) = 0
End Sub