[dis] Câu lạc bộ Visual Foxpro Hấp dẫn nhất từ trước đến nay !!!!!!

[tayngangvfp]

Trong Visua FOX7, tôi muốn thiết lập một thủ tục sử dụng lệnh Pkzip để thực hiện các công việc :
+Nén một thư mục nguồn là "Path+[TEN_TMUC]" đến một file đích có địa chỉ tùy chọn nhập vào từ bàn phím ( hoặc lựa chọn từ cửa sổ Browse).
+Giải nén một file *.zip tại địa chỉ nhập vào từ bàn phím ( hoặc lựa chọn từ cửa sổ Browse) đến một thư mục cố định là: "Path+[TEN_TMUC]"( Giống thư mục nguồn đã nén).
Khi nén và giải nén dữ liệu đều phải giữ nguyên cấu trúc các thư mục con, nếu có bổ sung các cấp độ nén thì tuyệt .
Rất cần thiết, mọi người giúp tôi với nhé, cảm ơn nhiều !

Nếu bạn muốn tạo c/t backup dữ liệu = cách nén thì có thể tham khảo các link sau.

http://www.sweetpotatosoftware.com/S...3f4cfc8b3.aspx

http://www.sweetpotatosoftware.com/S...10480a962.aspx


=============

To dinhanhency
Bạn nói rõ 1 chút, mình chưa hiểu ý bạn ?


Chúc thành công

[tungvv]

Tôi đã xem 2 link mà bạn giới thiệu, tôi kém tiếng anh lắm nhưng cũng hiểu sơ sơ cách thực hiện các thủ tục để nén và giải nén dữ liệu, tuy nhiên nó chỉ hướng dẫn một cách rời rạc và phức tạp quá, mà tôi thì ko giỏi lắm về lập trình fox, có cách nào giúp tôi rỏ hơn một chút nữa ko? Tôi thấy người ta hay sử dụng Pkzip để thực hiện công việc này, tuy nhiên chế độ dòng lệnh của pkzip tôi search mãi trên net mà ko thấy hướng dẫn đâu cả . giúp tôi với nhé, thanks.

[=========> Bổ sung bài viết <=========]

To dinhanhency: Vì bạn ấy bảo đã dịch thành *.exe rồi thì chỉ dùng phần mềm khác để can thiệp chứ sao nữa, còn nếu đã có file nguồn Project thì sư xdụng nagy bản thân fox mà làm, đã có bạn ChungITT hướng dẫn rồi.

[tayngangvfp]

Tôi đã xem 2 link mà bạn giới thiệu, tôi kém tiếng anh lắm nhưng cũng hiểu sơ sơ cách thực hiện các thủ tục để nén và giải nén dữ liệu, tuy nhiên nó chỉ hướng dẫn một cách rời rạc và phức tạp quá, mà tôi thì ko giỏi lắm về lập trình fox, có cách nào giúp tôi rỏ hơn một chút nữa ko? Tôi thấy người ta hay sử dụng Pkzip để thực hiện công việc này, tuy nhiên chế độ dòng lệnh của pkzip tôi search mãi trên net mà ko thấy hướng dẫn đâu cả . giúp tôi với nhé, thanks.

C/t mình viết để bakup hơi dài (vì có form) để có thể đưa code lên đây. Bạn liên hệ nick tayngangvfp mình sẽ gửi để bạn tham khảo.

Chúc thành công

[Tosiro]

Chào các bạn. Mình có 1 Project và muốn xuất ra file exe để chạy đọc lập với VFP.
Nhưng khi build ra rồi, kick vào file exe vừa build ra thì ko thấy j cả. Vào Task Manager/processes thì vẫn thấy file exe đó đang chạy.
Các bạn giúp mình với

[tungvv]

Thông thường 1 Project hoàn chỉnh sẽ bao gồm đầy đủ các thành phần : Progs, Form, repor, Menu...v.v. Nếu bạn chỉ build độc lập một file chương trình *.prg nào đó thôi thì để khỏi phải liên quan đến các liên kết các, bạn copy 1 file *.FXP của nó ra một thư mục khác và add nó vào mục Program của Project và build, nếu có báo lổi vì không tìm thấy các liên kết khác thì bỏ qua tất cả. Khi đã có file *.exe rồi, bạn trả nó về địa chỉ củ để thi hành, tất nhiên phải có kèm theo các file vfp*r.dll ; VFP*RENU.DLL nằm trên cùng một thư mục với file *.exe của bạn thì nó mới chạy được. ( dấu *) là chỉ phiên bản của Foxpro)
------------------------------------------------------
Bạn nào có code kết xuất từ dbf sang xls(có định dạng xls theo mẫu báo cáo) thì giúp tôi với, hoặc hướng dẫn cho tôi cách tạo thủ tục này với !, tôi đang rất cần, mong được giúp đỡ .

[tayngangvfp]

...
Bạn nào có code kết xuất từ dbf sang xls(có định dạng xls theo mẫu báo cáo) thì giúp tôi với, hoặc hướng dẫn cho tôi cách tạo thủ tục này với !, tôi đang rất cần, mong được giúp đỡ .

