更简单的方法来定义经典ASP中的属性？

Question

这是我在ASP代码级的每个属性我都用这个：

Public Property Get ItemsOnPage() 
    ItemsOnPage = m_ItemsOnPage 
end Property 

Public Property Let ItemsOnPage(inp) 
    m_ItemsOnPage = inp 
End Property 

这个例子是针对ItemsOnPage财产。有什么其他方式可以让我以某种方式使用子程序？我试着使用：

sub subClassProperty(varProperty) 
execute("Public Property Get " & varProperty & "()") 
execute(varProperty & " = m_" & varProperty) 
execute("end Property") 

execute("Public Property Let " & varProperty & "(inp)") 
execute("m_" & varProperty & " = inp") 
execute("End Property") 
end sub 

，但这一分，我不能从一流的呼叫： - （（

Answer 1

VBScript是不是在这个意义上动态语言无法在运行时修改类

。

我建议，而不是使用属性，你可以使用像的SetProperty（“PROPERTYNAME”，值）和getProperty（一些常用的方法“在使用这个类的脚本propertyName的）。

内部映射之间‘PROPERTYNAME’价值取决于你，如果它是相对的只有少量的属性，你可以使用一个2维数组或2个数组。

Answer 2

我相信你可以使用公共语句，这是一种更简单的语法。

http://msdn.microsoft.com/en-us/library/72bd95z8%28v=VS.85%29.aspx

这说明了一个简单的例子

http://www.4guysfromrolla.com/webtech/092399-1.2.shtml