Novato en MySQL
Publicado: Jue Jun 28, 2007 5:24 pm
Bien, pus casi que me decido a hacer una pequena aplicación que me han
encargado en MySQL, por lo que necesito de vuestra ayuda...
La consulta mediante SELECT... creo que lo voy entendiendo, ahora bien...
Necesito borrar TODOS los registros de una tabla... para ello he probado ...
WITH OBJECT oAdoDataSource1 := TAdoDataSource():New()
:cConnect := "ODBC;DATABASE=bristol2000;DRIVER=MySQL ODBC 3.51
Driver;PORT=3306;SERVER=xevicomas.dyndns.org;UID=Usuario;PWD =Password "
:lConnected := .T.
:Create()
END
WITH OBJECT oSQLQuery1 := TSQLQuery():New()
:oDataSource := oAdoDataSource1
:cProcess := "GENERAL"
:cSelect := "DELETE * FROM perfils"
:lOpen := .T.
:Create()
END
Pero como suponía NO ME FUNCIONA.
Gracias.
Un Saludo,
Xevi.
encargado en MySQL, por lo que necesito de vuestra ayuda...
La consulta mediante SELECT... creo que lo voy entendiendo, ahora bien...
Necesito borrar TODOS los registros de una tabla... para ello he probado ...
WITH OBJECT oAdoDataSource1 := TAdoDataSource():New()
:cConnect := "ODBC;DATABASE=bristol2000;DRIVER=MySQL ODBC 3.51
Driver;PORT=3306;SERVER=xevicomas.dyndns.org;UID=Usuario;PWD =Password "
:lConnected := .T.
:Create()
END
WITH OBJECT oSQLQuery1 := TSQLQuery():New()
:oDataSource := oAdoDataSource1
:cProcess := "GENERAL"
:cSelect := "DELETE * FROM perfils"
:lOpen := .T.
:Create()
END
Pero como suponía NO ME FUNCIONA.
Gracias.
Un Saludo,
Xevi.