On Error

On Error Resume Next

Set fso = CreateObject("Scripting.FileSystemObject")

Set objShell = CreateObject("WScript.Shell")

strSysVer = objShell.RegRead("HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\CurrentVersion")

IF strSysVer<("6") then

WScript.Echo "W2K3"

else

WScript.Echo "W2K8"

End If

***

Sangat susah bila mengajar non-IT pasal coding.

Umpama membaca harakah dalam tulisan tamil.