FiveTech Software tech support forums

Hola,
Les comento un poco cuál es mi requerimiento y ver si mod_harbour acomoda para ello.

En la empresa tenemos un software comercial que utiliza el motor de datos MSSQL, lo que hacemos es mediante consultas y programación obtener algunos reportes especializados que no están integrados en el software, me gustaría llevar eso a la web; es decir de manera interna para visualizar dashboard (dirección, gerencia) ya saben de las ventas, compras, flujo efectivo, etc. pero mi gran pregunta es cómo llevo eso a la web si no puedo por cuestiones del funcionamiento del software colgar la base de datos en la red, sino que la BD está en nuestro servidor local, luego entonces pregunto cómo se puede implementar esto con mod_harbour, qué posibilidades hay con este escenario que planteo.

También algo que me gustaría es un formulario en el cual los agentes de ventas que andan en ruta en varios puntos de la ciudad, puedan capturar un pedido de venta, o puedan consultar la existencia/precio de un producto o el estatus de crédito de un cliente, etc. todo eso ya está resuelto con consultas sql que ya realicé, el tema es cómo integrar con mod_harbour de manera que si el director de la empresa está de viaje y quiere consultar las ventas lo pueda hacer.

Esa sería mi inquietud inicial para ver si por la forma de trabajar mod_harbour es para mi.

Saludos,
Javier

Javier,

muy sencillo

Puedes instalar mod_harbour en el mismo servidor donde está MSSQL ó en otro que tenga acceso a él y ya puedes hacer lo que quieras, accesible por intranet ó
por internet desde el exterior

Quieres usar Apache para Windows ó Microsoft IIS ?

Ambas opciones te sirven

Antonio,
De momento Apache para Windows, desde un equipo que tiene acceso al server donde está instalado MSSQL.

Supongo la conexión sería via ADO correcto?, bueno cómo empiezo, es decir para simplemente para testear la conexión y luego qué lectura recomiendas para ir yendo un poco más allá?.

Saludos,
Javier

Javier,

Instala Apache para Windows 64 desde aqui:
https://www.apachehaus.com/downloads/httpd-2.4.43-o111g-x64-vc15.zip

Luego instala mod_harbour usando esta versión (mod_harbour.so y libharbour.dll):
https://github.com/FiveTechSoft/mod_harbour/tree/master/windows/win64

Sigue estas indicaciones:
https://github.com/FiveTechSoft/mod_harbour/blob/master/windows/win64/readme.md

Una vez te funcione, te indico el siguiente paso

Antonio,
Después de seguir lo que me indicas me despliega:

mod_harbour version May 25 2020, 09:52:00
c:\Apache24\htdocs\libharbour.dll
No se puede encontrar el módulo especificado.
failed to load hb_apache()

lo que hice diferente fue que me daba problemas con el puerto 80 y cambié por 8080 en el httpd.conf

Qué me faltó?.

Saludos,
Javier

Javier,

Posiblemente tengas el IIS instalado y activo.

Desde el navegador ve a localhost y dime que te aparece

Hola Antonio,

Es correcto IIS está instalado, por eso edité el archivo httpd.conf para que utilice el puerto 8080, hay algún problema o restricción de algún tipo si IIS está instalado?, no pueden converger IIS/Apache con mod_harbour?, qué más puedo intentar Antonio?.

Gracias.

Saludos,
Javier

Javier,

Puedes usar ambos, sin problemas

Usa esta versión nueva y copia las DLLs que vienen en la carpeta bin a la carpeta c:\Apache24\bin

https://github.com/FiveTechSoft/mod_harbour/releases/download/3.0/modharbour_win64_msvc_2020_05_27.zip

Hola Antonio,
Con esto que me indicaste funcionaron algunos ejemplos, que no todos, pero bueno supongo que será algo particular que resolver de los ejemplos que no funcionaron...

Bien ahora que mod_harbour me funciona y regresando a mi necesidad inicial, cuál es la recomendación?, qué sigue? sin perder el foco de donde quiero llegar.

Gracias por tu tiempo.

Saludos,
Javier

Javier,

Ahora prueba a crear una conexión ADO a MSSQL desde mod_harbour:

Code: Select all  Expand view

#define adUseClient 3

function Main()

   local cServer := "DESKTOP-TU_ID_DESKTOP\MSSQL"
   local cDB := "NOMBRE_BASE_DE_DATOS"
   local cUser := "nombre_usuario"
   local cPwd := "tu_password"
   local cStr
   local oCn := win_oleCreateObject( "ADODB.Connection" )

   cStr  := "Provider="        + cProvider + ";" + ;
            "Data Source="     + cServer + ";" + ;
            "Initial Catalog=" + cDB     + ";" + ;
            "User ID="         + cUser   + ";" + ;
            "Password="        + cPwd    + ";"

   WITH OBJECT oCn
      :ConnectionString := cStr
      :CursorLocation   := adUseClient
      :Open()
   END

   ? "ok"

   oCn:Close()

return nil
 

Hola Antonio,

La conexión funciona, sólo agregué el provider que en mi caso es:

Code: Select all  Expand view

local cProvider := "SQLNCLI11"

Cómo sigo avanzando?.

Saludos,
Javier

Javier,

Revisa el ejemplo adosql.prg en mod_harbour:

https://github.com/FiveTechSoft/mod_harbour/blob/master/samples/ado/adosql.prg

Te agradecemos si compartes tus avances con todos aqui