HỎI: PHÂN BIỆT CÁC TRƯỜNG GIỐNG NHAU TRONG Access? (1 người xem)

  • Thread starter Thread starter nad582
  • Ngày gửi Ngày gửi
Liên hệ QC

Người dùng đang xem chủ đề này

nad582

Thành viên thường trực
Tham gia
7/6/11
Bài viết
317
Được thích
48
Chào các a(c) trong GPE, e có đoạn code như sau, dùng để lấy dữ liệu từ file Access sang file Excel:

mySQL = "SELECT T3.[Frame],round(T4.[Length]*1,2) " & _
"FROM [Element Forces - Frames] T3,[Connectivity - Frame]T4 " & _
"Where T3.[Frame] = T4.[Frame] and left([Frame],1) like 'D'"
lrs.Open mySQL, cnn, 3, 1
With Sheet2
.[A6].CopyFromRecordset lrs
End With
lrs.Close: Set lrs = Nothing
cnn.Close: Set cnn = Nothing

thì khi thực hiện nó báo lỗi thế này:
View attachment 124866

Như vậy theo ví dụ trên thì nó lỗi chỗ tô màu đỏ, khi e sửa lại trong file Access ở Table [Connectivity - Frame] chứa field [Frame] thành [Frameyyy] (nghĩa là sửa T4.[Frame] thành [Frameyyy]) sau đó sửa lại code thành:

mySQL = "SELECT T3.[Frame],round(T4.[Length]*1,2) " & _
"FROM [Element Forces - Frames] T3,[Connectivity - Frame]T4 " & _
"Where T3.[Frame] = T4.[Frameyyy] and left([Frame],1) like 'D'"
lrs.Open mySQL, cnn, 3, 1
With Sheet2
.[A6].CopyFromRecordset lrs
End With
lrs.Close: Set lrs = Nothing
cnn.Close: Set cnn = Nothing

thì nó không bị lỗi, vậy có cách nào để phân biệt các trường giống nhau mà không cần phải sửa trong Access, không cần phải sửa trong code không?
Xin cảm ơn rất nhiều!!!
 
Lần chỉnh sửa cuối:
Bain nhận định lỗi sai chỗ. Nó báo lỗi ở LEFT([Frame],1). Chỉ cần sửa lại thành LEFT(T3.[Frame],1)
 
Upvote 0

Bài viết mới nhất

Back
Top Bottom