Hỏi: Trên cùng một form có thể đặt lựa chọn cho việc sử dụng tệp khác nhau được không?

  • Thread starter ahp
  • Ngày gửi
A

ahp

Guest
24/6/05
40
0
6
49
hanoi
tức là em có làm một cái form nó đang sử dụng tệp luong1, bầy giờ em muốn đưa tệp lương 2 vào sử dụng cho form cũ thông qua nút lệnh lựa chọn thì viết lệnh thế nào các bác (em ngại lập thêm form vì cấu trúc nó vẫn thế mà:wall:)
 
Khóa học Quản trị dòng tiền
M

mvp2006

Sơ cấp
16/10/08
36
0
0
TPHCM
tức là em có làm một cái form nó đang sử dụng tệp luong1, bầy giờ em muốn đưa tệp lương 2 vào sử dụng cho form cũ thông qua nút lệnh lựa chọn thì viết lệnh thế nào các bác (em ngại lập thêm form vì cấu trúc nó vẫn thế mà:wall:)

Bạn dùng chữ "tệp" thì mình nghĩ file chương trình của bạn đang link lấy dữ liệu từ file Luong1.mdb nay bạn muốn lấy dữ liệu từ file Luong2.mdb phải không ?
1. Nếu vậy bạn phải xóa link cũ đi và link mới tới Luong2.mdb (nếu dùng VBA)
2. Bạn có thể link lấy dữ liệu từ cả 2 file Luong1.mdb và Luong2.mdb
khi đó các file được link sau các table sẽ có thêm số 1

private sub cmd_click()
Me.RecordSource = "SELECT * FROM <table>"
me.Requery
end sub
 
A

ahp

Guest
24/6/05
40
0
6
49
hanoi
Bác mvp2006 ơi, ý em là muốn đổi table trong phần record source của subform vì em có mấy cái table giống nhau mà cứ tạo nhiều subform và form thì ngại và nhìn rối mù lên bác ạ
em dùng cái lệnh này mà chưa được nhỉ

Me.RecordSource = "table.dmdv"
 
Sửa lần cuối:
M

mvp2006

Sơ cấp
16/10/08
36
0
0
TPHCM
Bác mvp2006 ơi, ý em là muốn đổi table trong phần record source của subform vì em có mấy cái table giống nhau mà cứ tạo nhiều subform và form thì ngại và nhìn rối mù lên bác ạ
em dùng cái lệnh này mà chưa được nhỉ

Me.RecordSource = "table.dmdv"

bạn hỏi không rõ gì cả, table gọi là tệp thì ai mà hiểu?
như vậy có đúng ý bạn chưa?
tuỳ vào đề bài mà bạn biến đối nhé.

http://webketoan.net/uploadfiles/6chkkw531kwm6of.zip
 
S

spammail

Guest
Bạn có thể tham khảo đoạn code này:
Mã:
Private Sub OptionGroup_BeforeUpdate(Cancel As Integer)
If OptionGroup.Value = 1 Then
     Forms!MainForm!subform.Form.RecordSource = "table1"
Else
    Forms!MainForm!subform.Form.RecordSource = "table2"
End If
End Sub
 
Sửa lần cuối:

Xem nhiều