Como puedo realizar el insert ha una tabla cuando la variable que viene de un recordset trae un listado de codigo como ingreso ese listado a otra tabla he probado con addnew de esta forma y corre el prorama pero no inserta nada en la tabla
Set RS1 = Server.CreateObject("ADODB.Recordset")
sqlstr= " SELECT * "
sqlstr= sqlstr & " FROM sistemges_gestion, sistemges_actividad"
sqlstr= sqlstr & " where codigo_actividad_gestion= codigo_actividad "
Rs1.CursorType = 0
Rs1.CursorLocation = 2
Rs1.LockType = 3
RS1.Open sqlstr, oConn,2,3
do while not rs1.eof
rs1.AddNew
rs1.Fields("codigo_actividad") = rs1("codigo_actividad_gestion")
rs1.GuardarBD rs1.Fields("codigo_actividad_gestion")
RS1.movenext
loop
RS1.Close
response.Write("Datos Cargados")
response.write RS1("codigo_actividad")
