leontro
Oct 31st, 2000, 02:11 PM
Hi there,
I am using a Access database and I want to retrieve the tables in a database except system tables, but some problem is arrising while the "filter" line is being executed. My code is written below;
'------------------------------------------------------
Option Explicit
Dim cnn As ADODB.Connection
Dim rst As ADODB.Recordset
Private Sub Command1_Click()
Set rst = cnn.OpenSchema(adSchemaColumns)
rst.Filter = "NOT TABLE_NAME like 'Msys%'" 'Problem occurs
Set dbg.DataSource = rst
End Sub
Private Sub Form_Load()
Set cnn = New ADODB.Connection
Set rst = New ADODB.Recordset
With cnn
.Mode = adModeReadWrite
.CursorLocation = adUseClient
.Open "some_dns"
End With
End Sub
'------------------------------------------------------
any idea may help...
Thanks in advance
I am using a Access database and I want to retrieve the tables in a database except system tables, but some problem is arrising while the "filter" line is being executed. My code is written below;
'------------------------------------------------------
Option Explicit
Dim cnn As ADODB.Connection
Dim rst As ADODB.Recordset
Private Sub Command1_Click()
Set rst = cnn.OpenSchema(adSchemaColumns)
rst.Filter = "NOT TABLE_NAME like 'Msys%'" 'Problem occurs
Set dbg.DataSource = rst
End Sub
Private Sub Form_Load()
Set cnn = New ADODB.Connection
Set rst = New ADODB.Recordset
With cnn
.Mode = adModeReadWrite
.CursorLocation = adUseClient
.Open "some_dns"
End With
End Sub
'------------------------------------------------------
any idea may help...
Thanks in advance