Angel Ferreira
unread,Apr 15, 2011, 9:15:29 AM4/15/11Sign in to reply to author
Sign in to forward
You do not have permission to delete messages in this group
Either email addresses are anonymous for this group or you need the view member email addresses permission to view the original message
to Comunidad de Visual Foxpro en Español
Buenos dias,
Amigos estoy utilizando WMI para acceder a recursos de un servidor
Win2003 Server.
La rutina habia funcionado perfectamente durante muchos meses sin
presentar problemas.
Sin embargo, ahora, cuando la aplicacion se ejecuta desde el
Servidor, VFP me indica el error: El Moniker no puede abrir el
archivo.
Aun asi, la misma rutina no falla desde una estacion de trabajo.
Si estoy en el Server uso lo siguiente:
------------------------------------------------------
LOCAL lcPC
lcPC = ALLTRIM(UPPER(Substr(Sys(0), 1,At("#", Sys(0))-1)))
RETURN GETOBJECT("winmgmts:\\" + lcPC + "\root\CIMV2")
Si estoy en una estacion de trabajo, es el siguiente codigo:
---------------------------------------------------------------------------------------
objLocalizadorWMI = CreateObject("WbemScripting.SWbemLocator")
RETURN objLocalizadorWMI.ConnectServer("NOMBRE DEL SERVIDOR", "root
\cimv2","USUARIO", "PASSWORD")
Lo extrano es que como les comentaba, todo iba de maravilla con este
codigo. Lo unico diferente que he realizado, es que antes la
aplicacion estaba en VFP8 y la he migrado a VFP9.
Si alguien tiene idea de porque se presenta este tipo de error y como
resolverlo, mucho se lo agradeceria.
Saludos,
Angel Ferreira.