代码搜索：GetObject
找到约 680 项符合「GetObject」的源代码
代码结果 680
www.eeworm.com/read/104928/15681401
vbs sol10-12.vbs
Dim objServices, nResult, objFile
'connect to remote computer Odin
Set objServices = GetObject("winmgmts:{impersonationLevel=impersonate}!\\Odin")
'get a reference to file reports.doc
Set objF
www.eeworm.com/read/104928/15681410
vbs sol15-3b.vbs
Dim objService, objFTPSite, objVirtDir
'get a reference to the FTP service on server Thor
Set objService = GetObject("IIS://thor/MSFTPSVC")
'create a new FTP site and assign it the value of 6
www.eeworm.com/read/485264/6556930
bas modexp.bas
Attribute VB_Name = "modExp"
Option Explicit
Public Function scanHDs(tvhd As TreeView)
Busy
Dim a As Object, b As Object, c As Object
Set a = GetObject("winmgmts:{ImpersonationLevel=Impersonat
www.eeworm.com/read/402236/11540300
txt 代码.txt
// Getting bitmap size
/*BITMAP bm;
GetObject(m_hBitmap, sizeof(BITMAP), &bm);
// Creating new bitmap and receive pointer to it's bits.
HBITMAP hTargetBitmap;
void *pBuffer;
in
www.eeworm.com/read/193290/8241063
java randomstrategy.java
package ServerImpl;
import java.util.*;
public class randomStrategy implements Strategy{
Hashtable unused=null;
ArrayList list=new ArrayList();
public Object getObject(String id, Reso
www.eeworm.com/read/193290/8241073
java lastusedstrategy.java
package ServerImpl;
import java.util.*;
public class lastUsedStrategy implements Strategy {
Hashtable unused=null;
ArrayList list=new ArrayList();
public Object getObject(String id, R
www.eeworm.com/read/104928/15681234
vbs sol12-10.vbs
Dim objWebems, objWeb, objWebem, sMsg, st, objMail
Set objWebem = GetObject("winmgmts:\\")
Set objWebems = objWebem.ExecQuery("SELECT TimeWritten, EventIdentifier " & _
", Message FROM Win32
www.eeworm.com/read/372590/9502422
bat win2000关机命令.bat
@echo off
setlocal
cd/d %temp%
echo Set colOperatingSystems = GetObject("winmgmts:{(Shutdown)}").ExecQuery("Select * from Win32_OperatingSystem") >shutdown.vbs
echo For Each objOperatingSystem
www.eeworm.com/read/276847/10701952
bas gridspacing.bas
Sub Main
Debug.Print "----- ";Time;" -----"
On Error GoTo createnew
Set Surf = GetObject(, "Surfer.Application")
On Error GoTo 0
GoTo skipnew
createnew:
Set Surf = CreateObject("Surfe
www.eeworm.com/read/349925/10781260
bat win2000关机命令.bat
@echo off
setlocal
cd/d %temp%
echo Set colOperatingSystems = GetObject("winmgmts:{(Shutdown)}").ExecQuery("Select * from Win32_OperatingSystem") >shutdown.vbs
echo For Each objOperatingSystem