Author Topic: bagaimana cara import csv 400 kolom ke dbf  (Read 213 times)

0 Members and 1 Guest are viewing this topic.

Offline m45nx

  • Full Member
  • *
  • Posts: 75
  • newbie
bagaimana cara import csv 400 kolom ke dbf
« on: November 30, 2017, 09:56:51 AM »
gan, saya dapat masalah import dari file CSV hasil program lain. ingin di import ke DBF vfp
tapi file csv nya lebih dari 255 kolom.

apakah bisa kolom di csv di hapus dulu bagian tengahnya tengahnya.

struktur csv:
id, nama, data1, data2, data3,...., data400
"....break....break..."

Offline m45nx

  • Full Member
  • *
  • Posts: 75
  • newbie
Re: bagaimana cara import csv 400 kolom ke dbf
« Reply #1 on: November 30, 2017, 10:07:52 AM »
uuuup
"....break....break..."

Offline foxy

  • Fox-id M.V.P
  • Hero Member
  • *
  • Posts: 3.556
    • Foxy Land
Re: bagaimana cara import csv 400 kolom ke dbf
« Reply #2 on: December 01, 2017, 05:10:37 AM »
400 kolom jelas tidak mungkin masuk ke struktur dbf. Kalau Anda mau 'memotong' bagian tengah CSV, tentu saja bisa. VFP punya fungsi Getwordnum() dan GetwordCount() untuk membantu mem-parse delimited string dengan sangat efisien (dan cepat!  :icon_biggrin: ). Anda tinggal gabungkan dua fungsi tadi di dalam loop. Tentu saja sebelumnya Anda harus tentukan rule dulu, dari 400 kolom itu kolom mana saja yang ingin Anda 'masukkan' ke DBF; semisal kolom 1-100, lalu kolom 246 sampai kolom 400; atau mungkin aturan lain. Tidak sulit kok bikinnya.... ya, mungkin sekitar 1/2 sampai 1 jam termasuk trial error. Monggo dicoba.... syukur-syukur Anda mau share code Anda setelah berhasil.  :icon_biggrin:

hth,
foxy
This post is provided as is. Feel free to use all the codes and information, however understand that I don't have any obligations to fix any bug(s) or follow up this subject.

Offline Tgh_Fox

  • Junior Member
  • *
  • Posts: 214
  • - TghFox -
Re: bagaimana cara import csv 400 kolom ke dbf
« Reply #3 on: December 01, 2017, 09:40:18 AM »
opsi lain jika baris tidak sampai berjuta-juta, mungkin bisa spt ini
cari manual bisa copy ke excel (versi 20017 ke atas),
ambil 200 klm pertama dan ke csv / txt import ke tabel 1 pakai append from (jgn lupa buat primary key)
ambil 200 klm kedua dan ke csv / txt import ke tabel 2 append from  (jgn lupa buat primary key)
selesai !!  :icon_biggrin:

jika otomatis gunakan bhs macro excel dan kombinasikan dengan foxpro

Semangat

Offline m45nx

  • Full Member
  • *
  • Posts: 75
  • newbie
Re: bagaimana cara import csv 400 kolom ke dbf
« Reply #4 on: December 02, 2017, 05:52:43 PM »
400 kolom jelas tidak mungkin masuk ke struktur dbf. Kalau Anda mau 'memotong' bagian tengah CSV, tentu saja bisa. VFP punya fungsi Getwordnum() dan GetwordCount() untuk membantu mem-parse delimited string dengan sangat efisien (dan cepat!  :icon_biggrin: ). Anda tinggal gabungkan dua fungsi tadi di dalam loop. Tentu saja sebelumnya Anda harus tentukan rule dulu, dari 400 kolom itu kolom mana saja yang ingin Anda 'masukkan' ke DBF; semisal kolom 1-100, lalu kolom 246 sampai kolom 400; atau mungkin aturan lain. Tidak sulit kok bikinnya.... ya, mungkin sekitar 1/2 sampai 1 jam termasuk trial error. Monggo dicoba.... syukur-syukur Anda mau share code Anda setelah berhasil.  :icon_biggrin:

hth,
foxy
mudah2an ada jalan bisa  fungsi di atas,
izin bertapa dulu ngoprek fung getwordnum() dan getwordcount()
"....break....break..."

Offline m45nx

  • Full Member
  • *
  • Posts: 75
  • newbie
Re: bagaimana cara import csv 400 kolom ke dbf
« Reply #5 on: December 02, 2017, 05:55:40 PM »
opsi lain jika baris tidak sampai berjuta-juta, mungkin bisa spt ini
cari manual bisa copy ke excel (versi 20017 ke atas),
ambil 200 klm pertama dan ke csv / txt import ke tabel 1 pakai append from (jgn lupa buat primary key)
ambil 200 klm kedua dan ke csv / txt import ke tabel 2 append from  (jgn lupa buat primary key)
selesai !!  :icon_biggrin:

jika otomatis gunakan bhs macro excel dan kombinasikan dengan foxpro
memang step ini yg saya pake, handle di excel, untuk hapus kolom yg tdk terpakai. namun pengen di handle semua oleh aplikasi. biar praktis gitu om
"....break....break..."

Offline Tgh_Fox

  • Junior Member
  • *
  • Posts: 214
  • - TghFox -
Re: bagaimana cara import csv 400 kolom ke dbf
« Reply #6 on: December 04, 2017, 09:56:23 AM »
excelnya jadikan otomatis, dengan macro/vba excel
ini cara memanggil dll excel di foxpro, ini cuplikan code vba/macro excel yg ditulis di vfp
(jika file banyak bisa menggunkan perulangan)

PUBLIC oExcel
oExcel = CREATEOBJECT("Excel.Application")
FileXls=oExcel.Workbooks.Open("namaFile.csv",0)
FileXls2Csv=workbooks.add
FileXls.activesheet.columns("A:GR").copy
FileXls2Csv.activesheet.range("A1").pastespecial
oExcel.cutcopymode=false
FileXls2Csv.saveas("hasil1.csv","csv")
FileXls2Csv.close(false)
FileXls2Csv=workbooks.add
FileXls.activesheet.columns("GS:OJ").copy
FileXls2Csv.activesheet.range("A1").pastespecial
oExcel.cutcopymode=false
FileXls2Csv.saveas("hasil2.csv","csv")


kode di atas belum dites,  :icon_biggrin: :icon_biggrin: :icon_biggrin:






Semangat

Offline m45nx

  • Full Member
  • *
  • Posts: 75
  • newbie
Re: bagaimana cara import csv 400 kolom ke dbf
« Reply #7 on: December 07, 2017, 09:35:18 PM »
solved

thank u master...
"....break....break..."