- Код: Выделить всё
 Set m_dbextract = New ADODB.Connection
 Set rs = New ADODB.Recordset
 
 m_dbextract.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=ProjectServer;Data Source=ITADSQL01"
 m_dbextract.Open
 
 rs.Open "SELECT TaskEnterpriseText1 From MSP_VIEW_PROJ_TASKS_ENT", m_dbextract, adOpenStatic, adLockOptimistic
Могу ля я теперь записать полученный рекордсет в таблицу?



 
 
