///
/// Baca data daripada Excel
///
/// Laluan
///
Set Data awam ImportFromExcel(string filePath)
{
DataSet ds = new DataSet();
string connString = "Pembekal = Microsoft.Jet.OLEDB.4.0; Sumber Data = " + filePath + ";Extended Properties="Excel 8.0;HDR=Yes;IMEX=1"";
JadualDataTable = OleDbHelper.GetExcelTables(connString);
jika(jadual == null || table.Rows.Count
{
kembali null;
}
foreach(DataRow dr dalam jadual.Rows)
{
rentetan cmdText = "pilih * daripada [" + dr["NAMA_JADUAL"].ToString() + "]";
DataTable dt = OleDbHelper.FillDataTable(connString, cmdText);
dt.TableName = dr["NAMA_JADUAL"].ToString();
ds.Tables.Add(dt);
}
kembali ds;
}
Langkah seterusnya ialah menulis Set Data ke dalam pangkalan data
Tiada cara yang lebih baik untuk mengimport jadual excel ke dalam vfp, tetapi ia boleh dicapai dengan membaca excel.
Berikut ialah contoh vfp membaca terus fail EXCEL:
M_File=GETFILE('xls','Fail Pesanan')
JIKA M_File=""
=MESSAGEBOX ("Sila pilih fail resit pesanan untuk diimport!", 0+48, "Prompt")
PULANGAN
LAINNYA
JIKA JUSTEXT(M_FILE)#"XLS" & dapatkan sambungan fail
=MESSAGEBOX ("Dokumen EXCEL yang anda pilih bukan!", 0+48, "Prompt")
PULANGAN
ENDIF
ENDIF
GUNAKAN Borang Pesanan Buku
ZAP
myexcel=createobject('excel.application') &Buat objek
myexcel.visible=.f.&invisible
bookexcel=myexcel.workbooks.open(M_File) & buka fail yang ditentukan
o_SheetName=myexcel.application.ActiveSheet.Name &Dapatkan nama lembaran kerja yang sedang aktif
UsedRange =bookexcel.worksheets(o_SheetName).UsedRange & mengembalikan kawasan yang boleh digunakan dalam lembaran kerja, sifat-sifat jadual UsedRange
o_rows=UsedRange.rows.count & summary rows
o_cols=UsedRange.columns.count & summary column
JIKA o_rows
=MESSAGEBOX ("Bilangan baris data yang hendak diimport terlalu sedikit, sila semak!", 0+16, "Prompt")
LAINNYA
UNTUK i=2 KE o_rows
m1=myexcel.cells(i,1).nilai & ISBN
m2=myexcel.cells(i,2).nilai & tajuk buku
m3=myexcel.cells(i,3).nilai &Penerbit
m4=myexcel.cells(i,4).nilai &pengarang
m5=myexcel.cells(i,5).nilai & harga
m6=myexcel.cells(i,6).nilai & kuantiti
MASUKKAN KOSONG
GANTIKAN ISBN DENGAN m1, tajuk buku DENGAN m2, penerbit DENGAN m3, pengarang DENGAN m4, harga DENGAN m5, kuantiti DENGAN m6
TAMAT
ENDIF
myexcel.buku kerja.tutup &Tutup ruang kerja
myexcel.berhenti & tutup excel
dahi
Atas ialah kandungan terperinci Kaedah pelaksanaan mengimport Excel ke dalam pangkalan data SQL menggunakan bahasa pengaturcaraan C. Untuk maklumat lanjut, sila ikut artikel berkaitan lain di laman web China PHP!