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 bpsvietnamNguyên lý hoạt động ngưng tụ lạnh của máy hút ẩm
Không khí ẩm sẽ được hút vào trong máy thông qua cửa hút gió, không khí vào trong tiếp tục đi qua giàn lạnh. Tại hệ thống làm lạnh, không khí ẩm sẽ ngưng tụ tạo thành nước. Nước...-
Channel: Điện tử dành cho người mới bắt đầu
hôm nay, 15:18 -
-
Trả lời cho Xin hỏi về màn hình laptopbởi yname11vg, cám ơn bác...........
-
Channel: Thiết bị điện tử cá nhân
hôm nay, 14:37 -
-
bởi khoine9899
Em chào các anh và mọi người.
Hiện em đang có 1 con bơm màng trong thiết bị y tế đang gặp tình trạng yếu dần hoặc ngừng hoạt động sau thời gian sử dụng
Sau khi tìm hiểu về thông tin của bơm trên mạng thì em được biết...-
Channel: Điện tử dành cho người mới bắt đầu
hôm nay, 11:22 -
-
Trả lời cho Cần mọi người giúp mạch tạo sóng siêu âm máy rửabởi bqviet
-
Channel: Điện tử công suất
Hôm qua, 20:26 -
-
bởi Minhdai95Em chào mọi người, e đang sửa mạch tạo sóng siêu âm cho máy rửa mà chưa có tài liệu để tham khảo sửa, mọi người cho e xin tài liệu ạ...
-
Channel: Điện tử công suất
Hôm qua, 11:37 -
-
bởi pia2k1Cùng câu hỏi và cần được giải đáp thêm ạ...
-
Channel: Hướng dẫn sử dụng diễn đàn
Hôm qua, 11:28 -
-
Trả lời cho Công thức điện tửbởi mèomướpDạ thời thế giờ thay đổi theo hướng tích cực hơn rồi chú trung sĩ ạ. Kiến thức được chia sẻ ngày càng nhìu nên làm ăn gian dối ko còn dễ dàng như trước đâu ạ. Những thợ nhỏ rồi sẽ thành công nhân sản xuất đồ mới hết thay vì sửa chữa lặt vặt...
-
Channel: Tâm tình dân kỹ thuật
26-11-2024, 21:21 -
-
Trả lời cho Xin hỏi về màn hình laptopbởi mèomướpDạ cùng chuẩn tín hiệu thì chắc chắn là nhận ạ. Vì bản chất oled hay lcd thì đều phải có mạch chuyển đổi trên thanh gỗ rồi chuyển sang những chip xử lý hàng nghìn chân gắn trên những tab mỏng dính rồi mới ra các điểm ảnh theo hàng...
-
Channel: Thiết bị điện tử cá nhân
26-11-2024, 20:31 -
-
Trả lời cho Xin hỏi về màn hình laptopbởi yname11Ok , thanks bác đã chỉ...
-
Channel: Thiết bị điện tử cá nhân
26-11-2024, 15:06 -
-
bởi nguyendinhvanSau bao năm nghiên cứu cái dtvn. Tôi phát hiện công thức này. Các anh em xem đúng bao nhiêu phần trăm nhé !
Chập thì thay. Cháy thì tháo
Làm thì láo. Báo thì hay
May thì khoe. Rủi thì bỏ
Thành tích nhỏ. Báo thành to
Làm cho có. Báo chi li
Sai cả li. Báo...-
Channel: Tâm tình dân kỹ thuật
26-11-2024, 00:35 -
Comment