• Vui lòng đọc nội qui diễn đàn để tránh bị xóa bài viết
  • Tìm kiếm trước khi đặt câu hỏi

import excel vào sql server mà quy định được kiểu dữ liệu !

Nơi trao đổi về VBA (Visual Basic for Application), lập trình cho ứng dụng Microsoft Office, AutoCAD...

Moderator: tungblt

mrcoding
Thành viên danh dự
Thành viên danh dự
Posts: 72
Joined: Thu 19/03/2009 2:03 pm
Location: Đà Nẵng
Been thanked: 4 times
Contact:

import excel vào sql server mà quy định được kiểu dữ liệu !

Postby mrcoding » Thu 25/11/2010 12:04 am

em có đoạn code import excel vào sql serrver
  1. Public Function ImportFromExcel(m_filename As String, mSheet As String, m_Tblname As String) As Long
  2.     Dim strSQL As String
  3.     Dim lngRecsAff As Long
  4.     On Error Resume Next
  5.     strSQL = "DROP TABLE [" & m_Tblname & "] "
  6.     CN.Execute strSQL
  7.     On Error GoTo LOI
  8.     'Import by using OPENROWSET and object name.
  9.    strSQL = "SELECT matinh, matram, card, serial INTO " & m_Tblname & " FROM " & _
  10.         "OPENROWSET('Microsoft.Jet.OLEDB.4.0', " & _
  11.         "'Excel 8.0;Database=" & m_filename & "', " & _
  12.         "[" & mSheet & "$])"
  13.     'Debug.Print strSQL
  14.    CN.Execute strSQL, lngRecsAff, adExecuteNoRecords
  15.     ImportFromExcel = lngRecsAff
  16.    
  17. LOI:
  18.     If Err Then
  19.         ImportFromExcel = 0
  20.     End If
  21. End Function

hoạt động nhanh. nhưng có 1 vấn đề là kiểu dữ liệu trường do nó tạo ra không như em mong muốn. có bác nào biết cách chạy truy vấn này mà mình có thể quy định được kiểu dữ liệu không ? Hoặc có 1 code khác tương tự thế cũng được. thanks. Đừng dùng truy vấn từng hàng rồi add và update nhé. cái đó em làm qua rồi nhưng chậm rì....thnaks


http://www.mediafire.com/hothanhnam

User avatar
truongphu
VIP
VIP
Posts: 4766
Joined: Sun 04/11/2007 10:57 am
Location: Cam Đức, Khánh hòa
Has thanked: 14 times
Been thanked: 520 times

Re: import excel vào sql server mà quy định được kiểu dữ liệ

Postby truongphu » Sat 27/11/2010 4:09 pm

kiểu dữ liệu được quy định khi tạo table (CN.Execute "CREATE TABLE.." )
(xem các bài viết về vấn đề nầy có trong forum)
sau đó bạn nhập dữ liệu là ok
o0o--truongphu--o0o

.........
Ghé thăm:
Chuyện Linh Tinh

thkd09
Thành viên chính thức
Thành viên chính thức
Posts: 15
Joined: Sat 29/08/2009 10:27 pm
Has thanked: 13 times
Contact:

Re: import excel vào sql server mà quy định được kiểu dữ liệ

Postby thkd09 » Mon 31/01/2011 12:00 pm

Có ai dùng được hàm trên không?? Chỉ cho em với các bác. Em sử dụng mà không được tẹo nào.

User avatar
truongphu
VIP
VIP
Posts: 4766
Joined: Sun 04/11/2007 10:57 am
Location: Cam Đức, Khánh hòa
Has thanked: 14 times
Been thanked: 520 times

Re: import excel vào sql server mà quy định được kiểu dữ liệ

Postby truongphu » Thu 17/02/2011 9:10 am

thkd09 wrote:Có ai dùng được hàm trên không??

Hàm trên là hàm nào?
* Function ImportFromExcel thì quá rõ, chép là chạy
* sql CREATE TABLE
CREATE TABLE table_name (column_name1 data_type,column_name2 data_type, column_name3 data_type)
o0o--truongphu--o0o

.........
Ghé thăm:
Chuyện Linh Tinh


Return to “Visual Basic for Application (VBA)”

Who is online

Users browsing this forum: No registered users and 2 guests