DBF и создание БД ч/з ADO - VB

Формулировка задачи:

Как создать БД DBF (свободную таблицу) средствами ADO/ODBC или еще чем либо?

Решение задачи: «DBF и создание БД ч/з ADO»

textual
                            Листинг программы 
                        

                            Dim conn, path
<br>path = <b><font color="green">"c:\"</font></b>
<br><font color="blue">Set</font> conn = CreateObject(<b><font color="green">"ADODB.Connection"</font></b>)
<br>conn.<font color="blue">Open</font> (<b><font color="green">"Provider=Microsoft.Jet.OLEDB.<b><font color="darkblue">4</font></b>.<b><font color="darkblue">0</font></b>;Data Source="</font></b> & path & <b><font color="green">";User ID=Admin;Password=;Extended Properties=dBase IV"</font></b>)
<br>conn.<font color="blue">Execute</font> <b><font color="green">"<font color="blue">create</font> <font color="blue">table</font> dbftable (ID_N int,dt date,info char(<b><font color="darkblue">100</font></b>))"</font></b>
<br>conn.Close
<br><font color="blue">Set</font> conn = Nothing
                        