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.
error GPF (Code = c0000005)
error GPF (Code = c0000005)
buenas tardes junto con saludar les comento que me encuentro pasando mis programas a BD.
Para esto instale MARIADB y estoy trabajando con localhost.
El problema que se me presenta es que al agregar registro en una tabla me da un error y no se porque se produce.
Por favor alguien que me pueda ayudar, a continuación adjunto rutina de grabación
STATIC FUNCTION GrabaMensaje( oSqlHisChat, cMensaje, cUsuEnvio)
Local FechaHoy := DToS(Date())
With Object oSqlHisChat
IF :lOpen
:Close()
End IF
:cSelect := "Select * From HISCHAT Where Empresa = 1 and fecha = '"+FechaHoy+"' "
:Open()
:AddNew()
:Empresa := appdata:pcodempre
:Usuario := appdata:pUsuario
:UsuEnvio := cUsuEnvio
:Fecha := Date()
:Hora := Time()
:Mensaje := " " //cMensaje
:Update()
End With
Return Nil
Para esto instale MARIADB y estoy trabajando con localhost.
El problema que se me presenta es que al agregar registro en una tabla me da un error y no se porque se produce.
Por favor alguien que me pueda ayudar, a continuación adjunto rutina de grabación
STATIC FUNCTION GrabaMensaje( oSqlHisChat, cMensaje, cUsuEnvio)
Local FechaHoy := DToS(Date())
With Object oSqlHisChat
IF :lOpen
:Close()
End IF
:cSelect := "Select * From HISCHAT Where Empresa = 1 and fecha = '"+FechaHoy+"' "
:Open()
:AddNew()
:Empresa := appdata:pcodempre
:Usuario := appdata:pUsuario
:UsuEnvio := cUsuEnvio
:Fecha := Date()
:Hora := Time()
:Mensaje := " " //cMensaje
:Update()
End With
Return Nil
- Adjuntos
-
- tabla.png (62.17 KiB) Visto 3418 veces
Re: error GPF (Code = c0000005)
Hola..
Primeramente tienes que crear el datasource MySQL o MariaDB, por lo que veo estas usando ADO
Despues que hayas creado el DataSource tienes que asignarselo a cada DataSet que uses
Saludos!
Primeramente tienes que crear el datasource MySQL o MariaDB, por lo que veo estas usando ADO
Código: Seleccionar todo
WITH OBJECT AppData:oMySQLDS:= TMySQLDataSource():New() // TMariaDBDataSource():New()
:cHost:= AllTrim(::oSQLEmpresas:servidor_ip)
:cPassword:= AllTrim(::oSQLEmpresas:servidor_password)
:cUser:= AllTrim(::oSQLEmpresas:servidor_user)
:cDataBase:= AllTrim(::oSQLEmpresas:servidor_db)
:nPort:= 3306
:lConnected:= .F.
:lDisplayErrors:= .F.
:Create()
END
Código: Seleccionar todo
WITH OBJECT ::oSQLProductos
:Close()
:oDataSource:= AppData:oMySQLDS // AQUI ESTA EL DATASOURCE MySQL o MariaDB
:cSelect:= "SELECT * FROM productos"
:lOpen:= .T.
IF ! :lOpen
msgstop("NO SE PUDO ABRIR")
RETURN NIL
ENDIF
END WITH
Re: error GPF (Code = c0000005)
hola
lo que me indicas ya esta incluido dentro del programa y se encuentra funcionando. El problema se presenta al grabar. de hecha alcanza a grabar el primer registro y al grabar el segundo da el error
adjunto datos.
lo que me indicas ya esta incluido dentro del programa y se encuentra funcionando. El problema se presenta al grabar. de hecha alcanza a grabar el primer registro y al grabar el segundo da el error
adjunto datos.
- Adjuntos
-
- datos.jpg (119.08 KiB) Visto 3378 veces
-
- estructura.jpg (170.25 KiB) Visto 3378 veces
Re: error GPF (Code = c0000005)
El formato de MariaDB (SQL) es año/mes/dia
yo tengo esa función... igual hay alguna (seguro que la hay)
como el formato que utilizo en mis aplicaciones es
Set( _SET_DATEFORMAT, "dd/mm/yyyy" )
yo tengo esa función... igual hay alguna (seguro que la hay)
como el formato que utilizo en mis aplicaciones es
Set( _SET_DATEFORMAT, "dd/mm/yyyy" )
Código: Seleccionar todo
Function xDateSQL( c )
IF( ValType(c) = "D", c := DToC(c), )
RETURN Right(c,4) +"/"+ SubStr(c,4,2) +"/"+ Left(c,2)
Un Saludo,
Xevi.
Xevi.
Re: error GPF (Code = c0000005)
Hola yo tuve algunos inconvenientes usando los objetos dataset, así que opté por grabar directo, pero en el caso que muestras, sugiero reemplaces :Addnew() por :fastaddnew() y :update() por :fastupdate() la diferencia es que el primero se usa cuando vas a editar el registro mediante captura y el otro es para grabar directo al dataset. para mi fue más fácil usando la instrucción:
cCodigo:=::oMaria:buildsqlst("Insert into tabla valor1,valor2,valor3 values(?,?,?)",datonumero,datocaracter,datofecha)
::oMaria:execute(cCodigo)
si tu registro tiene más campos debes cuidar los valores por default de cada uno de ellos cuando creas la tabla, si los dejas como default null después tienes problemas cuando los trabajas en xailer.
cCodigo:=::oMaria:buildsqlst("Insert into tabla valor1,valor2,valor3 values(?,?,?)",datonumero,datocaracter,datofecha)
::oMaria:execute(cCodigo)
si tu registro tiene más campos debes cuidar los valores por default de cada uno de ellos cuando creas la tabla, si los dejas como default null después tienes problemas cuando los trabajas en xailer.
Saludos
Héctor García
Héctor García
Re: error GPF (Code = c0000005)
Para Xevi
el formato de para Maria es yyyy-mm-dd y se puede enviar con la función dtosql(date()) si usas el objeto dataset de Xailer hace la conversión automáticamente a partir del cualquier campo fecha
el formato de para Maria es yyyy-mm-dd y se puede enviar con la función dtosql(date()) si usas el objeto dataset de Xailer hace la conversión automáticamente a partir del cualquier campo fecha
Saludos
Héctor García
Héctor García
Re: error GPF (Code = c0000005)
Muchas gracias por las sugerencias probare y veré que sucede
Muchas Gracias
Muchas Gracias