Ver Mensaje Individual
  #1 (permalink)  
Antiguo 21/02/2008, 08:22
MASP
 
Fecha de Ingreso: febrero-2008
Mensajes: 26
Antigüedad: 17 años, 2 meses
Puntos: 1
Recorset como insertar en otra tabla

haber mi duda o pregunta es que utilizo un recorset con lo valores que tomo saco
algunos calculos y esos calculos necesito ingresarlos en otra tabla, segun mi inexperticia a lo mejor se puede de esta forma :(codigo fuente)
pero no se como ejecutarlo para que inserte si alguien me puede ayudar.
o bien no se puede como hacer para instertar esos valores que necesito.

<%

DIM ANOA,ANOI,ANOS,DIAS
query="SELECT DISTINCT (RUT), cast(FECHA_INGRESO_ADMINISTRACION as datetime) as fecha FROM funcionario WHERE (RUT=RUT)AND ISDATE(FECHA_INGRESO_ADMINISTRACION)=1"

set recordSet=Server.CreateObject("ADODB.Recordset")
recordSet.Open query,conn

set RUT=recordSet("RUT")
set FECHAI=recordSet("fecha")

Do Until recordSet.EOF
ANOA= year(now)-1
ANOI= year(FECHAI)
ANOS=datediff("yyyy",FECHAI,"01/01/2007")-1

if ANOS<= 15 then
DIAS=15
elseif ANOS> 15 and ANOS<=20 then
DIAS=20
elseif ANOS>20 then
DIAS=25
end if

Insert="INSERT RUT,ANOA,DIAS_CORR,ANOS INTO FUN_DIAS_PERM values ("&RUT&","&ANOA&","&DIAS&","&ANOS&")"

Response.Write Insert & " " & FECHAI & " " & ANOA& " " & ANOI & " " & DIAS & " " & ANOS & "<BR>"

RecordSet.MoveNext
Loop


RecordSet.Close
Conn.Close
%>

gracias gracias