Hiện nay vấn đề kết xuất dbf -> excel được khá nhiều bạn quan tâm. Vì có thể là để kết hợp được c/t HTKKT.

Tôi có làm 1 ví dụ về vấn đề này. Các bạn có thể tại về tại:

http://www.megaupload.com/?d=SPWKJ7TK

Chúc thành công

[tungvv]

Thanks bạn đã giúp tôi 1 việc mà lâu nay tôi đang bí.
Dựa vào form dbf2xsl của bạn, tôi đã tạo lập được 2 Func[ Ban_ra() & Mua_vao()] để kết xuất dữ liệu ra hệ thống HTKK Thuế 1.3.1 của TCT, 2 Func này được lưu vào thư viện thủ tục là *.prg được khai báo lúc khởi động chương trình. hai Func trên được gọi với cú pháp : Mua_vao(cTen_bcao, cTen_table) hoặc Ban_ra(...)
Kết hợp với 1 số biến trong chương trình, tôi đã hoàn thành và kết xuất ra đúng theo mẫu của bạn.
Tuy nhiên, tôi chưa xuất được font TCVN sang Font Unicode. Trong Form của bạn có chuyển từ VNI sang Uni nhưng tôi ko dùng form nên ko thực hiện được, mặt khác file nguồn dbf của tôi sử dụng font TCVN(.VnTime...v.v)nên ko biết fải dùng lệnh như thế nào.
Tôi có gửi cho bạn kèm theo 2 Func ở đây : http://www.quangbinh-izs.gov.vn/tung/HTKK_Thue.zip
Bạn xem lại và làm ơn giúp tôi thêm cái thủ tục Dịch các trường có font TCVN sang UNICODE với nhé. Hoặc hướng dẫn cho tôi làm cũng được.
Tôi nghỉ là có thể bổ sung thêm một hàm thủ tục Doi_font() nửa nhưng ko biết phải viết hàm đó như thế nào .
Bạn đã giúp thì giúp cho trọn luôn nhé, Cảm ơn trước !.
Chúc vui vẽ và gặp nhiều điều may mắn.

[tayngangvfp]

.... thêm cái thủ tục Dịch các trường có font TCVN sang UNICODE với nhé. Hoặc hướng dẫn cho tôi làm cũng được.
Tôi nghỉ là có thể bổ sung thêm một hàm thủ tục Doi_font() nửa nhưng ko biết phải viết hàm đó như thế nào .
Bạn đã giúp thì giúp cho trọn luôn nhé, Cảm ơn trước !.
Chúc vui vẽ và gặp nhiều điều may mắn.

Vấn đề chuyển đổi giữa các loại Font = VFP cũng đã được bàn luận ở trong các chủ để trước đây. Việc dùng VFP để chuyển thì tốc độ không được nhanh như các PM chuyển đổi phổ biến. Tuy nhiên có còn hơn không, và quan trọng là chủ động được trong c/t của mình !!!

Tôi có viết 1 class ví dụ về việc này. Nhưng không hiểu sao không up lên Megaupload được !
Vậy bạn nào có nhu cầu, để lại địa chỉ email để mình gửi.

Chúc thành công.

[tungvv]

Tôi có viết 1 class ví dụ về việc này. Nhưng không hiểu sao không up lên Megaupload được !
Vậy bạn nào có nhu cầu, để lại địa chỉ email để mình gửi.

Chúc thành công.

Bạn gửi cho tôi với : Email : tungvv@gmail.com
Hỏi thêm bạn một chút: Khi đã kết xuất và khởi động Excel , có lúc chương trình EXcel ko cho lưu lại ( chỉ có save as )và mặc dầu đã thoát chương trình Excel và cả C/T kế toán nhưng nó vẫn báo là file vat_daura....xls đã bị mở để sửa chữa, ko cho phép mở nữa là sao ?. Có phải là do đoạn CT sau cùng của lệnh Fox chưa hoàn thiện hay ko.
Mấy dòng lệnh sau cùng của Func là như thế này :
------------------------
...&& các lệnh kết chuyển dữ nhập dữ liệu vào file *.xls
Oleapp.Visible= .T.
oleapp=null
RETURN.
--------------------------
Có cần phải thêm lệnh để đóng ứng dụng nữa ko ?

Thanks

[tayngangvfp]

....Khi đã kết xuất và khởi động Excel , có lúc chương trình EXcel ko cho lưu lại ( chỉ có save as )....

Tôi đã gửi, bạn dùng thử xem sao.

Theo mình nghĩ, c/t báo như thế là do File Excel đang mở! Thường là do c/t chạy bị lỗi trước khi lệnh "Oleapp.Visible= .T." được thực hiện.
Để kiểm tra, bạn có thể nhấn Ctrl+Alt+Del để mở Task Manager xem Excel có đang chạy hay không? Nếu có hãy "End Process" nó là xong.

Để khắc phục điều này, bạn viết thêm code để xử lý mỗi khi c/t bị lỗi thì sẽ thực hiện "Oleapp.Visible= .T."

Chúc thành công