Assigning Recordsets Dynamically to a form : Recordset « Access « VBA / Excel / Access / Word

Home
VBA / Excel / Access / Word
1.Access
2.Application
3.Data Type
4.Data Type Functions
5.Date Functions
6.Excel
7.File Path
8.Forms
9.Language Basics
10.Math Functions
11.Outlook
12.PowerPoint
13.String Functions
14.Windows API
15.Word
16.XML
Microsoft Office PowerPoint 2007 Tutorial
Microsoft Office Excel 2007 Tutorial
Microsoft Office Word 2007 Tutorial
VBA / Excel / Access / Word » Access » Recordset 
Assigning Recordsets Dynamically to a form
 
Sub runFormNY()
    Dim con As ADODB.Connection
    Dim myRecordset As Recordset
    Dim strFrmNm As String
    
    Set myRecordset = New ADODB.Recordset
    myRecordset.CursorType = adOpenKeyset
    myRecordset.LockType = adLockOptimistic 

    Set con = New ADODB.Connection
    con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\mydb.mdb;"
       myRecordset.Open "SELECT * FROM Employees", con
       strFrmNm = "frmCustomer"
    DoCmd.OpenForm strFrmNm
    Set Application.Forms(strFrmNm).Recordset = myRecordset
    
    myRecordset.Close
    con.Close
    Set myRecordset = Nothing
    Set con = Nothing
End Sub

 
Related examples in the same category
1.Looping Through a Recordset
2.Retrieve data from Recordset by table column name
3.Move cursor in result set
4.Build a string text from result set
5.Creating a Custom Recordset
6.Creating a Disconnected Recordset
7.Filling a Combo Box with a Disconnected Recordset
8.The Supports Method of the Recordset Object
9.Using the EOF Property to Determine the Bounds of a Recordset
10.A Recordset That Does Not Support the RecordCount Property
11.A Recordset That Supports the RecordCount Property
12.Whether Records Are Returned in a Recordset
13.The Sort Property of the Recordset Object
14.Using the AbsolutePosition Property
15.Using the Bookmark Property
16.Refreshing Recordset Data
17.Set recordset to form
18.Row order in Dynamic Recordset
19.Dynamic Recordset
20.Snapshot Recordset
21.Set Index and seek the recordset
java2s.com  |  | Contact Us | Privacy Policy
Copyright 2009 - 12 Demo Source and Support. All rights reserved.
All other trademarks are property of their respective owners.