Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Tìm kiếm và hiển thị danh sách Table hiện có trong Database lên form !
#1
tmtien261 1 nhờ các Pro chỉ giáo thêm:

Tôi có 2 table1, table2 và 1 form1 để hiển thị. Xin hỏi có cách nào (bằng code hoặc ...) mà khi mở form1 lên trên form1 sẽ hiển thị danh sách các Table đang có trong Database. Nếu thêm table mới thì form1 sẽ Update vào danh sách để hiển thị lên form1.
Chữ ký của Minh Tiên -----------------------------------------------
Đường tuy ngắn, không đi không đến
Việc tuy nhỏ, không làm không nên.
                                           Tuân Tử
-----------------------------------------------
Reply
Những người đã cảm ơn
#2
Chủ đề này tmtien261 đã hỏi rất lâu rồi nhưng ko ACE nào trả lời giúp. Giờ mình đã mày mò trên diễn đàn và đã tạm thời làm được rồi.
Nay mình xin chia sẽ cho các ACE muốn làm như mình.
Demo
Thân chào !
Chữ ký của Minh Tiên -----------------------------------------------
Đường tuy ngắn, không đi không đến
Việc tuy nhỏ, không làm không nên.
                                           Tuân Tử
-----------------------------------------------
Reply
Những người đã cảm ơn
#3
Chủ đề này tmtien261 đã hỏi rất lâu rồi nhưng ko ACE nào trả lời giúp. Giờ mình đã mày mò trên diễn đàn và đã tạm thời làm được rồi.
Nay mình xin chia sẽ cho các ACE muốn làm như mình.
Demo_LayDanhsachTenTable_TrongDatabase
Thân chào !
Chữ ký của Minh Tiên -----------------------------------------------
Đường tuy ngắn, không đi không đến
Việc tuy nhỏ, không làm không nên.
                                           Tuân Tử
-----------------------------------------------
Reply
Những người đã cảm ơn
#4
"Đơn giản" như "đan rổ". Bạn không cần cầu kỳ như vậy, chỉ cần lưu ý tới table hệ thống của Database là OK. Và cũng chẳng cần DBEngine làm chi cho tốn hao. Chỉ cần như thế này là đủ

Mã PHP:
Private Sub btnLaytenTable_Click()
    
Dim rs As Recordset
    Set rs 
CurrentDb.OpenRecordset("tblDanhSach_Table"dbOpenTable)
    
Dim i As Integer
    
For 0 To CurrentDb.TableDefs.Count 1
        
If Left(CurrentDb.TableDefs(i).Name4) <> "MSys" Then
            rs
.AddNew
            rs
.Fields(0) = CurrentDb.TableDefs(i).Name
            rs
.Update
        End 
If
    
Next
    Me
.Requery
End Sub 

Tạo form như của bạn và đặt nguồn cho form là table tblDanhSach_Table
Quá đơn giản, đúng không nào
Thân mến
Chữ ký của Xuân Thanh Trăm năm trước thì ta chưa gặp
Trăm năm sau biết gặp được không?
Cuộc đời sắc sắc không không
Thì thôi ta cứ hết lòng vì nhau
ღღღღღTài sản của Xuân Thanh (View All Items) ღღღღღ
Reply
Những người đã cảm ơn Minh Tiên


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  [Hỏi] Refresh Form và tiếp tục hoạt động Godspear 2 47 3 Giờ trước
Bài mới nhất: Godspear
  [Hỏi] Cách thêm dữ liệu vào form Main_Sub NganNguyen 1 38 06-12-16, 02:23 AM
Bài mới nhất: maidinhdan
  Tự động hiện Form khi loading hết thời gian ChiMai 1 49 02-12-16, 08:59 PM
Bài mới nhất: ongke0711
Photo [Hỏi] Mở Form trên access 2007 báo lỗi jason 5 195 22-11-16, 09:23 AM
Bài mới nhất: jason
  Query hiện lên trên form? feeling 4 165 09-11-16, 09:49 PM
Bài mới nhất: toancvp

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