các bác ơi,đã ai lập trình xuất dữ liệu từ wincc flexible ra excel chưa a?bác nào làm rồi có thể chỉ cho đàn em được không?em xin cảm ơn
Thông báo
Collapse
No announcement yet.
xuất dữ liệu từ wincc flexible ra excel
Collapse
X
-
Mình thấy hình như Flexible không có phần để tự viết code. Toàn hỗ trợ các hàm có sẵn --> Dễ cho người mới học nhưng muốn viết các hiệu ứng hay các hàm đặc biệt thì không đượcĐừng ngồi đó mà mong mọi việc tốt hơn, hãy làm mình tốt hơn
Jim Rohn
Comment
-
Nguyên văn bởi zunkun Xem bài viếtDùng ODBC xuất trực tiếp ra từ logging luôn! nên dùng SQL để dễ quản lý hơn!
Comment
-
Nguyên văn bởi zunkun Xem bài viếtDùng ODBC xuất trực tiếp ra từ logging luôn! nên dùng SQL để dễ quản lý hơn!
Comment
-
Nguyên văn bởi anh3vn Xem bài viếtBác này đi đâu rồi mà sao không thấy trả lời vậy. Có ai quan tâm đến vấn đề này không mình cùng vào đây bàn luận nào
Comment
-
Nguyên văn bởi phap_nguyen Xem bài viếtMình chưa sử dụng WinCC Flexible bao giờ nhưng mih2 đã lưu được dữ liệu của WinCC vào Excel nếu bạn cần thì mình cóthe63 pót lên bạn tham khảo nha!
Comment
-
Nó đây:
Sub OnClick(Byval Item)
Const ForReading = 1, ForWriting = 2, ForAppending = 8
Dim fso, f,str, index
ReturnValue = MsgBox("Are you export to Excel?", vbQuestion + vbYesNo, "Save") ' Thêm vào cho vui
Select Case ReturnValue
Case vbYes
Str = Replace(Now,"/","_")
Set f = fso.OpenTextFile("" & "Report.xls", ForAppending, True)
f.Write Str & vbCrLf
f.Close
Case vbCancel
End Select
End Sub
Comment
-
Nguyên văn bởi phap_nguyen Xem bài viếtNó đây:
Sub OnClick(Byval Item)
Const ForReading = 1, ForWriting = 2, ForAppending = 8
Dim fso, f,str, index
ReturnValue = MsgBox("Are you export to Excel?", vbQuestion + vbYesNo, "Save") ' Thêm vào cho vui
Select Case ReturnValue
Case vbYes
Str = Replace(Now,"/","_")
Set f = fso.OpenTextFile("" & "Report.xls", ForAppending, True)
f.Write Str & vbCrLf
f.Close
Case vbCancel
End Select
End Sub
thank bạn nhiều.
Comment
-
Nguyên văn bởi nghia_bk Xem bài viếtcảm ơn bạn vì bài viết.Nhưng bạn có thể giúp mình cách sử dụng đoạn code này không?Code này bạn đưa vào phần nào?Trong Marco VisualBasic của Excel hay ?
thank bạn nhiều.
Sub OnClick(Byval Item)
Const ForReading = 1, ForWriting = 2, ForAppending = 8
Dim fso, f,str, index
ReturnValue = MsgBox("Are you export to Excel?", vbQuestion + vbYesNo, "Save") ' Thêm vào cho vui
Select Case ReturnValue
Case vbYes
Str = Replace(Now,"/","_")
Set f = fso.OpenTextFile("" & "Report.xls", ForAppending, True) 'tạo và lưu vào file Excel có tên là Report
f.Write Str & vbCrLf
f.Close
Case vbCancel
End Select
End Sub
Comment
-
Nguyên văn bởi phap_nguyen Xem bài viếtBạn thấy sự kiện onclick không? đoạn code này bạn đưa vào nút nhấn (chẳn hạn như bạn tạo nút nhấn có Comment là "Save") thì khi nhấn nút này thì dữ liệu trong biến nó sẽ lưu vào file excel
Sub OnClick(Byval Item)
Const ForReading = 1, ForWriting = 2, ForAppending = 8
Dim fso, f,str, index
ReturnValue = MsgBox("Are you export to Excel?", vbQuestion + vbYesNo, "Save") ' Thêm vào cho vui
Select Case ReturnValue
Case vbYes
Str = Replace(Now,"/","_")
Set f = fso.OpenTextFile("" & "Report.xls", ForAppending, True) 'tạo và lưu vào file Excel có tên là Report
f.Write Str & vbCrLf
f.Close
Case vbCancel
End Select
End Sub
Comment
-
Nguyên văn bởi vanngocpro Xem bài viếtChào bạn, bạn có thể hướng dẫn mình cách xuất file excel trong wincc được k? mình xuất được rồi, nhưng khi mở excel lên thì k xem được trạng thái cập nhật, tắt file excel rồi bật lên mới thấy trạng thái cập nhật, trong thời gian mở file excel thì không cập nhật được dữ lệu nếu hệ thống đang làm việc, bạn giúp bình tháo gỡ rắc rối này nhé, rất vui nếu nhận được sự giúp đỡ của bạn, cảm ơn bạn nhiều!!!!!! thân!
Có một cách (đã test) bạn ghi dữ liệu ra MySQL Hoặc SQL (có thể thông qua ODBC) và tạo 1 file excel theo format của bạn và liên kết tới database, cấu hình cho liên kết này sẽ tự cập nhật theo chu kỳ mong muốn để có thể tự động load data mà không cần phải thoát file excel rồi chạy lại.
trong trường hợp không có kết nối tới database thì nó sẽ là 1 file excel bình thường chứa dữ liệu của lần lưu gần nhất chứ không phải 1 file trắng.
Comment
-
Nguyên văn bởi Libra_Zodi Xem bài viếtBạn có thể dùng ODBC giao tiếp với Excel nhưng cách này cũng không có tác dụng khi bạn mở Excel và muốn nó tự cập nhật.
Có một cách (đã test) bạn ghi dữ liệu ra MySQL Hoặc SQL (có thể thông qua ODBC) và tạo 1 file excel theo format của bạn và liên kết tới database, cấu hình cho liên kết này sẽ tự cập nhật theo chu kỳ mong muốn để có thể tự động load data mà không cần phải thoát file excel rồi chạy lại.
trong trường hợp không có kết nối tới database thì nó sẽ là 1 file excel bình thường chứa dữ liệu của lần lưu gần nhất chứ không phải 1 file trắng.Last edited by vanngocpro; 28-08-2012, 00:49.
Comment
-
Nguyên văn bởi vanngocpro Xem bài viếtcách này hay đấy, để mình thử xem, bạn có thể hướng dẫn cụ thể hơn 1 chút được k? thanks bạn nhiều, mình có ý kiến như thế này, mình sẽ lưu 1 file excel đuôi csv, nhưng k mở file này ra xem, mà mình sẽ dùng 1 file excel khác để truy cập dữ liệu trong file excel đuôi csv đó, như thế có được k bạn, mình đang mù tịt vấn đề này....
Comment
Bài viết mới nhất
Collapse
-
bởi chinhnguyen9Hoạt động của thế hệ mạch cân bằng trước đây dựa trên nguyên lý so áp giữa 2 string liền kề. Hoạt động cân bằng chỉ kích hoạt khi sự chênh lệch vượt ngưỡng 100mV và ngưng hoạt động khi mức chênh lệch giảm xuống còn 30mV. Bản...
-
Channel: Điện tử dành cho người mới bắt đầu
Hôm qua, 05:07 -
-
bởi chinhnguyen9Xem hình minh họa có phần thuyết minh bên trong tiện việc quan sát và đọc thuyết minh. Khi G1 high dòng điện chạy theo các đường màu đen khi G2 high dòng điện chạy theo các đường màu nâu đỏ.
Bổ sung một tính chất củng cố cho tên gọi tụ bay: Trong mạch đề cập chỉ...-
Channel: Điện tử dành cho người mới bắt đầu
26-04-2024, 21:02 -
-
bởi chinhnguyen9Sản phẩm này ghi version 2.0 01-2024 MADE IN CHINA nhưng không thấy thương hiệu hình 1
Do 8 chân G của 8 mosfet được đấu song song thành 2 nhóm nên có cùng biên độ xung kích 12V. Nhưng Q1 và Q2 nằm cuối dãy, chân S cùa chúng có điện áp DC cao đến...-
Channel: Điện tử dành cho người mới bắt đầu
26-04-2024, 20:37 -
-
bởi xuanthiettivi em bị mất remote lỡ vào chế độ usb giờ không chọn lại source được. ai có file nạp cho em xin với ạ. Model 32HD957T2
-
Channel: Điện tử truyền hình
26-04-2024, 10:53 -
-
Trả lời cho Giải thích nôm na từ "tụ bay"bởi chinhnguyen9Đa tạ lời cảm ơn của bạn. Mến!
-
Channel: Hướng dẫn sử dụng diễn đàn
26-04-2024, 05:06 -
-
Trả lời cho Xin tư vấn về mạch cầu H cho inverter 1000wbởi thebinhzChắc là không được đâu bạn ơi
Quán ăn Vĩnh Yên-
Channel: Điện tử công suất
25-04-2024, 21:56 -
-
Trả lời cho Giải thích nôm na từ "tụ bay"bởi thebinhzCảm ơn bạn nhiều nha
Nhà hàng Vĩnh Yên-
Channel: Hướng dẫn sử dụng diễn đàn
25-04-2024, 21:50 -
-
bởi chinhnguyen9Vai viết này đã được chuyển sang chuyên mục phù hợp....
-
Channel: Hướng dẫn sử dụng diễn đàn
25-04-2024, 08:29 -
-
bởi chinhnguyen9
Xem hình có phần thuyết minh bên trong tiện việc quan sát và đọc thuyết minh. Khi G1 high dòng điện chạy theo các đường màu đen khi G2 high dòng điện chạy theo các đường màu nâu đỏ.
Bổ sung một tính chất củng cố cho tên gọi tụ...-
Channel: Hướng dẫn sử dụng diễn đàn
24-04-2024, 01:15 -
-
Trả lời cho CODE/ROM-dvb-vcd-dvd-mindikaraoke- Máy nạp Rombởi ThaPhong20Mình cần giúp đõ đầu California MIDI-800K
Ngày trc có nghe tin đồn đầu này có thể chạy đĩa DH-3600 nên mua Vol 26 về chạy thử và nó báo góc trái dòng code rồi tự thay nền DH-3600S luôn. Sau khi tự thay nền thì nó tiếp tục báo dòng Code...-
Channel: Thiết bị thu phát MEDIA dân dụng
23-04-2024, 19:24 -
Comment