Pertama -tama, kelas ASP (VBScript) terdiri dari peristiwa dan metode (mereka adalah anggota kelas). Jika Anda tidak terpapar, Anda dapat melihat instruksi berikut (haha, saat ini saya sedang menjual dan menjual.
Di blok kelas, anggota dinyatakan oleh pernyataan pernyataan yang sesuai sebagai pribadi (anggota pribadi, hanya dapat dipanggil di dalam kelas) atau publik (anggota publik, dapat dipanggil di dalam dan di luar kelas). Yang dinyatakan sebagai pribadi hanya akan terlihat di blok kelas. Dinyatakan bahwa publik tidak hanya terlihat di dalam blok kelas, tetapi juga terlihat oleh kode selain blok kelas. Standarnya adalah publik yang tidak menggunakan pribadi atau publik untuk dinyatakan dengan jelas. Proses dinyatakan di blok kelas sebagai publik akan menjadi metode kelas. Variabel publik akan menjadi atribut kelas, serta menggunakan properti Get, Properti Let, dan Properti. Atribut default dan metode kelas ditentukan dalam kata kunci default dalam pernyataan mereka.
Harap baca bagian biru di dalamnya, mari kita lihat contoh di bawah ini
<bahasa skrip = vbscript runat = server>
Kelas myclass
'// ---- Deklarasi (Deklarasi adalah Definisi) Variabel internal (pribadi]) dari kelas myclass
Strathor pribadi
Strversion pribadi
Contoh Streks Pribadi
'// ----------------------------------------------- -------------------------------------------------- -------------------------------------------------- --- --------------- //
'// ---- class_initialize () adalah peristiwa inisialisasi kelas. Layar di anggota.
Private sub class_initialize ()
Strauthor = Siyuan
Strversion = 1.0
response.write <br> myclass memulai <br>
akhir sub
'// ---- class_terminate () adalah peristiwa akhir dari kelas. Kelas sudah berakhir
Private Sub Class_Terminate ()
response.write <br> myclass sudah lebih dari <br>
akhir sub
'// ----------------------------------------------- -------------------------------------------------- ------------------------------ ---------------- //
'// ---- Metode ini mengembalikan informasi versi
Sub Informasi Publik () ()
Response.write <br> Coding oleh <a href = 'mailto: [email dilindungi]'> maxid_zen </a> </a>
akhir sub
'// ----------------------------------------------- -------------------------------------------------- -------------------------------------------- ------ ---------- //
'// ---- Atribut kelas tetap, atribut ini memungkinkan pengguna
Properti Publik Let SetExapmle (Byval Strvar)
strexapmle = strvar
Akhir properti
'// ----------------------------------------------- -------------------------------------------------- -------------------------------------------- ------ ---------- //
'// ---- Tentukan atribut kelas, atribut ini adalah mengembalikan nomor versi
Properti Publik Dapatkan Versi
Versi = Strversion
Akhir properti
'// ---- Tentukan atribut kelas, atribut ini adalah nomor penulis yang dikembalikan ke kelas ini
Properti Publik Dapatkan Penulis
Penulis = Strauthor
Akhir properti
'// ---- Tentukan atribut kelas, atribut ini adalah mengembalikan nomor versi
Properti publik mendapatkan exapmle
exapmle = strexapmle
Akhir properti
kelas akhir
</script>
<%
'// ------- Ini adalah contoh menggunakan kelas ini
Redup onenewclass
set OneNewClass = myclass baru
Response.Write Penulis: & OnenewClass.Author & <br>
Versi response.write: & OneNewClass.Version & <br>
OneNewClass.SetExapMle = Ini adalah contoh dari kelas sederhana
Response.write Pengguna yang disesuaikan: & OneNewClass.Exapmle & <br>
OneNewClass.Information
Setel OneNewClass = Tidak Ada
%>