求VB访问远程服务器的方法

各位大侠好，现在公司要做一个监控程序，要求远程访问各台服务器，但现在手上只有本机监控的一段代码，求远程访问的方法。下面是VB代码：

    '本地电脑   
     strComputer = "."  
  
    '连接到本地电脑   
    Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")   

    Set colItems = objWMIService.InstancesOf("Win32_LogicalMemoryConfiguration") 
     
    '总计物理内存   
    For Each colItem In colItems   
         dwTotalMem = CLng(colItem.TotalPhysicalMemory / 1024)   
         MyFile.WriteLine("总计物理内存: " )   
    Next   VB 服务器 --------------------编程问答-------------------- 找个这类的监控软件，不用自己专门做那么麻烦
当然也是可以做的，只是开发要成本的 --------------------编程问答--------------------   '本地电脑   
     strComputer = "."  
  
    '连接到本地电脑   
    Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")   

    Set colItems = objWMIService.InstancesOf("Win32_LogicalMemoryConfiguration") 
     
    '总计物理内存   
    For Each colItem In colItems   
         dwTotalMem = CLng(colItem.TotalPhysicalMemory / 1024)   
         MyFile.WriteLine("总计物理内存: " )   
    Next   
这里本地电脑用一个"."代表，你换成局域网的电脑名称，或远程外省电脑的服务器IP试下
--------------------编程问答-------------------- 估计你给搞懂自己用的是什么技术，而这种技术是基于什么运行的。
告诉你吧，你用的叫 WMI，是基于系统的 WMI 服务而运作的。而 WMI 服务在 Win2000 以上的系统都是自带的一个服务，支持网络。所以你可以通过网络访问远程的WMI服务取得或设置相关的信息，但同时也要通过远程计算机的安全配置才可以，所以你的远程计算机必须先配置好 WMI 的安全权限，具体的设置你可以在“控制面板\管理工具\计算机管理”中找到WMI服务的配置。连接WMI前先用配置好的权限登录远程计算机，如用 net 命令先登录，例： Shell "cmd /c net use \\192.168.1.77 /user:administrator 12345"
然后再进行WMI的连接，例：
Set objWMIService = GetObject("winmgmts:\\192.168.1.77\root\cimv2")
...
其他的就和你本地操作差不多了。如果不能访问，就是你的安全配置不正确，这方面具体的操作你可以下载一个 WMI SDK 来看看。 --------------------编程问答-------------------- 多谢3楼，我这就去试试

补充：VB ,  网络编程