'
' Test IConfigureYourServer::GetProductSku
'

option explicit



// this is a Visual Basic Script "Template", used in conjunction with the
// MS Visual C++ Preprocessor to overcome some of the source management
// limitations of VBScript.  Not perfect, but better than a stick in the eye.
//
// use cl /EP foo.vbt > foo.vbs to expand the template

const SCRIPT_FILENAME    = "test-GetProductSku.vbs"
const SCRIPT_SOURCE_NAME = __FILE__
const SCRIPT_DATE        = __DATE__
const SCRIPT_TIME        = __TIME__


// this is all our common code.

#include "common.vbi"



Main
wscript.quit(0)


sub Main
   Dim srvwiz
   Set srvwiz = CreateObject("ServerAdmin.ConfigureYourServer")

   dim skus(5)
   skus(1) = "Personal"
   skus(2) = "Professional"
   skus(3) = "Server"
   skus(4) = "Advanced Server"
   skus(5) = "Datacenter Server"
   
   dim i
   i = srvwiz.GetProductSku()
     
   echo i
   echo skus(i)
End sub