Set dice1=Server.Createobject("MyDLL.clsDice") ' 使用set语句创建dice1对象,其中MyDLL是创建dll文件时的工程名,clsDice为类模块的名称