DriveLetter = Wscript.Arguments.Item(0)

Set env = CreateObject("Microsoft.SMS.TSEnvironment")
env("OSDisk") = DriveLetter