Debug Server Create Object

Test 1: CreateObject direct

CreateObject('WScript.Shell') = [NativeObject:20302]

Test 2: Server.CreateObject

Server.CreateObject('WScript.Shell') = [NativeObject:20303]

Err.Number = 0, Err.Description =