Dim cnn As New ADODB.Connection
Dim rst As New ADODB.Recordset
cnn.Open "DRIVER=Microsoft FoxPro VFP Driver (*.dbf);Exclusive=No;SourceType=DBF;SourceDB=D:\Zpl\Store\"
rst.Open "select * from empl", cnn
Сейчас этот форум просматривают: Google-бот, Yandex-бот и гости: 93