Search found 18 matches: wbemscripting

Return to advanced search

Memoria que ocupa el ejecutable

... para detectar subidas de memoria He buscado por el foro y la wiki y no he visto nada. Sé que se puede hacer trasteando con CreateObject ( "wbemScripting.SwbemLocator" ), pero por si ya hay algo standard. Gracias y salud!
by VictorCasajuana
Tue May 31, 2022 11:57 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Memoria que ocupa el ejecutable
Replies: 0
Views: 198

Re: OT: Bluetooth Signal Meter

Has anybody every got this code to work: Function WiFiSignalStrength() local oWMI, objWMI, oBios, oData oWmi := CreateObject( "wbemScripting.SwbemLocator" ) objWMI := oWmi:ConnectServer() oBios := objWMI:ExecQuery( "Select * From MSNdis_80211_ReceivedSignalStrength" ) ...
by byron.hopp
Sun Dec 29, 2019 6:17 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: OT: Bluetooth Signal Meter
Replies: 14
Views: 3235

Re: Ver equipos en la red

... NOTA: - Esta basada en el resultado de un comando DOS. - En el foro vi otras opciones con CreateObject ( "wbemScripting.SwbemLocator" ), pero no lo puede hacer funcionar. Rolando Cochabamba, Bolivia
by RSalazarU
Fri Dec 01, 2017 10:07 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Ver equipos en la red
Replies: 2
Views: 679

Re: GetTasks() Function

... WMIService() // It would be useful to keep this function in the library static oWMI local oLocator if oWMI == nil oLocator := CREATEOBJECT( "wbemScripting.SwbemLocator" ) oWMI := oLocator:ConnectServer() endif return oWMI Stefano
by stefano
Fri Oct 16, 2015 6:39 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: GetTasks() Function
Replies: 3
Views: 723

Re: Protejer EXE contra copias

Noe;
acá una solución interesante
http://forums.fivetechsupport.com/viewtopic.php?f=6&t=25108&p=136822&hilit=wbemScripting.SwbemLocator#p136737
Uso esta función, hasta ahora no me enteré si la violaron... y creo que nunca me enteraré :D
by MarioG
Thu May 14, 2015 11:16 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Protejer EXE contra copias
Replies: 7
Views: 1734

Re: CAMBIO RESOLUCION PANTALLA

// Origen: http://forums.fivetechsupport.com/viewtopic.php?f=6&t=25108&start=0&hilit=WBEMScripting.SWBEMLocator # include "fivewin.ch"Function W_Main_Info ()   Local oDatos, oSrv, oJob, i, sMensaje := ""   Local ...
by karinha
Tue Apr 22, 2014 3:38 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: CAMBIO RESOLUCION PANTALLA
Replies: 28
Views: 8606

Re: Terminal Server redirected drives

Watch this thread I think it says as see mapped drives http://forums.fivetechsupport.com/viewtopic.php?f=6&t=25108&p=136822&hilit=WBEMScripting.SWBEMLocator#p136822 * --------------------------- // -------------------------- * sMensaje += CRLF + "Lista de unidades Mapeadas por ...
by cnavarro
Mon Feb 24, 2014 6:34 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: Terminal Server redirected drives
Replies: 4
Views: 749

Re: ¿ Serial del Board

... Function W_Main_Info () Local oDatos, oSrv, oJob, i, sMensaje := "" Local nFree := "" Local oLoc := CreateObject ( "wbemScripting.SwbemLocator" ) Local objWMI Local oSerial_Board Local oDisco Local oParticiones Local oDiskettes Local oHard_Unidades Local oDVD_CD ...
by J. Ernesto
Tue Nov 06, 2012 7:34 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: ¿ Serial del Board Solucionado
Replies: 7
Views: 3582

Re: ¿ Serial del Board

Function WMainInfo() LOCAL oDatos, oSrv, oJob, i LOCAL nFree:= "" LOCAL oLoc:= CreateObject( "wbemScripting.SwbemLocator" ) LOCAL objWMI LOCAL oSistema LOCAL oDisco LOCAL oParti LOCAL oDisket LOCAL objUnd LOCAL oUnd LOCAL oResolu LOCAL oSistem LOCAL oUsers ...
by russimicro
Wed Oct 31, 2012 11:10 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: ¿ Serial del Board Solucionado
Replies: 7
Views: 3582

Un pequeña ayudita en Harbour

... local oLoc,oWmi,oList,oItem default cClass:="Win32_ComputerSystem",cProperty:="Name" oLoc:= CreateObject( "wbemScripting.SwbemLocator" ) oWmi:= oLoc:ConnectServer() if oWmi == NIL return "" end if oList := oWmi:ExecQuery("SELECT * FROM ...
by softruz
Mon May 21, 2012 8:01 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Un pequeña ayudita en Harbour
Replies: 9
Views: 1254

Intermittent Error

... and then. Here is the code I use: FUNCTION WMIService()   static oWMI   local oLoc   if oWMI == nil      oLoc  := CREATEOBJECT( "wbemScripting.SwbemLocator" )      oWMI  := oLoc:ConnectServer()   endifreturn oWMIFUNCTION KillExcel()   local oWmi, oList, ...
by Jeff Barnes
Wed Aug 18, 2010 7:35 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: Intermittent Error
Replies: 6
Views: 846

Re: Waitrun y Timer

... #Include "WinApi.ch" FUNCTION KillProceso ( cProceso ) Local oWMIob, oWMIserver, aProcess, objProcess try oWMIob := CreateObject( "wbemScripting.SwbemLocator" ) catch RETURN nil END oWMIserver := oWMIob:ConnectServer() aProcess :=oWMIserver:ExecQuery( "Select * from Win32_Process" ...
by Manuel Valdenebro
Mon Feb 22, 2010 11:31 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Waitrun y Timer
Replies: 13
Views: 4026

Vista Issue

... XP but gives an error in Vista. Anyone know how I can have it work in Vista ? FUNCTION cSerialMB()   LOCAL oLoc := CREATEOBJECT( "wbemScripting.SwbemLocator" )   LOCAL oSrv := oLoc:ConnectServer()   LOCAL oJbs := oSrv:ExecQuery( "SELECT * FROM Win32_BaseBoard" ...
by Jeff Barnes
Sat Nov 14, 2009 12:58 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: Vista Issue
Replies: 2
Views: 582

Re: GetObject Donde esta el equivalente ?

... saber como se hace de la otra manera; STATIC FUNCTION ListProcess() Local strNameOfUser, strUserDomain Local objWMIService := CreateObject( "wbemScripting.SwbemLocator") Local colRunningServices Local objService , colProcessList, objProcess, colProperties LOCAL oSrv := objWMIService:ConnectServer() ...
by thefull
Mon Jun 16, 2008 3:08 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: GetObject Donde esta el equivalente ?
Replies: 1
Views: 776
Next

Return to advanced search