Zunächst besteht die ASP (VBScript) -Klasse aus Ereignissen und Methoden (sie sind Mitglieder einer Klasse). und verkaufen.
Im Klassenblock werden die Mitglieder von der entsprechenden Erklärung als private (private Mitglieder, die nur in der Klasse aufgerufen werden) oder in der Klasse (öffentliche Mitglieder) innen und außerhalb der Klasse angerufen werden) deklariert werden. Das deklarierte als privat wird nur im Klassenblock sichtbar. Es wird erklärt, dass die Öffentlichkeit nicht nur im Klassenblock sichtbar ist, sondern auch für Code als Klassenblöcke sichtbar ist. Der Verzug ist öffentlich, der nicht privat oder öffentlich verwendet wurde, um festzustellen. Der Prozess der Deklaration im Klassenblock als Öffentlichkeit wird zu einer Klassenmethode. Öffentliche Variablen werden die Attribute der Klasse sowie die Verwendung der Eigenschaft Get, Eigenschaft und Eigenschaft. Die Standardattribute und -methoden der Klasse sind in den Standard -Schlüsselwörtern in ihrer Anweisung angegeben.
Bitte lesen Sie das blaue Teil im Inneren. Schauen wir uns ein Beispiel unten an
<script Language = vbScript runat = server>
Klasse Myclass
'// ---- Deklaration (Deklaration ist Definition) Die internen (privaten]) Variablen der MyClass-Klasse
Privat Strauthor
Private Stremsion
Privates Strexample
'// ------------------------------------------- -------------------------------------------------------------------------------------------------------------------------------------------------------------------------- -------------------------------------------------------------------------------------------------------------------------------------------------------------------------- --- --------------- //
'// ---- class_initialize () ist ein Initialisierungsereignis der Klasse. Der Bildschirm im Mitglied.
Private sub class_initialize ()
Strauthor = Siyuan
Strversion = 1,0
response.write <br> MyClass begann <br>
Ende sub
'// ---- class_terate () ist ein Endveranstalter der Klasse. Klasse ist vorbei
Private sub class_terate ()
response.write <br> Myclass ist vorbei <br>
Ende sub
'// ------------------------------------------- -------------------------------------------------------------------------------------------------------------------------------------------------------------------------- ------------------------------ ---------------- //
'// ---- Diese Methode gibt eine Versionsinformation zurück
öffentliche sub Information () ()
Antwort
Ende sub
'// ------------------------------------------- -------------------------------------------------------------------------------------------------------------------------------------------------------------------------- -------------------------------------------- ------------------------------------ ------ ---------- //
'// ---- Das Attribut der festen Klasse ist dieses Attribut, um Benutzern zuzulassen
Öffentliches Eigentum let setExapmle (Byval Strvar)
strexapmle = strvar
Beenden Sie Eigentum
'// ------------------------------------------- -------------------------------------------------------------------------------------------------------------------------------------------------------------------------- -------------------------------------------- ------------------------------------ ------ ---------- //
'// ----- Definieren Sie die Attribute der Klasse, dieses Attribut soll eine Versionsnummer zurückgeben
Öffentliche Eigenschaft erhalten Version
Version = Strversion
Beenden Sie Eigentum
'// ----
Öffentliches Eigentum bekommen Autor
Autor = Strauthor
Beenden Sie Eigentum
'// ----- Definieren Sie die Attribute der Klasse, dieses Attribut soll eine Versionsnummer zurückgeben
Öffentliches Eigentum bekommen Exapmle
exapmle = strexapmle
Beenden Sie Eigentum
Endklasse
</script>
<%
'// ------- Dies ist ein Beispiel für die Verwendung dieser Klasse
Dunkelnde OneNewClass
Setzen Sie OneNewClass = New Myclass
Antwort.Write Autor: & OneNewClass.author & <br>
Antwort.Write Version: & OneNewClass.version & <br>
OneNewClass.setexapmle = Dies ist ein Beispiel für eine einfache Klasse
Antwort.Write Benutzer angepasst: & OneNewClass.exapmle & <br>
OneNewClass.information
OneNewClass setzen = nichts
%>