Primeiro, a classe ASP é composta por eventos e métodos (eles são membros da categoria de composição).
No bloco de classe, os membros são declarados pela declaração correspondente como privada (membros privados, só podem ser chamados dentro da classe) ou público (membros públicos, podem ser chamados dentro e fora da classe). O declarado como privado só será visível no bloco de classe. É declarado que o público não é apenas visível dentro do bloco de classe, mas também visível para o código que não seja blocos de classe. O padrão é público que não usou privado ou público para declarar claramente. O processo de ser declarado no bloco de classe como público se tornará um método de classe. As variáveis públicas se tornarão os atributos da classe, bem como os atributos da propriedade Get, Property Let e Property Set. Os atributos e métodos padrão da classe são especificados nas palavras -chave padrão em sua instrução.
Assista à parte acima pacientemente, vejamos um exemplo abaixo:
| A seguir, o fragmento de código: <% '// ----------------------------------------------- ------------------------------------------------ ---- -------------------- // Classe myclass '// ---- Declaração (Declaração é Definição) As variáveis internas (privadas [privadas]) da classe MyClass Strauthor privado Strversion privado Estrexato privado '// ----------------------------------------------- ------------------------------------------------------ ------------------------------------------------------ --- ----------------- // '// ---- Class_initialize () é um evento de inicialização da classe. A tela no membro. Sub -classe privado_initialize () Strauthor = "Coldstone" strversion = "1.0" Response.Write "<br> MyClass começou <br>" "" Final sub '// ---- Class_termine () é um evento final da classe. A classe acabou Sub -classe particular () Response.Write "<br> MyClass acabou <br>" "" Final sub '// ----------------------------------------------- ------------------------------------------------------ -------------------------------- ---------------- // '// ---- Este método retorna uma informação de direitos autorais Public Sub Information () () Response.Write "<br> Codificação por <a href = 'Mailto: [email protected]'> Coldstone </a> @ <a href = 'http: //www.flash8.net'>>. <br> " Final sub '// ----------------------------------------------- ------------------------------------------------------ -------------------------------------------- ---------- ---------- // '// ---- O atributo da classe fixa, este atributo é para permitir que os usuários Propriedade pública Let setexapmle (byval strvar) strexapmle = strvar Propriedade final '// ----------------------------------------------- ------------------------------------------------------ -------------------------------------------- ---------- ---------- // '// ---- Defina os atributos da classe, este atributo é retornar um número de versão Propriedade pública Get versão Versão = strversion Propriedade final '// ---- Defina os atributos da classe, esse atributo é o número do autor retornado a esta classe Propriedade pública Get Author Autor = strauthor Propriedade final '// ---- Defina os atributos da classe, este atributo é retornar um número de versão Propriedade pública Obtenha exapmle Exapmle = strexapmle Propriedade final Classe final %> <% '// ------- Este é um exemplo de usar esta classe Dimnenewclass Set OneNewclass = New MyClass Response.Write "Autor:" & onenewclass.author & "<br>" Response.Write "Versão:" & onenewclass.version & "<br>" OneNewclass.setexapmle = "Este é um exemplo simples" Response.Write "Usuário Custom:" & OneNewclass.exapmle & "<br>" OneNewclass.information Definido onenewclass = nada %> |