En primer lugar, la clase ASP (VBScript) está compuesta de eventos y métodos (son miembros de una clase). y vendiendo.
En el bloque de clases, los miembros son declarados por la declaración de la declaración correspondiente como privado (miembros privados, solo se pueden llamar dentro de la clase) o público (miembros públicos, se pueden llamar dentro y fuera de la clase). El declarado privado solo será visible en el bloque de clases. Se declara que el público no solo es visible dentro del bloque de clases, sino que también es visible para codificar que no sean bloques de clases. El valor predeterminado es público que no usaba privado o público a claramente establecido. El proceso de ser declarado en el bloque de clases como público se convertirá en un método de clase. Las variables públicas se convertirán en los atributos de la clase, así como en el uso de la propiedad Get, la propiedad y el conjunto de propiedades. Los atributos y métodos predeterminados de la clase se especifican en las palabras clave predeterminadas en su declaración.
Lea la parte azul adentro, echemos un vistazo a un ejemplo a continuación
<Script Language = VBScript runat = Server>
Clase MyClass
'// ---- Declaración (la declaración es definición) Las variables internas (privadas [privadas]) de la clase MyClass
Strauthor privado
Estrella privada
Strexample privado
'// ----------------------------------------------- -------------------------------------------------- -------------------------------------------------- --- --------------- //
'// ---- class_initialize () es un evento de inicialización de la clase. la pantalla en el miembro ha comenzado
Sub class_initialize () privado ()
Strauthor = siyuan
Strversion = 1.0
Response.write <br> MyClass comenzó <br>
final
'// ---- class_monte () es un evento final de la clase. la clase ha terminado.
Sub class_terminate () privado ()
Response.write <br> myClass ha terminado <br>
final
'// ----------------------------------------------- -------------------------------------------------- ------------------------------ ---------------- //
'// ---- Este método devuelve la información de una versión
Public Sub Information () ()
Response.write <br> Coding por <a href = 'mailto: [correo electrónico protegido]'> maxid_zen </a> </ a>.
final
'// ----------------------------------------------- -------------------------------------------------- -------------------------------------------- ------ ---------- //
'// ---- El atributo de la clase fija, este atributo es permitir a los usuarios
Propiedad pública SetExapmle (Byval Strvar)
strexapmle = strvar
Propiedad final
'// ----------------------------------------------- -------------------------------------------------- -------------------------------------------- ------ ---------- //
'// ---- Defina los atributos de la clase, este atributo es devolver un número de versión
Propiedad pública Obtener versión
Versión = Strversion
Propiedad final
'// ---- Defina los atributos de la clase, este atributo es el número de autor devuelto a esta clase
Propiedad pública Obtener autor
Autor = Strauthor
Propiedad final
'// ---- Defina los atributos de la clase, este atributo es devolver un número de versión
Propiedad pública Obtener EXAPMLE
EXAPMLE = STREXAPMLE
Propiedad final
clase final
</script>
<%
'// ------- Este es un ejemplo de uso de esta clase
Dim OneNewClass
establecer oneNewClass = nueva myclass
Response.Write Autor: y OneNewClass.Author & <br>
Response.Write Versión: y oneNewclass.version & <br>
OneNewclass.setExapmle = Este es un ejemplo de una clase simple
Response.Write User Personalized: y oneNewclass.exapmle & <br>
OneNewClass.Información
establecer oneNewClass = nada
%>