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.

Error con TWebDataSource()

Foro público de Xailer en español
Responder
michaelp
Mensajes: 23
Registrado: Vie Feb 14, 2025 8:42 pm

Error con TWebDataSource()

Mensaje por michaelp »

Buenas Tardes :
Hace poco actualiza a la version XAILER 9.2

Tengo el siguiente codigo para conectarme a una base de datos en mi servidor
WITH OBJECT ::oSqlregistro := TWebDataSource():New( Self )
:cConnect := "https://www.midominio.com/"
:cdatabase := "miwebo_registro"
:cPhpModule := "tdata/xa_wdsMySql.php"
:cCryptKey := "1234"
:lConnected := .T.
:nDBType := dtMYSQL
:nPort := inetHTTPS
:Create()
END
Este es el error que obtengo TDATASOURCE:NEWERROR(213)
Error XAILER/0 URL inacessible: WEBDB:oConnection:CheckConnection( 'https://www.midominio.com/tdata' )
Argumentos: ()

He hecho las pruebas de conectarme a : https://www.midominio.com/tdata/xa_wdsMySql.php
Obtengo esto : 504f5354206461746120656d7074793a204572726f72206f6e20506f7374526571756573742073746174656d656e74

con curl obtengo esto
HTTP/1.1 200 OK
Date: Wed, 12 Mar 2025 23:21:26 GMT
Server: Apache
Upgrade: h2,h2c
Connection: Upgrade
Vary: Accept-Encoding
Content-Type: text/html; charset=UTF-8

Antes con la versión antigua en php 7 y xharbour funcionaba perfecto ,
mi servidor usa actualmente - PHP 8.1 (ea-php81) por lo que me indicaba deprecated
Por lo que actualice el archivo /xa_wdsMySql.php de la versión 9 enterprise. Y no logro hacerlo funcionar

Alguien podría indicarme que estoy haciendo mal?
michaelp
Mensajes: 23
Registrado: Vie Feb 14, 2025 8:42 pm

Re: Error con TWebDataSource()

Mensaje por michaelp »

Solucionado :

WITH OBJECT ::oSqlregistro := TWebDataSource():New( Self )
:cConnect := "www.midominio.com"
:cdatabase := "miwebo_registro"
:cPhpModule := "tdata/xa_wdsMySql.php"
:cCryptKey := "1234"
:nDBType := dtMYSQL
:nPort := inetHTTPS
:lConnected := .T.
:Create()

Simplemente : lconnected al final y el dominio solo
Responder