User Tag List

Trang 1/2 12 cuốicuối
kết quả từ 1 tới 10 trên 17
Cây cảm ơn5Cảm ơn

Ðề tài: xuất dữ liệu từ wincc flexible ra excel

  
  1. #1
    Thành viên chính thức nghia_bk's Avatar
    Tham gia
    Jul 2008
    Bài viết
    65
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    xuất dữ liệu từ wincc flexible ra excel

    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

    CHỦ ĐỀ TƯƠNG TỰ:


  2. #2
    Thành viên tích cực zunkun's Avatar
    Tham gia
    Apr 2008
    Bài viết
    103
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Dùng ODBC xuất trực tiếp ra từ logging luôn! nên dùng SQL để dễ quản lý hơn!

    nghia_bk đã cảm ơn nội dung này.

  3. #3
    Thành viên chính thức Nobuhiro's Avatar
    Tham gia
    Aug 2007
    Bài viết
    36
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    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


  4. #4
    Thành viên chính thức nghia_bk's Avatar
    Tham gia
    Jul 2008
    Bài viết
    65
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Click here to enlarge Nguyên văn bởi zunkun Click here to enlarge
    Dùng ODBC xuất trực tiếp ra từ logging luôn! nên dùng SQL để dễ quản lý hơn!
    phiền bác có thể up lên 1 file hướng dẫn em cụ thể được không?em cảm ơn nhiều


  5. #5
    Thành viên mới anh3vn's Avatar
    Tham gia
    Oct 2009
    Bài viết
    10
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Click here to enlarge Nguyên văn bởi zunkun Click here to enlarge
    Dùng ODBC xuất trực tiếp ra từ logging luôn! nên dùng SQL để dễ quản lý hơn!
    Bá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 Click here to enlargeClick here to enlargeClick here to enlarge

    nghia_bk đã cảm ơn nội dung này.

  6. #6
    Thành viên chính thức nghia_bk's Avatar
    Tham gia
    Jul 2008
    Bài viết
    65
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Click here to enlarge Nguyên văn bởi anh3vn Click here to enlarge
    Bá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 Click here to enlargeClick here to enlargeClick here to enlarge
    Hix, t chưa biết gì cả nên không dám nói là bàn luận.Cao thủ nào làm rồi xin chỉ bảo anh em với.


  7. #7
    Thành viên chính thức phap_nguyen's Avatar
    Tham gia
    Apr 2009
    Bài viết
    47
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Mì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!

    nghia_bk đã cảm ơn nội dung này.

  8. #8
    Thành viên chính thức nghia_bk's Avatar
    Tham gia
    Jul 2008
    Bài viết
    65
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Click here to enlarge Nguyên văn bởi phap_nguyen Click here to enlarge
    Mì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!
    up...up. thanks bạn nhiều.


  9. #9
    Thành viên chính thức phap_nguyen's Avatar
    Tham gia
    Apr 2009
    Bài viết
    47
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    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

    nghia_bk đã cảm ơn nội dung này.

  10. #10
    Thành viên chính thức nghia_bk's Avatar
    Tham gia
    Jul 2008
    Bài viết
    65
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Click here to enlarge Nguyên văn bởi phap_nguyen Click here to enlarge
    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
    cả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 ?Click here to enlarge
    thank bạn nhiều.


Trang 1/2 12 cuốicuối

Quyền Sử Dụng Ở Diễn Ðàn

  • Bạn không được gửi luồng mới
  • Bạn không được trả lời bài viết
  • Bạn không được gửi file đính kèm
  • Bạn không được sửa bài viết của mình
  •