Fivewinners
A proposito del error que encontre con una de mis app, encontre una situacion rara.
FWH o Harbour no lee o reconoce los _ por NET USE
Si hago esto antes de entrar a mi sistema
C:\>Net Use LPT1: \\127.0.0.1\NOMBREIMPRESORA /PERSISTENT:YES
C:\>Net Use
la informacion de captura y redireccionamiento de LPT1 a la impresora si aparece
Pero si llamo a NET USE desde adentro de cualquier aplicacion en FWH/Harbour, pues el puerto no aparece capturado
Ej
cComando:="Net Use>>resultado.txt"
WaitRun(cComando,0)
Veran que no aparece capturado nuestro LPT1 si revisan resultado.txt, por eso no lo "hereda" a la aplicacion que llama mi bat por ejemplo.
Para poder hacer funcionar mi .bat, tuve que poner antes de la llamada al comando del servicio una llamada a NET USE
Asi que queda de la siguiente manera el DO.BAT
Net Use LPT1: \\127.0.0.1\Tickets
reply.exe "archivo.txt" "nolog" "url:127.0.0.1">>exito.txt
Es un parche, no deberia ser asi ... a ver si alguien me ilumina porque se comporta asi mi aplicacion
Harbour 3 y FWH 17.06 en un Windows 10 Profesional 64 bits
Saludos desde Chile
Error Harbour y FWH con NET USE.. Antonio?
Error Harbour y FWH con NET USE.. Antonio?
Ji,ji,ji... buena la cosa... "all you need is code"
http://www.xdata.cl - Desarrollo Inteligente
----------
Lenovo Legion Y520, 16GB Ram, 1 TB NVME M.2, 1 TB SSD, GTX 1050
http://www.xdata.cl - Desarrollo Inteligente
----------
Lenovo Legion Y520, 16GB Ram, 1 TB NVME M.2, 1 TB SSD, GTX 1050
- Antonio Linares
- Site Admin
- Posts: 37481
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Contact:
Re: Error Harbour y FWH con NET USE.. Antonio?
Antonio... habia solucionado mi problema con un parche, pero la velocidad del proceso me esta complicando.
Cuando llamo al bat, la primera linea es net use LPT1 \\127.0.0.1\BOLETAS /PERSISTENT:YES
luego procede a seguir y todo funciona, pero debo esperar a que net use realice el redireccionamiento para hacer lo otros procesos
Cree el autoexec.nt en el directorio c:\windows\system32 con la linea necesaria, al reinicar y consultar en una ventana de CMD, net use esta 100% operativo, pero dentro de la app FWH NO
Una prueba sencilla.
en una ventana CMD hagan una captura de puerto con este ejemplo (la impresora debe estar compartida)
net use LPT1 \\127.0.0.1\nombre_impresora /PERSISTENT:YES
para probar que esta funcional, ejecutar lo siguiente
net use
aparece el recurso inicializado.. sin cerrar la ventana del CMD llamen a una app de prueba, creen esta llamada dentro de su app
Winexec("c:\windows\system32\cmd.exe",1)
al interior de esa ventana ejecuten NET USE
No aparece la impresora redireccionada... porque?
Sin embargo si abro nuevamente una ventana CMD, varias en mi caso, distintas a la original y hago el net use, aparece bien el redireccionamiento en todas.
Mi S.O. es WINDOWS 10 HOME SINGLE LANGUAJE, 64 Bits
Probe en WINDOWS 10 PRo 64 Bits, y pasa lo mismo
Cuando llamo al bat, la primera linea es net use LPT1 \\127.0.0.1\BOLETAS /PERSISTENT:YES
luego procede a seguir y todo funciona, pero debo esperar a que net use realice el redireccionamiento para hacer lo otros procesos
Cree el autoexec.nt en el directorio c:\windows\system32 con la linea necesaria, al reinicar y consultar en una ventana de CMD, net use esta 100% operativo, pero dentro de la app FWH NO
Una prueba sencilla.
en una ventana CMD hagan una captura de puerto con este ejemplo (la impresora debe estar compartida)
net use LPT1 \\127.0.0.1\nombre_impresora /PERSISTENT:YES
para probar que esta funcional, ejecutar lo siguiente
net use
aparece el recurso inicializado.. sin cerrar la ventana del CMD llamen a una app de prueba, creen esta llamada dentro de su app
Winexec("c:\windows\system32\cmd.exe",1)
al interior de esa ventana ejecuten NET USE
No aparece la impresora redireccionada... porque?
Sin embargo si abro nuevamente una ventana CMD, varias en mi caso, distintas a la original y hago el net use, aparece bien el redireccionamiento en todas.
Mi S.O. es WINDOWS 10 HOME SINGLE LANGUAJE, 64 Bits
Probe en WINDOWS 10 PRo 64 Bits, y pasa lo mismo
Ji,ji,ji... buena la cosa... "all you need is code"
http://www.xdata.cl - Desarrollo Inteligente
----------
Lenovo Legion Y520, 16GB Ram, 1 TB NVME M.2, 1 TB SSD, GTX 1050
http://www.xdata.cl - Desarrollo Inteligente
----------
Lenovo Legion Y520, 16GB Ram, 1 TB NVME M.2, 1 TB SSD, GTX 1050