access to php mysql

[sho]

i can able to retrive the access file and show it in the OLE box, but by double clicking it the access window is opening. But i just want to retrive only the table names from that, and show it in the list box.

[albertw]

hi
create a form with a datacontrol (Data1) and a Listbox (List1)
set property OLEDragMode to Automatic and OLEDropMode to Manual
copy & paste next code

 
Dim vFN As Variant
Dim dbTab As TableDef
 
Private Sub List1_OLEDragDrop(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single)
If Data.GetFormat(vbCFFiles) Then
    For Each vFN In Data.Files
    Data1.DatabaseName = vFN
    Data1.Refresh
        For Each dbTab In Data1.Database.TableDefs
        List1.AddItem dbTab.Name
        Next Td
    Next vFN
End If
End Sub
 
Private Sub List1_OLEDragOver(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single, State As Integer)
If Data.GetFormat(vbCFFiles) Then
List1.Clear
    Effect = vbDropEffectCopy And Effect
    Exit Sub
End If
Effect = vbDropEffectNone
End Sub