dim password
set password = CreateObject('user.ws')