Aplikasi ASP


Satu set fail ASP yang bekerjasama untuk menyelesaikan tugas dipanggil aplikasi.

Objek Aplikasi

Aplikasi di Web boleh menjadi satu set fail ASP. Fail ASP ini berfungsi bersama untuk menyelesaikan tugas tertentu. Objek Aplikasi dalam ASP digunakan untuk menggabungkan fail ini bersama-sama.

Objek aplikasi digunakan untuk menyimpan dan mengakses pembolehubah dari mana-mana halaman, serupa dengan objek Sesi. Perbezaannya ialah semua pengguna berkongsi objek Aplikasi, dan hubungan antara objek Sesi dan pengguna adalah satu dengan satu.

Objek Aplikasi menyimpan maklumat yang akan digunakan oleh banyak halaman dalam aplikasi (seperti maklumat sambungan pangkalan data). Maklumat ini boleh diakses dari mana-mana halaman. Anda juga boleh menukar maklumat ini di satu tempat, dan perubahan akan ditunjukkan secara automatik pada semua halaman.

Menyimpan dan mendapatkan semula pembolehubah Aplikasi

Pembolehubah aplikasi boleh diakses dan diubah oleh mana-mana halaman dalam aplikasi.

Anda boleh mencipta pembolehubah Aplikasi dalam "Global.asa" seperti berikut:

<script language="vbscript" runat="server">

Sub Application_OnStart
application("vartime")=""
application("users")=1
End Sub

</script>

Dalam contoh di atas, kami mencipta dua pembolehubah Aplikasi: "vartime" dan "pengguna".

Anda boleh mengakses nilai pembolehubah Aplikasi seperti berikut:

Terdapat
<%
Response.Write(Application("users"))
%>
sambungan aktif.

Lintasi koleksi Kandungan

Koleksi Kandungan mengandungi semua pembolehubah aplikasi. Anda boleh melihat pembolehubah yang disimpan dalam koleksi Kandungan dengan mengulanginya:

<%
dim i
Untuk Setiap i dalam Aplikasi.Kandungan
, Response.Write(i & "<br>")
Seterusnya
%>

Jika anda tidak mengetahui bilangan item dalam koleksi Kandungan, anda boleh menggunakan harta Count:

<%
dim i
dim j
j=Application.Contents.Count
Untuk i=1 hingga j
, Respons.Write(Application.Contents(i) & "<br>")
Seterusnya
%>

Lintasi koleksi StaticObjects

Anda boleh melihat nilai semua objek yang disimpan dalam objek Aplikasi dengan mengulangi koleksi StaticObjects:

<%
dim i
Untuk Setiap i dalam Aplikasi .Objek Statik
, Respons.Tulis(i & "<br>")
Seterusnya
%>

Kunci dan Buka Kunci

Anda boleh menggunakan kaedah "Kunci" untuk mengunci apl. Apabila aplikasi dikunci, pengguna tidak boleh menukar pembolehubah Aplikasi (kecuali pengguna yang mengakses pembolehubah Aplikasi). Anda juga boleh menggunakan kaedah "Buka Kunci" untuk membuka kunci aplikasi. Kaedah ini akan mengalih keluar kunci pada pembolehubah Aplikasi:

<%
Application.Lock
'buat beberapa operasi objek aplikasi
Application.Unlock
%>