Export DBF sang exel ???

[nguyenhdu]

Cái file DBF của mình khoản 100.000 dòng. Dùng Visual foxpro 6.0 xuất ra exel 5 thì được khoản 16.000 dòng.

Bạn nào biết câu lệnh trong foxpro xuất ra từng file excel khoảng 10.000 dòng .

Từ dòng 1 đến dòng 10.000
rồi tiếp tục từ dòng 10.001 đến dòng 20.000 và ... đến dòng 100.000

 

[HảiĐăng]

Cái file DBF của mình khoản 100.000 dòng. Dùng Visual foxpro 6.0 xuất ra exel 5 thì được khoản 16.000 dòng.

Bạn nào biết câu lệnh trong foxpro xuất ra từng file excel khoảng 10.000 dòng .

Từ dòng 1 đến dòng 10.000
rồi tiếp tục từ dòng 10.001 đến dòng 20.000 và ... đến dòng 100.000

Ra cửa sổ lệnh và
Xuất lần 1:
Copy to <Tenfile1> type xls
Xuất lần kế tiếp:
Copy to <Tenfile2> type xls REST
...
Cứ thế cho đến hết EOF.
Nếu tôi không nhầm thì 1 lần được 16384 record
Chúc bạn thành công!

 

[hoangvuluan]

Cách đơn giản nhất là:

Use <filename> && mở file
Copy To <file1> Type XLS for RecNo() <=10000 && copy lần 1
Copy To <file2> Type XLS For RecNo()>10000 .and. RecNo() <= 20000 && copy lần thứ 2 ...
.v.v..


-hvl-

 

[Đào Việt Cường]

Dear all,
--------
Các bạn thử sử dụng công cụ tìm kiếm với Google của diễn đàn xem, kết quả:

http://www.google.com.vn/custom?dom...om&q=foxpro+&sitesearch=www.giaiphapexcel.com

 

[nguyenhdu]

Lại một lần nữa thanks pa'c Luan hi hi

 

[onglao_danhca]

ket xuat dbf sang xls

Ban thu dung code nay xem :
set talk off
use ?
m = reccount()
n = 0
s_tep = 10000 && số này bạn thay đổi tuỳ theo số lượng bản ghi muốn kết xuất
* Số lượng file sẽ là int(m/s_tep) +1 và không quá 1000. Nếu quá 1000 sẽ bị ghi đè
do while(n*s_tep<m)

f_ext = padl(allt(str(n)),3,'0') && nếu không muốn bị hạn chế số lượng file thì đổi * thành f_ext = aallt(str(n))
f_dich = 'file_dich' + f_ext + '.xls'
copy to &f_dich for recno()>n*s_tep and recno()<= (n+1)*s_tep type xls
n = n + 1
loop
enddo

 

[yenbai]

Bạn Làm từ VFP đi, vì bạn đang cần Chuyển DBF sang EXCEL mà, trong VFP gõ code sau:
*************************
use A.dbf
copy file A.dbf to C:\B.xls type xls
*************************

hoặc
*************************
copy file C:\A.dbf to D:\B.xls type xls
****
Chúc bạn thành công

 

[dung40314]

Khi chuyển từ *.dbf sang *.xls Các cao thủ cho em hỏi có cách nào để thực hiện mỗi lần kết xuất lớn hơn 16384 record không ?

 

[chungocoai]

Có cách đấy!

Khi chuyển từ *.dbf sang *.xls Các cao thủ cho em hỏi có cách nào để thực hiện mỗi lần kết xuất lớn hơn 16384 record không ?

bạn dùng vfp9 đi.
đơn giản lắm

chỉ cần gõ dòng lệnh giống y sì như fox26 là ok ngay

bạn cứ thử đi, đảm bảo bạn sẽ hài lòng đấy.