Loading...

Create SCADA with COPCDLL on Visual Basic 6

2,435 views

Loading...

Loading...

Rating is available when the video has been rented.
This feature is not available right now. Please try again later.
Published on Jan 27, 2014

การใช้งาน COPC DLL บน VB6 เพื่อสร้าง SCADA ข้อดีคืดสามารถกำหนดขนาด tag ได้เอง ใช้Resourceในระบบน้อยกว่า


โค้ดตัวอย่าง

Public WithEvents copc1 As copcClass

Private Sub Form_Load()
Set copc1 = New copcClass

copc1.tagAmount = 2
copc1.svrName = "KEPware.KEPServerEx.V4"
copc1.UpdateRate = 100
copc1.setItm 0, "Channel_0_User_Defined.Random.Random1"
copc1.setItm 1, "Channel_0_User_Defined.Random.Random2"
copc1.connectng
End Sub

Private Sub Form_Unload(Cancel As Integer)
copc1.disconnec
End Sub

Private Sub Timer1_Timer()
Label1.Caption = copc1.tgVal(0)
Label2.Caption = copc1.tgVal(1)
End Sub

หมายเหตุ
- ถ้าต้องการเขียนค่ากลับไปให้ OPC tag ที่เป็นแบบ Read/Write (คือสามารถทั้งอ่านและเขียน) ให้ใช้คำสั่ง opcWrt(ลำดับIndex, ค่าที่ต้องการเขียนเข้าไป) เช่น

opcWrt 0, 12.3

จะเป็นการส่งค่า 12.3 ให้ OPC tag ที่Index=0

opcWrt 1, "Sawasdee"

จะเป็นการส่งคำว่า "Sawasdee" ให้ OPC tag ที่มี Index=1

Loading...

Advertisement
When autoplay is enabled, a suggested video will automatically play next.

Up next


to add this to Watch Later

Add to

Loading playlists...