Saya melihat beberapa teman mengatakan bahwa bab sebelumnya tidak diperlukan, dan memang benar jika dipikir-pikir, awalnya saya tidak bermaksud membicarakan dasar-dasar ini, tetapi tidak ada batasan dalam penulisannya, jadi saya lanjutkan ke dasar saja. Pengetahuan. Mulai dari bagian ini, izinkan saya memperkenalkan beberapa dari tiga kelas umum utama di ASP, yang dijalankan melalui arsitektur tiga tingkat yang saya rancang, yang merupakan perpanjangan dari sintaks ASP dan dapat meningkatkan efisiensi pemrosesan banyak detail .Mereka dapat dianggap sebagai kerangka kecil.
Bagian ini memperkenalkan kelas penanganan kesalahan. Nama kelasnya adalah Con_Error. Ini diinisialisasi di awal halaman kode. Nama instance adalah e.E.add berikut menggunakan objek yang dipakai dari kelas kesalahan ini untuk beroperasi.
Pengenalan metode:
e.Add(ByVal vErrorMessage) mencatat kesalahan dan menyetel e.Error = true. Ketika kesalahan ditemukan saat program memeriksa validitas nama pengguna, dll., metode ini dipanggil dan pesan kesalahan dicatat.
Misalnya, jika pengguna memiliki kata sandi yang salah saat masuk, panggil e.add (akun atau kata sandi Anda salah). Saat ini, kesalahan dicatat dalam objek kesalahan e, dan atribut objek kesalahan e. Error=true. Dalam operasi selanjutnya, Anda dapat menggunakan properti objek error ini untuk membuat penilaian.
Misalnya:
Ketika kesalahan terjadi, sebuah jendela kecil akan muncul untuk meminta kesalahan dan kembali ke halaman sebelumnya.
jika e.Error maka
e.Alert_Back Silakan login lagi! 'Fungsi Alert_Back akan diperkenalkan nanti.
berakhir jika
e.Alert_Back(ByVal vMessage) menggunakan Javascript untuk memunculkan kotak prompt kesalahan dan menampilkan daftar semua kesalahan saat ini. vMessage di Alert_Back(vMessage) ditampilkan pada baris terakhir untuk meminta pengguna tentang langkah-langkah yang harus diambil setelah melihat ini. pesan kesalahan. Dan kembali ke halaman sebelumnya. Posting kode metode ini agar semua orang dapat memahaminya dengan lebih baik:
Sub Publik Alert_Back (ByVal vMessage)
strJSMessage = JSMessage & vMessage 'JSMessage digunakan untuk menyimpan daftar error pada objek e, dan setiap error dipisahkan oleh /n.
%>
<bahasa skrip=javascript>
<!--//
alert(<%=strJSMessage %>); 'Muncul kotak kesalahan.
history.back(); 'Kembali ke halaman sebelumnya
//-->
</skrip>
<%
respon.end 'Perhatikan bahwa keluaran harus dihentikan di sini untuk menghindari kesalahan saat program terus dijalankan.
Akhiri Sub
Metode e.Alert_Back memperluas beberapa metode dengan efek serupa, yang diperkenalkan di bawah ini. Silakan lihat kode sumber terlampir untuk proses implementasi:
e.Alert(ByVal vMessage) hanya memunculkan kotak prompt error, tidak kembali ke halaman sebelumnya, dan tidak menghentikan eksekusi program.
e.Alert_Close(ByVal vMessage) memunculkan kotak prompt kesalahan. Ketika pengguna mengklik OK, tutup jendela saat ini.
e.OK_Go(ByVal vMessage,ByVal vURL) memunculkan kotak prompt pesan. Saat pengguna mengklik OK, pengguna akan melompat ke halaman vURL.
e.Go(ByVal vURL) Langsung ke halaman vURL
Setiap orang pasti sudah familiar dengan fungsi cara-cara di atas, namun nyatanya tidak terbatas pada penanganan error saja.
e.Clear menghapus informasi kesalahan yang dicatat dalam objek kesalahan, e.Error = false
Karena objek e adalah objek global, ia dapat dipanggil dalam banyak proses. Ketika Anda hanya perlu menghitung kesalahan dalam modul tertentu, Anda dapat memanggil metode ini di awal untuk menghapus kesalahan dalam e.
Berikut ini adalah paket Response.Write, sekedar untuk kenyamanan dan kecepatan penggunaan.
e.Debug(ByVal vMessage) mengeluarkan informasi debug. Ketika program selesai, akan ada banyak keluaran informasi debug kesalahan menggunakan Response.write keluaran informasi debugging., ketika program selesai, Anda hanya perlu mencari e.Debug untuk menemukan lokasi semua informasi kesalahan debugging.
ew(ByVal vMessage) mengeluarkan informasi. Ini hanyalah pembungkus sederhana dari Response.write. Tidak diketahui seberapa nyaman memasukkan ew ke dalam program daripada memasukkan Response.write, dan selalu mudah untuk membuat kesalahan. .
e.BR mengeluarkan karakter baris baru, yang setara dengan respon.Write <BR />
Empat paket berikut ini adalah paket untuk Response.End. Ini hanyalah beberapa metode dengan fungsi yang sama yang ditentukan berdasarkan kebiasaan pengoperasian:
e.Jeda == Respon.Akhir
eP==Respon.Akhir
e.Berhenti == Respon.Akhir
e.Akhir == Respon.Akhir
Ada juga atribut e.Message, yang menampilkan daftar semua kesalahan di objek e.
Silakan lihat kode untuk detail implementasi spesifik.
Copy kode kodenya sebagai berikut:
ClassCon_Error
Kesalahan Pribadi
strMessage pribadi
strJSMessage pribadi
Sub Kelas Pribadi_initialize()
blnError = salah
strPesan =
Akhiri Sub
Sub Kelas_Terminate() Pribadi
Akhiri Sub
' ===== ==================
' Properti
' ===== ==================
'Pesan:
Pesan Izinkan Properti Publik (nilai ByVal)
strMessage = nilai
Properti Akhir
Properti Publik Dapatkan Pesan()
Pesan = strPesan
Properti Akhir
'Nomor kesalahan
GetError Properti Publik()
Kesalahan = blnError
Properti Akhir
' JSMessage: tampilkan di kotak pesan
Properti Pribadi GetJSMessage()
strJSMessage = Ganti(strMessage, <br>, /n)
strJSMessage = Ganti(strJSMessage, vbCrLf,)
JSMessage = strJSMessage
Properti Akhir
' ===== ==================
'Metode
' ===== ==================
' Tambahkan : menambahkan pesan Kesalahan
Tambah Sub Publik (ByVal vMessage)
blnError = benar
strMessage = strMessage & vMessage & <br>
Akhiri Sub
Sub Publik Jelas
blnError = salah
strPesan =
Akhiri Sub
'Peringatan
Peringatan Sub Publik (ByVal vMessage)
strJSMessage = JSMessage & vMessage
%>
<bahasa skrip=javascript>
<!--//
peringatan(<%=strJSMessage %>);
//-->
</skrip>
<%
Akhiri Sub
' Alert_Back : waspada dan kembali
Sub Publik Alert_Back (ByVal vMessage)
strJSMessage = JSMessage & vMessage
%>
<bahasa skrip=javascript>
<!--//
peringatan(<%=strJSMessage %>);
sejarah.kembali();
//-->
</skrip>
<%
respon.akhir
Akhiri Sub
'Alert_Close: waspada dan tutup
Sub Alert Publik_Close (ByVal vMessage)
strJSMessage = JSMessage & vMessage
%>
<bahasa skrip=javascript>
<!--//
peringatan(<%=strJSMessage %>);
jendela.pembuka = null;
jendela.tutup();
//-->
</skrip>
<%
respon.akhir
Akhiri Sub
'***************************************************
'Debug : respon.write, gunakan untuk menghapus pesan debug dengan mudah, cukup cari e.Debug dari file
'***************************************************
Sub Publik OK_Go (ByVal vMessage, ByVal vURL)
strJSMessage = JSMessage & vMessage
%>
<bahasa skrip=javascript>
<!--//
peringatan(<%=strJSMessage %>);
lokasi.href = '<%=vURL %>';
//-->
</skrip>
<%
respon.akhir
Akhiri Sub
Sub Go Publik (ByVal vURL)
respon.Redirect vURL
respon.akhir
Akhiri Sub
'***************************************************
'Debug : respon.write, gunakan untuk menghapus pesan debug dengan mudah, cukup cari e.Debug dari file
'***************************************************
Debug Sub Publik (ByVal vMessage)
respon.Tulis vMessage
respon.flush
Akhiri Sub
'****** W: tulis
Sub Publik W (ByVal vMessage)
respon.Tulis vMessage
Akhiri Sub
'****** BR: tulis <br>
Sub Umum Br
respon.Tulis <BR />
Akhiri Sub
'***************************************************
'Jeda: respon.end, tandai info debug dengan jelas
'***************************************************
Jeda Sub Publik
respon.akhir
Akhiri Sub
Sub P Umum
respon.akhir
Akhiri Sub
Sub Umum [Berhenti]
respon.akhir
Akhiri Sub
Sub Publik [akhir]
respon.akhir
Akhiri Sub
Kelas Akhir