Các pác cho em hỏi vấn đề này! trong graphics của wincc vào "Tools" > "Macros" > "Visual Basic Editor". khi em lập trình chương trình bằng ngon ngữ VB trong phần đó thì không biết làm như thế nào để chạy (Runtime) được đoạn code trong đó cả. Các bác giúp em với hic!
Thông báo
Collapse
No announcement yet.
Runtime macros trong graphics
Collapse
X
-
Nguyên văn bởi phap_nguyen Xem bài viếtCác pác cho em hỏi vấn đề này! trong graphics của wincc vào "Tools" > "Macros" > "Visual Basic Editor". khi em lập trình chương trình bằng ngon ngữ VB trong phần đó thì không biết làm như thế nào để chạy (Runtime) được đoạn code trong đó cả. Các bác giúp em với hic!
Nó chỉ là cách để tự động vẽ lên các đối tượng hoặc thiết lập các thiết đặt khi configure thôi.
Giống như các Script File.
Bạn phải phân biết giữa VBS và VBA
-
Nguyên văn bởi Make_nosense Xem bài viếtđoạn code viết trong phần macro đó không thể chạy khi runtime, chỉ chạy khi configure.
Nó chỉ là cách để tự động vẽ lên các đối tượng hoặc thiết lập các thiết đặt khi configure thôi.
Giống như các Script File.
Bạn phải phân biết giữa VBS và VBA
thank!
Comment
-
Nguyên văn bởi phap_nguyen Xem bài viếtCảm ơn bạn! Pác cho em hỏi vấn đề này được nhé: Em muốn tạo liến kết giửa các tag của WinCC và Access ví dụ như là lưu dử liệu của các Tag vào Access hoặc là lấy giá trị trong các ô của file Access gán vào cho tag. Em dùng ADO của VB để tạo liên kết nhưng mà không cách nào làm được. Làm sao để liên kết giữa chúng với nhau vậy Pác giúp em với!
thank!
Comment
-
Nguyên văn bởi hac_am2003 Xem bài viếtcó nhiều cách, có thể ADO , có thẻ dùng chính cac đoạn code VBS để write/read giá trị của các ô từ Access hoặc Excel tới các Tag. Đọc help của wincc, có ví dụ cho nó đó.
'VBS108
Dim objConnection
Dim strConnectionString
Dim lngValue
Dim strSQL
Dim objCommand
strConnectionString = "Provider=MSDASQL;DSN=SampleDSN;UIDPWD"
lngValue = HMIRuntime.Tags("Tag1").Read
strSQL = "INSERT INTO WINCC_DATA (TagValue) VALUES (" & lngValue & ");"
Set objConnection = CreateObject("ADODB.Connection")
objConnection.ConnectionString = strConnectionString
objConnection.Open
Set objCommand = CreateObject("ADODB.Command")
With objCommand
.ActiveConnection = objConnection
.CommandText = strSQL
End With
objCommand.Execute
Set objCommand = Nothing
objConnection.Close
Set objConnection = Nothing
Mình đã tét thử và nó báo lổi không kết nối được cơ sở dử liệi, Các bác co thể giải thích cụ thể cho em dòng lệnh này được không ah!
DSN=SampleDSN
Comment
Bài viết mới nhất
Collapse
-
Trả lời cho Mua anten ở đâu?bởi tmcodonAnten bạn thu nguồn sóng nào vậy? Nếu xem truyền hình thì giờ k làm đc anten nữa rồi
-
Channel: Ăng ten và truyền sóng
Hôm qua, 15:34 -
-
Trả lời cho Mạch nguồn đôi dùng 7812 và 7912bởi tmcodonThank bác nhá. Tìm mãi mới thấy. Giờ vọc đã xem sao...
-
Channel: Hỗ trợ học tập
Hôm qua, 10:39 -
-
bởi tungdqEm cần tìm sơ đồ mạch một số Main máy tính đời cao như Asrock B560M-HDV, các cao nhân chỉ giúp với. Thank!
-
Channel: Các mạch điện ứng dụng
15-11-2024, 08:27 -
-
Trả lời cho Kiểm tra biến ápbởi lamvu0677nhân tiện cho mình hỏi thêm về cái phần test hipot (cao áp),là để kiểm tra độ bền cách điện giưa các cuộn dây,mà thấy thông số test thường ở mức 4kvac,vậy nếu mấy con fail đó xài bình thường vẫn dduocj phải không ạ,vì điện mình làm gì lên tới mức đó
-
Channel: Điện tử dành cho người mới bắt đầu
10-11-2024, 08:52 -
-
Trả lời cho Kiểm tra biến ápbởi lamvu0677máy đo số vòng thì cty có ,mà nó to quá,tưởng có máy nào gọn gọn bỏ túi được thì tiện hơn,vì đi lại nhiều...
-
Channel: Điện tử dành cho người mới bắt đầu
10-11-2024, 08:47 -
-
bởi tmcodonMình thấy diễn đàn có chuyên mục quảng cáo rồi mà. Bạn đóng góp để mở luồng riêng
-
Channel: Hướng dẫn sử dụng diễn đàn
09-11-2024, 13:36 -
-
bởi Nicole08Xin chào mọi người, tôi đã sử dụng Flashforge Inventor 2 được gần 5 năm và rất hài lòng với nó, nhưng tuần trước đã xảy ra sự cố. Có vẻ như động cơ bước đưa sợi in vào đầu nóng đã bị hỏng. Mọi thứ khác có vẻ ổn trên máy...
-
Channel: Điện tử dành cho người mới bắt đầu
09-11-2024, 12:55 -
Comment