一网吧保护程序，希望高手来帮帮

我是网吧网管 收费系统是 万象2004 920 （破解的版不能升级）
由于破解万象免费上网的人多，我装拉几 防破解的软件，但防不住
万象破解王+冰刃，后来我找拉个VBS程序 ，把SMSS。EXE 进程保护起来
一结束就篮屏，但用冰刃 把 VBS的调用程序WScript。EXE 一结束就不好用拉， 如何编写个程序让他有自我保护功能，一结束就重起，最好是蓝屏

如果有编程高手，用其他语言编写能实现同样的效果也好。
（最好是着样如果某个进程一结束就执行另一个程序或本身程序，而自身启动时无界面，看不到进程最好，如果本身结束就 蓝屏） （站用内存和CPU  都要少，不会影响IE浏览速度）
最好可以把程序发到我信箱中（xingxian1122@163.com)
我想一定有牛人可以做到的。
以下是我在网上找的VBS程序，自己改拉一下。

Dim oShell
Set oShell = WScript.CreateObject("WScript.Shell")
While true
If Not CheckPro(".","smss.exe") Then
oShell.run "C:\WINDOWS\system32\systen.exe" （一个蓝屏程序）
End If
WScript.Sleep 1000*10
Wend
set oshell = nothing
WScript.quit

Function CheckPro(strComputer,ProName)
Dim objWMIService,colProcesses,objProcess
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colProcesses = objWMIService.ExecQuery("Select * from Win32_Process")
CheckPro = False
For Each objProcess in colProcesses
If objProcess.Name = ProName Then
CheckPro = True
Exit For
End If
Next
End Function

我用编辑器 把上面的程序编辑成EXE ，就显示“错误对象WScript”
着是为什么那，VBS执行时是好用的啊？？？？
我不太懂编程 ，呵呵
问题补充：VBS2EXE V2.7 汉化版
我用的是着个编辑器 ，网上评价还满高。

难到 真的没人可以解决吗？

我的信箱 是xingxian1122@163.com

如果有高手可以直接编好的话，可以发到我信箱里

谢谢拉

求人的是爷爷！
帮人的是孙子1

那个……这里好像不是VBS的论坛吧？

碰下运气，好多人都不会！！！！！！

来找各行  牛人帮忙

建议你装一个“嘟嘟牛”网吧管理系统。貌似目前还没有什么能快速破解的方法

我就觉得在启动时按F8 用安全模式启动的啊，可以关闭很多网吧管理软件哦，这样就可以免费上网了。不知道如何更改这些启动模式，关闭安全模式呢，或者带网络的安全模式

F8安全模式是16色的，网管一眼就看的出来。
而且16色模式貌似不能运行大的游戏

你好

你的这个需求，可以做一个服务程序就可以解决了，
  实现就是  服务程序 随计算机启动而启动
    他实现就是遍历进程，发现没有SMSS。EXE   就重新启动计算机
如果你感兴趣的话 联系我 QQ：25158172 说明来意

服务也是可以删除的。要是碰到高人，那是没办法防的。