wenluderen
人人為我我為人人
級別: 略有小成
|
OPC的速度似乎非常慢,而且收費。以前用Labview自帶的OPC訪問歐姆龍的CP1H 就是很慢。大致200MS 甚至是1000MS 至于OPC UA 不清楚,沒有用過 后續我研究下 |
---|---|
|
wenluderen
人人為我我為人人
級別: 略有小成
|
使用三菱官方給出的解決方案 ,這樣可以讓最后的結果是最好的。 另外一個網口(CPU內置的那個)可以同時做MODUBS 和 CC-LINK IE 這兩種模式通訊嗎? |
---|---|
|
焦劉吉
緊跟時代發展,努力做好時代青年
級別: 工控俠客
|
就應該弄一個安裝包版的控件,這個軟件對系統挑剔的很 |
|
---|---|---|
|
wenluderen
人人為我我為人人
級別: 略有小成
|
關于函數: lReturnValue = AxActUtlType1.Connect() lReturnValue = AxActUtlType1.Open() **** 這里是具體的對CPU內部的內存地址操作,讀寫之類的 **** AxActUtlType1.Close() AxActUtlType1.Disconnect() *************** 關于三菱給出的范例 [ 此帖被wenluderen在2018-07-12 14:10重新編輯 ] |
---|---|
|
wenluderen
人人為我我為人人
級別: 略有小成
|
復寫的代碼 TestPLC.zip (162 K) 下载次数:210 |
---|---|
|
wenluderen
人人為我我為人人
級別: 略有小成
|
Dim iReturnCode As Integer 'Return code Dim szDeviceName As String = "" 'List data for 'DeviceName' Dim iNumberOfDeviceName As Integer = 0 'Data for 'DeviceSize' Dim sharrDeviceValue() As Short 'Data for 'DeviceValue' '軟元件名 szDeviceName = String.Join(vbLf, txt_DeviceNameRandom.Lines) '寫入點數 If GetIntValue(txt_DeviceSizeRandom, iNumberOfDeviceName) = False Then 'If failed, this process is end. Exit Sub End If '寫入的軟元件值 ReDim sharrDeviceValue(iNumberOfDeviceName - 1) If GetShortArray(txt_DeviceDataRandom, sharrDeviceValue) = False Then 'If failed, this process is end. Exit Sub End If '軟元件的隨機寫入 iReturnCode = AxActUtlType1.WriteDeviceRandom2(szDeviceName, iNumberOfDeviceName, sharrDeviceValue(0)) |
---|---|
|