FiveTech Software tech support forums

... class to get the owner of the process. This information might help you identify the user who created the process. ```vbscript Set objWMIService = GetObject("winmgmts:\\.\root\cimv2") Set colProcesses = objWMIService.ExecQuery("Select * from Win32_Process Where Name = 'winword.exe'") ...

... ser fuente de problemas. Pero tampoco, porque antes de abrir hago copia del libro excel por cada usuario. Uso siempre CreateObject() y nunca GetObject() para intentar aislar los problemas de una instancia excel de otra instancia excel Para evitar que los errores durante el procesamiento del ...

have you tried:

hb_Run( "Reset-VM -Name "Windows 10_04_New" -Force" )

All, I am using some code I found on the web to reset a VM on Hyper-V. VBScript: Set sService = GetObject("winmgmts:\\.\root\virtualization") FWH: oWinMgmt := CreateObject("winmgmts:\\.\root\virtualization") oWinMgmt := GetActiveObject("winmgmts:\\.\root\virtualization") ...

... Thank's Baxajaun, the code must be: oRootDSE := CreateObject("LDAP://") I forgot to remove those parameter's, but all you get from GetObject or CreateObject is NIL :( .

Karinha

Obrigado pela resposta já havia baixado este código, mas não consigo validar a senha por ele.

Att
João Bosco

João, veja se te ajuda:

http://forums.fivetechsupport.com/viewtopic.php?f=3&t=26995&p=150642&hilit=Authenticated#p150642

abs.

... strUser, ByVal strPW) Const ADS_SECURE_AUTHENTICATION = 1 Const ADS_SERVER_BIND = 512 strPath = "LDAP://RootDSE" Set LDAP = GetObject(strPath) Set strAuth = LDAP.OpenDSObject(strPath, strUser, strPW, ADS_SECURE_AUTHENTICATION Or ADS_SERVER_BIND) If Err.Number <> 0 Then ...

en foxpro este codigo funciona, pero aca la funcion getobject es capaz de crear el objeto com. parece ser que [x]harbour no es capaz de crear este tipo de objetos. esto en la prueba que he realizado && Supprimer un usagerProcedure DeleteUser(tcUser)lcUserId ...

... Not rs.EOF    ' Bind to the object to make changes     ' to it because ADO is currently read-only.    MyUser = GetObject(rs.Fields(0).Value)    MyUser.AccountDisabled = True    MyUser.SetInfo    rs.MoveNextWend here: http://msdn.microsoft.com/en-us/library/aa746471%28v=vs.85%29.aspx ...

Amigos Estoy intentando reconstruir el easyreport y esto es el resultado que estoy obteniendo: MAKE Version 5.2 Copyright (c) 1987, 2000 Borland c:\fwh1302\bcc582\bin\brc32.exe -r -Ic:\fwh1302\bcc582\include ereport.rc Borland Resource Compiler Version 5.40 Copyright (c) 1990, 1999 Inprise Corporati...

... == 10) && bSelect ) { rct->bottom-- ; bFlag = TRUE ; } wWidth = rct->right - rct->left ; wHeight = rct->bottom - rct->top ; GetObject( hBmp, sizeof( BITMAP ), ( LPSTR ) &bm ); if ( wHeight > bm.bmHeight ) { wRow = rct->top + ( ( wHeight - bm.bmHeight ) / 2 ) ; wHeight ...

... == 10) && bSelect ) { rct->bottom-- ; bFlag = TRUE ; } wWidth = rct->right - rct->left ; wHeight = rct->bottom - rct->top ; GetObject( hBmp, sizeof( BITMAP ), ( LPSTR ) &bm ); if ( wHeight > bm.bmHeight ) { wRow = rct->top + ( ( wHeight - bm.bmHeight ) / 2 ) ; wHeight ...

... bmiD; LPBITMAPINFOHEADER lpSrcBits, lpDesBits; DWORD dwSizeScr; HANDLE hDibSrc; HDC dc, dcDes; BITMAP bm; HBITMAP hbmDes, hbmOldDes; INT j,i; GetObject( hbm, sizeof( BITMAP ), &bm ); // source bmiS = PrepareInfoHeader( ( WORD ) bm.bmWidth, ( WORD ) bm.bmHeight ); dwSizeScr = ( ( bm.bmWidth ...

... #pragma BEGINDUMP #include "Windows.h" #include "hbapi.h" HB_FUNC( GETDEFAULTFONTNAME ) { LOGFONT lf; GetObject( ( HFONT ) GetStockObject( DEFAULT_GUI_FONT ) , sizeof( LOGFONT ), &lf ); hb_retc( lf.lfFaceName ); } HB_FUNC( GETDEFAULTFONTHEIGHT ) ...