支持汉字的OPC服务器开发包
时间：2013-08-06 阅读：1013
| 支持汉字的OPC服务器开发包 |
| WTOPCSvr.dll 目前国内使用WTOPCsvr.dll的大有人在，使用WTOPCSvr.dll开发OPC服务器是非常方便的，而且其源码也是非常的，*遗憾的是这个开发包毕竟是老美开发的，他们zui初的时候估计也不知道在中国的使用者会有这么多，竟然不支持汉字。解决办法就是修改代码了，让它支持UNICODE就可以了。 另外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 |