Buenas a todos.
Estoy haciendo una aplicacion usando como base de datos oracle express y
TADODATASOURCE. El problema que tengo es que cuando elimino el registro uso
lo siguiente :
IF MsgNoYes( "¿Desea suprimir el registro activo?" )
// ACA OBTENGO EL PAIS A BORRAR
clBorrar := ::osqltable1:pais
::oAdoDataSource1:execute("Delete from t01_paises where
pais='"+clborrar+"'")
::oDbBrowse1:Refresh()
ENDIF
El problema es que por mas que quiero, luego de borrar el registro y le doy
el evento REFRESH() al TDBBROWSE, este me sigue mostrando los mismos
registros como si no esta borrado, sin embargo en la base de datos si veo
las tablas, el registro ya esta eliminado.
Estoy haciendo algo mal ??
En espera de ayuda ....
In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
Como Actualizar el TdbBrowse Despues de Borrar o Agregar Regristo
-
Fernando Hernandez
- Mensajes: 113
- Registrado: Lun Nov 13, 2006 5:29 am
-
Fernando Hernandez
- Mensajes: 113
- Registrado: Lun Nov 13, 2006 5:29 am
Como Actualizar el TdbBrowse Despues de Borrar o Agregar Regristo
Problema solucionado, tengo que actualizar :
::osqltable1:refresh()
::odbBrowse1:refresh()
Luego de eliminar el registro.
"Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje
news:45a5c911$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
> Buenas a todos.
>
> Estoy haciendo una aplicacion usando como base de datos oracle express
> y TADODATASOURCE. El problema que tengo es que cuando elimino el registro
> uso lo siguiente :
>
> IF MsgNoYes( "¿Desea suprimir el registro activo?" )
> // ACA OBTENGO EL PAIS A BORRAR
> clBorrar := ::osqltable1:pais
> ::oAdoDataSource1:execute("Delete from t01_paises where
> pais='"+clborrar+"'")
> ::oDbBrowse1:Refresh()
> ENDIF
>
> El problema es que por mas que quiero, luego de borrar el registro y le
> doy el evento REFRESH() al TDBBROWSE, este me sigue mostrando los mismos
> registros como si no esta borrado, sin embargo en la base de datos si veo
> las tablas, el registro ya esta eliminado.
>
> Estoy haciendo algo mal ??
>
> En espera de ayuda ....
>
::osqltable1:refresh()
::odbBrowse1:refresh()
Luego de eliminar el registro.
"Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje
news:45a5c911$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
> Buenas a todos.
>
> Estoy haciendo una aplicacion usando como base de datos oracle express
> y TADODATASOURCE. El problema que tengo es que cuando elimino el registro
> uso lo siguiente :
>
> IF MsgNoYes( "¿Desea suprimir el registro activo?" )
> // ACA OBTENGO EL PAIS A BORRAR
> clBorrar := ::osqltable1:pais
> ::oAdoDataSource1:execute("Delete from t01_paises where
> pais='"+clborrar+"'")
> ::oDbBrowse1:Refresh()
> ENDIF
>
> El problema es que por mas que quiero, luego de borrar el registro y le
> doy el evento REFRESH() al TDBBROWSE, este me sigue mostrando los mismos
> registros como si no esta borrado, sin embargo en la base de datos si veo
> las tablas, el registro ya esta eliminado.
>
> Estoy haciendo algo mal ??
>
> En espera de ayuda ....
>
-
ignacio
- Site Admin
- Mensajes: 9457
- Registrado: Lun Abr 06, 2015 8:00 pm
- Ubicación: Madrid, Spain
- Contactar:
Como Actualizar el TdbBrowse Despues de Borrar o Agregar Regristo
Fernado,
Simplemente haz esto:
IF MsgNoYes( "¿Desea suprimir el registro activo?" )
::oDataSet:Delete() // o oomo se llame el componente que soporta el
Dataset
ENDIF
Saludos
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje
news:45a5c911$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
> Buenas a todos.
>
> Estoy haciendo una aplicacion usando como base de datos oracle express
> y TADODATASOURCE. El problema que tengo es que cuando elimino el registro
> uso lo siguiente :
>
> IF MsgNoYes( "¿Desea suprimir el registro activo?" )
> // ACA OBTENGO EL PAIS A BORRAR
> clBorrar := ::osqltable1:pais
> ::oAdoDataSource1:execute("Delete from t01_paises where
> pais='"+clborrar+"'")
> ::oDbBrowse1:Refresh()
> ENDIF
>
> El problema es que por mas que quiero, luego de borrar el registro y le
> doy el evento REFRESH() al TDBBROWSE, este me sigue mostrando los mismos
> registros como si no esta borrado, sin embargo en la base de datos si veo
> las tablas, el registro ya esta eliminado.
>
> Estoy haciendo algo mal ??
>
> En espera de ayuda ....
>
Simplemente haz esto:
IF MsgNoYes( "¿Desea suprimir el registro activo?" )
::oDataSet:Delete() // o oomo se llame el componente que soporta el
Dataset
ENDIF
Saludos
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje
news:45a5c911$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
> Buenas a todos.
>
> Estoy haciendo una aplicacion usando como base de datos oracle express
> y TADODATASOURCE. El problema que tengo es que cuando elimino el registro
> uso lo siguiente :
>
> IF MsgNoYes( "¿Desea suprimir el registro activo?" )
> // ACA OBTENGO EL PAIS A BORRAR
> clBorrar := ::osqltable1:pais
> ::oAdoDataSource1:execute("Delete from t01_paises where
> pais='"+clborrar+"'")
> ::oDbBrowse1:Refresh()
> ENDIF
>
> El problema es que por mas que quiero, luego de borrar el registro y le
> doy el evento REFRESH() al TDBBROWSE, este me sigue mostrando los mismos
> registros como si no esta borrado, sin embargo en la base de datos si veo
> las tablas, el registro ya esta eliminado.
>
> Estoy haciendo algo mal ??
>
> En espera de ayuda ....
>
Ignacio Ortiz de Zúñiga
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
-
Fernando Hernandez
- Mensajes: 113
- Registrado: Lun Nov 13, 2006 5:29 am
Como Actualizar el TdbBrowse Despues de Borrar o Agregar Regristo
Ok, gracias. Ya lo probe pero ahora el error que me da es el siguiente del
adjunto.
TOLEAUTO:DELETE(0)
ERROR ADODB.RECORDSET/16839 E_FAIL:DELETE
ARGUMENTOS: ()
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje
news:45a5fb11$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
> Fernado,
>
> Simplemente haz esto:
>
> IF MsgNoYes( "¿Desea suprimir el registro activo?" )
> ::oDataSet:Delete() // o oomo se llame el componente que soporta el
> Dataset
> ENDIF
>
> Saludos
> --
> Ignacio Ortiz de Zúñiga
> http://www.xailer.com
>
>
> "Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje
> news:45a5c911$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>> Buenas a todos.
>>
>> Estoy haciendo una aplicacion usando como base de datos oracle express
>> y TADODATASOURCE. El problema que tengo es que cuando elimino el registro
>> uso lo siguiente :
>>
>> IF MsgNoYes( "¿Desea suprimir el registro activo?" )
>> // ACA OBTENGO EL PAIS A BORRAR
>> clBorrar := ::osqltable1:pais
>> ::oAdoDataSource1:execute("Delete from t01_paises where
>> pais='"+clborrar+"'")
>> ::oDbBrowse1:Refresh()
>> ENDIF
>>
>> El problema es que por mas que quiero, luego de borrar el registro y le
>> doy el evento REFRESH() al TDBBROWSE, este me sigue mostrando los mismos
>> registros como si no esta borrado, sin embargo en la base de datos si veo
>> las tablas, el registro ya esta eliminado.
>>
>> Estoy haciendo algo mal ??
>>
>> En espera de ayuda ....
>>
>
>
Attached files
adjunto.
TOLEAUTO:DELETE(0)
ERROR ADODB.RECORDSET/16839 E_FAIL:DELETE
ARGUMENTOS: ()
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje
news:45a5fb11$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
> Fernado,
>
> Simplemente haz esto:
>
> IF MsgNoYes( "¿Desea suprimir el registro activo?" )
> ::oDataSet:Delete() // o oomo se llame el componente que soporta el
> Dataset
> ENDIF
>
> Saludos
> --
> Ignacio Ortiz de Zúñiga
> http://www.xailer.com
>
>
> "Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje
> news:45a5c911$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>> Buenas a todos.
>>
>> Estoy haciendo una aplicacion usando como base de datos oracle express
>> y TADODATASOURCE. El problema que tengo es que cuando elimino el registro
>> uso lo siguiente :
>>
>> IF MsgNoYes( "¿Desea suprimir el registro activo?" )
>> // ACA OBTENGO EL PAIS A BORRAR
>> clBorrar := ::osqltable1:pais
>> ::oAdoDataSource1:execute("Delete from t01_paises where
>> pais='"+clborrar+"'")
>> ::oDbBrowse1:Refresh()
>> ENDIF
>>
>> El problema es que por mas que quiero, luego de borrar el registro y le
>> doy el evento REFRESH() al TDBBROWSE, este me sigue mostrando los mismos
>> registros como si no esta borrado, sin embargo en la base de datos si veo
>> las tablas, el registro ya esta eliminado.
>>
>> Estoy haciendo algo mal ??
>>
>> En espera de ayuda ....
>>
>
>
Attached files
-
Fernando Hernandez
- Mensajes: 113
- Registrado: Lun Nov 13, 2006 5:29 am
Como Actualizar el TdbBrowse Despues de Borrar o Agregar Regristo
Lo que si me funciona bien es :
IF MsgNoYes( "¿Desea suprimir el registro activo?" )
clBorrar := ::osqltable1:pais
clRecno := ::odbbrowse1:nrowsel
//::oSqlTable1:delete()
clSql := ::oAdoDataSource1:execute("Delete from t01_paises where
pais='"+clborrar+"'")
::osqltable1:refresh()
::odbBrowse1:refresh()
// esta linea porque quiero q quede en cursor en la misma linea del
registro que borre, el valor clrecno lo tomo arriba
::odbbrowse1:goto(clrecno)
ENDIF
El usuario con el que estoy trabajando tiene todos los derechos sobre la
tabla, asi q no creo que sea eso.
Saludos
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje
news:45a5fb11$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
> Fernado,
>
> Simplemente haz esto:
>
> IF MsgNoYes( "¿Desea suprimir el registro activo?" )
> ::oDataSet:Delete() // o oomo se llame el componente que soporta el
> Dataset
> ENDIF
>
> Saludos
> --
> Ignacio Ortiz de Zúñiga
> http://www.xailer.com
>
>
> "Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje
> news:45a5c911$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>> Buenas a todos.
>>
>> Estoy haciendo una aplicacion usando como base de datos oracle express
>> y TADODATASOURCE. El problema que tengo es que cuando elimino el registro
>> uso lo siguiente :
>>
>> IF MsgNoYes( "¿Desea suprimir el registro activo?" )
>> // ACA OBTENGO EL PAIS A BORRAR
>> clBorrar := ::osqltable1:pais
>> ::oAdoDataSource1:execute("Delete from t01_paises where
>> pais='"+clborrar+"'")
>> ::oDbBrowse1:Refresh()
>> ENDIF
>>
>> El problema es que por mas que quiero, luego de borrar el registro y le
>> doy el evento REFRESH() al TDBBROWSE, este me sigue mostrando los mismos
>> registros como si no esta borrado, sin embargo en la base de datos si veo
>> las tablas, el registro ya esta eliminado.
>>
>> Estoy haciendo algo mal ??
>>
>> En espera de ayuda ....
>>
>
>
IF MsgNoYes( "¿Desea suprimir el registro activo?" )
clBorrar := ::osqltable1:pais
clRecno := ::odbbrowse1:nrowsel
//::oSqlTable1:delete()
clSql := ::oAdoDataSource1:execute("Delete from t01_paises where
pais='"+clborrar+"'")
::osqltable1:refresh()
::odbBrowse1:refresh()
// esta linea porque quiero q quede en cursor en la misma linea del
registro que borre, el valor clrecno lo tomo arriba
::odbbrowse1:goto(clrecno)
ENDIF
El usuario con el que estoy trabajando tiene todos los derechos sobre la
tabla, asi q no creo que sea eso.
Saludos
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje
news:45a5fb11$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
> Fernado,
>
> Simplemente haz esto:
>
> IF MsgNoYes( "¿Desea suprimir el registro activo?" )
> ::oDataSet:Delete() // o oomo se llame el componente que soporta el
> Dataset
> ENDIF
>
> Saludos
> --
> Ignacio Ortiz de Zúñiga
> http://www.xailer.com
>
>
> "Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje
> news:45a5c911$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>> Buenas a todos.
>>
>> Estoy haciendo una aplicacion usando como base de datos oracle express
>> y TADODATASOURCE. El problema que tengo es que cuando elimino el registro
>> uso lo siguiente :
>>
>> IF MsgNoYes( "¿Desea suprimir el registro activo?" )
>> // ACA OBTENGO EL PAIS A BORRAR
>> clBorrar := ::osqltable1:pais
>> ::oAdoDataSource1:execute("Delete from t01_paises where
>> pais='"+clborrar+"'")
>> ::oDbBrowse1:Refresh()
>> ENDIF
>>
>> El problema es que por mas que quiero, luego de borrar el registro y le
>> doy el evento REFRESH() al TDBBROWSE, este me sigue mostrando los mismos
>> registros como si no esta borrado, sin embargo en la base de datos si veo
>> las tablas, el registro ya esta eliminado.
>>
>> Estoy haciendo algo mal ??
>>
>> En espera de ayuda ....
>>
>
>
-
ignacio
- Site Admin
- Mensajes: 9457
- Registrado: Lun Abr 06, 2015 8:00 pm
- Ubicación: Madrid, Spain
- Contactar:
Como Actualizar el TdbBrowse Despues de Borrar o Agregar Regristo
Fernando,
Intente hacer un ejemplo que corra sobre la base de datos neptuno.mdb que se
entrega en el directorio samplesdatacontrols, y nos lo manda.
Un saludo
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje
news:[email=45a7a9fd@news.xailer.com...]45a7a9fd@news.xailer.com...[/email]
> Ok, gracias. Ya lo probe pero ahora el error que me da es el siguiente
> del adjunto.
>
> TOLEAUTO:DELETE(0)
> ERROR ADODB.RECORDSET/16839 E_FAIL:DELETE
> ARGUMENTOS: ()
>
> "Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje
> news:45a5fb11$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>> Fernado,
>>
>> Simplemente haz esto:
>>
>> IF MsgNoYes( "¿Desea suprimir el registro activo?" )
>> ::oDataSet:Delete() // o oomo se llame el componente que soporta el
>> Dataset
>> ENDIF
>>
>> Saludos
>> --
>> Ignacio Ortiz de Zúñiga
>> http://www.xailer.com
>>
>>
>> "Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje
>> news:45a5c911$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>>> Buenas a todos.
>>>
>>> Estoy haciendo una aplicacion usando como base de datos oracle
>>> express
>>> y TADODATASOURCE. El problema que tengo es que cuando elimino el
>>> registro
>>> uso lo siguiente :
>>>
>>> IF MsgNoYes( "¿Desea suprimir el registro activo?" )
>>> // ACA OBTENGO EL PAIS A BORRAR
>>> clBorrar := ::osqltable1:pais
>>> ::oAdoDataSource1:execute("Delete from t01_paises where
>>> pais='"+clborrar+"'")
>>> ::oDbBrowse1:Refresh()
>>> ENDIF
>>>
>>> El problema es que por mas que quiero, luego de borrar el registro y le
>>> doy el evento REFRESH() al TDBBROWSE, este me sigue mostrando los mismos
>>> registros como si no esta borrado, sin embargo en la base de datos si
>>> veo
>>> las tablas, el registro ya esta eliminado.
>>>
>>> Estoy haciendo algo mal ??
>>>
>>> En espera de ayuda ....
>>>
>>
>>
>
>
>
Intente hacer un ejemplo que corra sobre la base de datos neptuno.mdb que se
entrega en el directorio samplesdatacontrols, y nos lo manda.
Un saludo
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje
news:[email=45a7a9fd@news.xailer.com...]45a7a9fd@news.xailer.com...[/email]
> Ok, gracias. Ya lo probe pero ahora el error que me da es el siguiente
> del adjunto.
>
> TOLEAUTO:DELETE(0)
> ERROR ADODB.RECORDSET/16839 E_FAIL:DELETE
> ARGUMENTOS: ()
>
> "Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje
> news:45a5fb11$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>> Fernado,
>>
>> Simplemente haz esto:
>>
>> IF MsgNoYes( "¿Desea suprimir el registro activo?" )
>> ::oDataSet:Delete() // o oomo se llame el componente que soporta el
>> Dataset
>> ENDIF
>>
>> Saludos
>> --
>> Ignacio Ortiz de Zúñiga
>> http://www.xailer.com
>>
>>
>> "Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje
>> news:45a5c911$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>>> Buenas a todos.
>>>
>>> Estoy haciendo una aplicacion usando como base de datos oracle
>>> express
>>> y TADODATASOURCE. El problema que tengo es que cuando elimino el
>>> registro
>>> uso lo siguiente :
>>>
>>> IF MsgNoYes( "¿Desea suprimir el registro activo?" )
>>> // ACA OBTENGO EL PAIS A BORRAR
>>> clBorrar := ::osqltable1:pais
>>> ::oAdoDataSource1:execute("Delete from t01_paises where
>>> pais='"+clborrar+"'")
>>> ::oDbBrowse1:Refresh()
>>> ENDIF
>>>
>>> El problema es que por mas que quiero, luego de borrar el registro y le
>>> doy el evento REFRESH() al TDBBROWSE, este me sigue mostrando los mismos
>>> registros como si no esta borrado, sin embargo en la base de datos si
>>> veo
>>> las tablas, el registro ya esta eliminado.
>>>
>>> Estoy haciendo algo mal ??
>>>
>>> En espera de ayuda ....
>>>
>>
>>
>
>
>
Ignacio Ortiz de Zúñiga
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
-
ignacio
- Site Admin
- Mensajes: 9457
- Registrado: Lun Abr 06, 2015 8:00 pm
- Ubicación: Madrid, Spain
- Contactar:
Como Actualizar el TdbBrowse Despues de Borrar o Agregar Regristo
Fernando,
No es la forma recomendable de hacerlo.
Un saludo
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje
news:[email=45a7aeff@news.xailer.com...]45a7aeff@news.xailer.com...[/email]
> Lo que si me funciona bien es :
>
> IF MsgNoYes( "¿Desea suprimir el registro activo?" )
> clBorrar := ::osqltable1:pais
> clRecno := ::odbbrowse1:nrowsel
>
> //::oSqlTable1:delete()
>
> clSql := ::oAdoDataSource1:execute("Delete from t01_paises where
> pais='"+clborrar+"'")
>
> ::osqltable1:refresh()
> ::odbBrowse1:refresh()
>
> // esta linea porque quiero q quede en cursor en la misma linea del
> registro que borre, el valor clrecno lo tomo arriba
> ::odbbrowse1:goto(clrecno)
> ENDIF
>
> El usuario con el que estoy trabajando tiene todos los derechos sobre la
> tabla, asi q no creo que sea eso.
>
> Saludos
>
> "Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje
> news:45a5fb11$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>> Fernado,
>>
>> Simplemente haz esto:
>>
>> IF MsgNoYes( "¿Desea suprimir el registro activo?" )
>> ::oDataSet:Delete() // o oomo se llame el componente que soporta el
>> Dataset
>> ENDIF
>>
>> Saludos
>> --
>> Ignacio Ortiz de Zúñiga
>> http://www.xailer.com
>>
>>
>> "Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje
>> news:45a5c911$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>>> Buenas a todos.
>>>
>>> Estoy haciendo una aplicacion usando como base de datos oracle
>>> express y TADODATASOURCE. El problema que tengo es que cuando elimino el
>>> registro uso lo siguiente :
>>>
>>> IF MsgNoYes( "¿Desea suprimir el registro activo?" )
>>> // ACA OBTENGO EL PAIS A BORRAR
>>> clBorrar := ::osqltable1:pais
>>> ::oAdoDataSource1:execute("Delete from t01_paises where
>>> pais='"+clborrar+"'")
>>> ::oDbBrowse1:Refresh()
>>> ENDIF
>>>
>>> El problema es que por mas que quiero, luego de borrar el registro y le
>>> doy el evento REFRESH() al TDBBROWSE, este me sigue mostrando los mismos
>>> registros como si no esta borrado, sin embargo en la base de datos si
>>> veo las tablas, el registro ya esta eliminado.
>>>
>>> Estoy haciendo algo mal ??
>>>
>>> En espera de ayuda ....
>>>
>>
>>
>
>
No es la forma recomendable de hacerlo.
Un saludo
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje
news:[email=45a7aeff@news.xailer.com...]45a7aeff@news.xailer.com...[/email]
> Lo que si me funciona bien es :
>
> IF MsgNoYes( "¿Desea suprimir el registro activo?" )
> clBorrar := ::osqltable1:pais
> clRecno := ::odbbrowse1:nrowsel
>
> //::oSqlTable1:delete()
>
> clSql := ::oAdoDataSource1:execute("Delete from t01_paises where
> pais='"+clborrar+"'")
>
> ::osqltable1:refresh()
> ::odbBrowse1:refresh()
>
> // esta linea porque quiero q quede en cursor en la misma linea del
> registro que borre, el valor clrecno lo tomo arriba
> ::odbbrowse1:goto(clrecno)
> ENDIF
>
> El usuario con el que estoy trabajando tiene todos los derechos sobre la
> tabla, asi q no creo que sea eso.
>
> Saludos
>
> "Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje
> news:45a5fb11$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>> Fernado,
>>
>> Simplemente haz esto:
>>
>> IF MsgNoYes( "¿Desea suprimir el registro activo?" )
>> ::oDataSet:Delete() // o oomo se llame el componente que soporta el
>> Dataset
>> ENDIF
>>
>> Saludos
>> --
>> Ignacio Ortiz de Zúñiga
>> http://www.xailer.com
>>
>>
>> "Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje
>> news:45a5c911$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>>> Buenas a todos.
>>>
>>> Estoy haciendo una aplicacion usando como base de datos oracle
>>> express y TADODATASOURCE. El problema que tengo es que cuando elimino el
>>> registro uso lo siguiente :
>>>
>>> IF MsgNoYes( "¿Desea suprimir el registro activo?" )
>>> // ACA OBTENGO EL PAIS A BORRAR
>>> clBorrar := ::osqltable1:pais
>>> ::oAdoDataSource1:execute("Delete from t01_paises where
>>> pais='"+clborrar+"'")
>>> ::oDbBrowse1:Refresh()
>>> ENDIF
>>>
>>> El problema es que por mas que quiero, luego de borrar el registro y le
>>> doy el evento REFRESH() al TDBBROWSE, este me sigue mostrando los mismos
>>> registros como si no esta borrado, sin embargo en la base de datos si
>>> veo las tablas, el registro ya esta eliminado.
>>>
>>> Estoy haciendo algo mal ??
>>>
>>> En espera de ayuda ....
>>>
>>
>>
>
>
Ignacio Ortiz de Zúñiga
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
-
Fernando Hernandez
- Mensajes: 113
- Registrado: Lun Nov 13, 2006 5:29 am
Como Actualizar el TdbBrowse Despues de Borrar o Agregar Regristo
OK, sobre access si me funciona, pero mi base de datos esta en Oracle
Express.
Saludos
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje
news:45ab3b46$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
> Fernando,
>
> Intente hacer un ejemplo que corra sobre la base de datos neptuno.mdb que
> se entrega en el directorio samplesdatacontrols, y nos lo manda.
>
> Un saludo
>
> --
> Ignacio Ortiz de Zúñiga
> http://www.xailer.com
>
>
> "Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje
> news:[email=45a7a9fd@news.xailer.com...]45a7a9fd@news.xailer.com...[/email]
>> Ok, gracias. Ya lo probe pero ahora el error que me da es el siguiente
>> del adjunto.
>>
>> TOLEAUTO:DELETE(0)
>> ERROR ADODB.RECORDSET/16839 E_FAIL:DELETE
>> ARGUMENTOS: ()
>>
>> "Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje
>> news:45a5fb11$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>>> Fernado,
>>>
>>> Simplemente haz esto:
>>>
>>> IF MsgNoYes( "¿Desea suprimir el registro activo?" )
>>> ::oDataSet:Delete() // o oomo se llame el componente que soporta el
>>> Dataset
>>> ENDIF
>>>
>>> Saludos
>>> --
>>> Ignacio Ortiz de Zúñiga
>>> http://www.xailer.com
>>>
>>>
>>> "Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje
>>> news:45a5c911$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>>>> Buenas a todos.
>>>>
>>>> Estoy haciendo una aplicacion usando como base de datos oracle
>>>> express
>>>> y TADODATASOURCE. El problema que tengo es que cuando elimino el
>>>> registro
>>>> uso lo siguiente :
>>>>
>>>> IF MsgNoYes( "¿Desea suprimir el registro activo?" )
>>>> // ACA OBTENGO EL PAIS A BORRAR
>>>> clBorrar := ::osqltable1:pais
>>>> ::oAdoDataSource1:execute("Delete from t01_paises where
>>>> pais='"+clborrar+"'")
>>>> ::oDbBrowse1:Refresh()
>>>> ENDIF
>>>>
>>>> El problema es que por mas que quiero, luego de borrar el registro y le
>>>> doy el evento REFRESH() al TDBBROWSE, este me sigue mostrando los
>>>> mismos
>>>> registros como si no esta borrado, sin embargo en la base de datos si
>>>> veo
>>>> las tablas, el registro ya esta eliminado.
>>>>
>>>> Estoy haciendo algo mal ??
>>>>
>>>> En espera de ayuda ....
>>>>
>>>
>>>
>>
>>
>>
>
>
Express.
Saludos
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje
news:45ab3b46$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
> Fernando,
>
> Intente hacer un ejemplo que corra sobre la base de datos neptuno.mdb que
> se entrega en el directorio samplesdatacontrols, y nos lo manda.
>
> Un saludo
>
> --
> Ignacio Ortiz de Zúñiga
> http://www.xailer.com
>
>
> "Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje
> news:[email=45a7a9fd@news.xailer.com...]45a7a9fd@news.xailer.com...[/email]
>> Ok, gracias. Ya lo probe pero ahora el error que me da es el siguiente
>> del adjunto.
>>
>> TOLEAUTO:DELETE(0)
>> ERROR ADODB.RECORDSET/16839 E_FAIL:DELETE
>> ARGUMENTOS: ()
>>
>> "Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje
>> news:45a5fb11$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>>> Fernado,
>>>
>>> Simplemente haz esto:
>>>
>>> IF MsgNoYes( "¿Desea suprimir el registro activo?" )
>>> ::oDataSet:Delete() // o oomo se llame el componente que soporta el
>>> Dataset
>>> ENDIF
>>>
>>> Saludos
>>> --
>>> Ignacio Ortiz de Zúñiga
>>> http://www.xailer.com
>>>
>>>
>>> "Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje
>>> news:45a5c911$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>>>> Buenas a todos.
>>>>
>>>> Estoy haciendo una aplicacion usando como base de datos oracle
>>>> express
>>>> y TADODATASOURCE. El problema que tengo es que cuando elimino el
>>>> registro
>>>> uso lo siguiente :
>>>>
>>>> IF MsgNoYes( "¿Desea suprimir el registro activo?" )
>>>> // ACA OBTENGO EL PAIS A BORRAR
>>>> clBorrar := ::osqltable1:pais
>>>> ::oAdoDataSource1:execute("Delete from t01_paises where
>>>> pais='"+clborrar+"'")
>>>> ::oDbBrowse1:Refresh()
>>>> ENDIF
>>>>
>>>> El problema es que por mas que quiero, luego de borrar el registro y le
>>>> doy el evento REFRESH() al TDBBROWSE, este me sigue mostrando los
>>>> mismos
>>>> registros como si no esta borrado, sin embargo en la base de datos si
>>>> veo
>>>> las tablas, el registro ya esta eliminado.
>>>>
>>>> Estoy haciendo algo mal ??
>>>>
>>>> En espera de ayuda ....
>>>>
>>>
>>>
>>
>>
>>
>
>
-
Fernando Hernandez
- Mensajes: 113
- Registrado: Lun Nov 13, 2006 5:29 am
Como Actualizar el TdbBrowse Despues de Borrar o Agregar Regristo
Gracias por la Ayuda.
Ya con los modulos actualizados, me funciono de maravilla tal como usted me
explico.
Saludos
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje
news:45abbd13$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>
>
> --
> Ignacio Ortiz de Zúñiga
> http://www.xailer.com
>
>
> "Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje
> news:[email=45abbcf8@news.xailer.com...]45abbcf8@news.xailer.com...[/email]
>> Fernando,
>>
>> Estoy convencido que el problema tiene que ver con las propiedades con
>> las
>> que abre el dataset, que posiblemente se esté abriendo en sólo lectura.
>> Desgraciadamente no tenemos dicho servidor SQL. Si hubiese la posibilidad
>> de
>> que acceder a su servidor a través de Internet podriamos probar
>> directamente
>> su ejemplo, y ver que está pasando. No obstante, le incluyo con este
>> mensaje
>> todos los módulos que se han cambiado para un mejor control de errorres.
>> Espero que le funcione correctamente pues son muchos los módulos que se
>> han
>> tocado y es posible que me falte alguno.
>>
>> Un saludo
>>
>> Nota: Un segundo archivo van en respuesta a su siguiente mensaje
>>
>> --
>> Ignacio Ortiz de Zúñiga
>> http://www.xailer.com
>>
>>
>>
>
>
>
Ya con los modulos actualizados, me funciono de maravilla tal como usted me
explico.
Saludos
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje
news:45abbd13$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>
>
> --
> Ignacio Ortiz de Zúñiga
> http://www.xailer.com
>
>
> "Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje
> news:[email=45abbcf8@news.xailer.com...]45abbcf8@news.xailer.com...[/email]
>> Fernando,
>>
>> Estoy convencido que el problema tiene que ver con las propiedades con
>> las
>> que abre el dataset, que posiblemente se esté abriendo en sólo lectura.
>> Desgraciadamente no tenemos dicho servidor SQL. Si hubiese la posibilidad
>> de
>> que acceder a su servidor a través de Internet podriamos probar
>> directamente
>> su ejemplo, y ver que está pasando. No obstante, le incluyo con este
>> mensaje
>> todos los módulos que se han cambiado para un mejor control de errorres.
>> Espero que le funcione correctamente pues son muchos los módulos que se
>> han
>> tocado y es posible que me falte alguno.
>>
>> Un saludo
>>
>> Nota: Un segundo archivo van en respuesta a su siguiente mensaje
>>
>> --
>> Ignacio Ortiz de Zúñiga
>> http://www.xailer.com
>>
>>
>>
>
>
>