Ahora planeo volver a modificar y optimizar el sistema de informes que construí para mi empresa en mi segundo año. Utiliza ASP. Afortunadamente, VBS lo admite.
Copie el código de la siguiente manera:<%
class MyClass
Dim var 'Las variables públicas deben usar Dim
Private var2' Las variables privadas no requieren
Sub sub1
respuesta.write var2
End Sub
Private Sub sub2
respuesta.write var
End Sub
Sub SetVar(v)
var2= v
End Sub
end class
Set cls = new MyClass'Para generar un objeto, utilice set
cls.SetVar(asd)
cls.var = 1
cls.sub1' tiene una encapsulación fuerte y no indicará que no hay permiso. Dirá directamente que los atributos o métodos no son compatibles
%>.