Visual Basic - Copiar y Pegar Tablas!!!

Life is soft - evento anual de software empresarial
 
Vista:

Copiar y Pegar Tablas!!!

Publicado por Papo (128 intervenciones) el 18/05/2007 18:33:41
Buenas, lo que deseo es copiar los registros que se quedan en una consulta(como en una tabla virtual) y pegarlos en una tabla fisica que contiene los mismos campos que los de la consulta y despues poderlos borrar despues de haberlos usado, todo esto con codigo en VB6.

El gestor de datos que utilizo es Access de Office 2003

Agradeceria al que me pudiera ayudar.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Copiar y Pegar Tablas!!!

Publicado por Luis Prieto (166 intervenciones) el 18/05/2007 23:09:44
Hola, Papo!!

Puedes hacer esto

Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset

Set cn = New ADODB.Connection
cn.ConnectionString = "provider=sqloledb;server=.;database=tu_bd;uid=sa"
cn.Open
Set rs = New ADODB.Recordset
rs.CursorLocation = adUseClient
rs.Open "insert into tabla1 (campo1, campo2......) select campo1, campo2........ from consulta
", cn

con esa consulta ya puedes hacer lo que quieres.

Espero te ayude.

Saludos!!

Cualquier otra duda escribeme.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Copiar y Pegar Tablas!!!

Publicado por Papo (128 intervenciones) el 18/05/2007 23:14:53
Gracias, lo voy a probar y a tomar en cuenta tu consejo.

Saludos.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar