Access - Cargar tabla por código

   
Vista:

Cargar tabla por código

Publicado por Mariel (21 intervenciones) el 21/07/2010 13:57:44
Que tal amigos,
Mi consulta es la siguiente... quiero hacer que cuando cargue un formulario proceda a actualizar una tabla que debo utilizar... mediante el siguiente código logro hacer que borre el contenido, pero cuando quiero cargar la nueva información, no lo hace... creo que el problema está en la utilización del "IIF", no se bien que parte de la gramática estoy haciendo mal, porque no me marca ningún error, pero no carga los datos... este es el código:

Private Sub Form_Load()
Dim SQL As String
Dim SQL1 As String
Dim stDocName As String

'Limpio la tabla NOV_PACI1

strsql = "Delete NOV_PACI1 (FINGRESO,FEGRESO,FEGRESO1,)"
strsql = strsql & " FROM NOV_PACI1"
CurrentDb.Execute strsql, dbFailOnError

'HASTA AQUÍ TODO BIEN...

'Lleno la tabla NOV_PACI1

strSQL1 = "INSERT INTO NOV_PACI1 (FINGRESO,FEGRESO,FEGRESO1)"
strSQL1 = strSQL1 & " SELECT (FINGRESO,FEGRESO,IIF([FEGRESO]>[FINAL],' ',[FEGRESO]) AS FEGRESO1,)"
strSQL1 = strSQL1 & " FROM NOV_PACI,FECHA_PARAM"
End Sub
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
Imágen de perfil de Enrique Ramírez

RE:Cargar tabla por código

Publicado por Enrique Ramírez (617 intervenciones) el 21/07/2010 20:34:14
Probado y checado que si funciona.

strSQL1 = "INSERT INTO NOV_PACI1 (FINGRESO,FEGRESO,FEGRESO1) " _
& " SELECT FINGRESO,FEGRESO,IIF([FEGRESO]>[FINAL],' ',[FEGRESO]) " _
& " FROM NOV_PACI"
DoCmd.SetWarnings False
DoCmd.RunSQL strSQL1
DoCmd.SetWarnings True
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:Cargar tabla por código

Publicado por Mariel (21 intervenciones) el 22/07/2010 14:00:13
Si... es verdad... estaba bien... lo que sucedió fue que omití el paréntesis final luego del IFF, ... y como no me marcaba el error, no me daba cuenta...

Gracias!!!!

Mariel.
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