对于玩终端服务的玩家,瘦客户机这个名称应该比较熟,或者说,并不陌生。
一套键鼠,一个显示器,一个网线,里面一个tiny的系统,系统中最重要的当然是终端服务的客户端软件,连接服务器上的程序,就可以了。这种瘦客户机成本低,耗电低,是值得考虑的东西。
推荐了这么久,说了这么多,大家可能想知道有谁都在用。举个例吧,大家都熟的,10086移动客服号,我们这里不是说大家如何去骚扰移动客服,只是说,10086就是用的瘦客户机。
说了瘦客户机这么多的好处,举了个NB的成功案例,大家可能激动了,是不是也要搞一套来玩下。说实话,要玩下,是可以,真正要用到公司,那公司刚买的机器怎么办,那些买了一年的机器怎么办?扔了,不现实,便宜卖了,你当老板是傻瓜啊。所以说,虚拟化是一个循序渐进的过程,是一个等待的过程,同时是一个不可逆转的过程。
这个渐进的过程当中,或许就包括我们今天的一个主题,将旧的机器改造成瘦客户机。有些机器老了,有些应用跑不动了,我们把它改造一下,配合使用终端服务,它又可以续几年的命了。
怎么改造,有现成的方法,用第三方的软件,这里给一个http://thinlaunch.com/的软件,你把这个软件在旧机器上装好了,开机登录后只运行mstsc程序就行了,不过这个付费的,我们可以玩玩,长长见识。
另外一个方法,就是利用组策略和脚本来做。我们先来描述一下做成以后的情况:
当用户在客户端登录时,会打开一个IE程序,IE程序默认主页是TS WEB ACCESS网页,我们登录后,就会在网页上出现我们发现的程序,客户端直接使用就行了。在这个过程当中,用户把IE关了,系统会自动打开一个新的IE程序。要做到这一点,我们分几步走一走:
1、核心的功能,就是关了IE再开,这个我们通过一个脚本来完成,脚本的原理介绍下,启动脚本,打开IE,监视IE进程,关了,就在启动,没关,就歇着,最后,让脚本华丽的登场
On Error Resume Next
Set WshShell = WScript.CreateObject ("WScript.Shell")

'Get the username and profile directory
MUser = WshShell.ExpandEnvironmentStrings ("%USERNAME%")

'Run the app
Itrue = True
Do until Itrue = false
wshShell.Run "iexplore.exe"

' Connect to wmi
set objWMIService = GetObject("winmgmts:root\cimv2")
Do
    found = false
' List the processes
strQuery = "Select * from win32_process where name='iexplore.exe'"
set colProcesses = objWMIService.ExecQuery(strQuery)

for each proc in colProcesses

     ' Get the reference class linking processes to sessions to get the session object path
     strQuery = "References of {win32_process.handle='" & proc.handle & "'} where ResultClass=Win32_SessionProcess"
     set colSessionReferences = objWMIService.ExecQuery(strQuery)

     for each oSessionReference in colSessionReferences
            'Get associators of the session object that are user accounts (linked by win32_loggedonuser)
            strQuery = "Associators of {" & oSessionReference.antecedent & "} where AssocClass=win32_LoggedOnUser"
            set colUsers = objWMIService.ExecQuery(strQuery,,48)
                for each user in colUsers
                 if user.name = MUser then found = true
                 Itrue = True
            next
     next
next
Loop While found = true
Loop
 
2、利用组策略去把用户桌面的东西都干掉,包括桌面图标啊,控制面板啊,什么的,这一个,熟悉组策略的玩家,算是轻车熟路了,不熟悉的,也没关系,微软给了一篇文档,照抄照做,保你没事,给文档的链接
 
 
完成以上的操作,再去客户端登录看一下,就可以达成心愿,心愿达成了,老机器还可以伴我们风雨同路很多年了。