ник: час
Как из VB6 скопировать таблицу из одной Б.Д. в другую Б.Д.
вроде вот так:
Public Function FUN_GROUP() As Boolean
'SELECT * INTO [c:\mydata\db2.mdb].[MyNewTable] FROM [c:\mydata\db1.mdb].[MyOldTable]
' Удаление таблицы
GLB_CONNECTION.Execute "DROP TABLE COMMODITY_GROUP_TBL"
' перенос таблицы
GLB_CONNECTION.Execute "SELECT * INTO [" & Form1!NEWWW & "].COMMODITY_GROUP_TBL FROM [" & Form1!STARA & "].COMMODITY_GROUP_TBL"
End Function
|