Setelah belajar ASP, kami dapat membangun ruang obrolan paling sederhana berdasarkan konten yang telah kami pelajari. Setiap orang dapat terus meningkatkan fungsinya dengan menguasai proses dasar pendirian ruang obrolan. Sekarang mari kita lihat metode ASP untuk membangun ruang obrolan sederhana.
Langkah utama dijelaskan di bawah ini:
1. Tambahkan kode di file global.asa. Bagian kode ini terutama memproses acara Application_onstart. Dalam acara ini, data dengan 15 elemen didefinisikan dan ditugaskan ke properti objek aplikasi. Isi file global.asa adalah sebagai berikut.
＜ Bahasa skrip = "vbscript" runat = "server"> sub application_onsartdim machats (15) mendefinisikan data dengan 15 elemen.application ("gachats") = Machats menyimpan konten percakapan.2. Tambahkan kode di file aspchat.asp. Perhatikan bahwa Anda perlu menambahkan bagian kode ini antara dua baris horizontal di beranda, yaitu, antara dua <HR> dalam teks. Program pertama -tama menentukan apakah metode "post" digunakan saat melamar beranda ini, karena metode pengiriman jendela dalam contoh ini adalah "post". Secara umum, saat melamar beranda ini untuk pertama kalinya, metode "dapatkan" digunakan. Oleh karena itu, jika metode "posting" digunakan, itu berarti bahwa browser tertentu mendaftar kembali ketika mengirimkan konten percakapannya sendiri, yang perlu diproses karena ada konten percakapan baru. Kalau tidak, itu berarti bahwa browser tertentu berlaku untuk beranda ini untuk pertama kalinya dan belum mengirimkan percakapan apa pun, sehingga hanya perlu menampilkan konten percakapan saat ini.
＜ p align = "center"> ＜ ukuran font = 5> ruang obrolan sederhana </font> ＜/p> ＜br> ＜%input proses jika permintaan.servarible ("request_method") = "post" kemudian menunjukkan pembicaraan jika len ("txtwho"))> 0 thensesi ("ssWHo ssWHO jika len (" txtwho "))> 0 thensesi (" ssWHO SSWHO ("txtwho"))> 0 thensesion ("ssWHO SSWHO (" txtwho ")) 0 Thensesi (" SSWHO SWHO ") =" "txtWHO"))> 0 Thensesion ("SSWHO SWHO") Membuat pointer referensi lokal mlcounter = aplikasi ("gicounter") machats = aplikasi ("gachats") jika jumlah baris yang ditulis melebihi 10, mulai menghitung lagi. Jika mlcounter> 9 thenmlcounter = 0End Jika meningkatkan input pengguna, tambahkan 1machat (mlchounter) = sesi ("sswho") & ":" & request ("txtcents") mlcounter = mlcounter+1 mengatur variabel lokal untuk valid dalam scope application.applicati "gicounter") = mlcounterapplication ("gachat") = machat menghilangkan pemblokiran aplikasi objek aplikasi. Tidak mengunci jika%> ＜%menulis aplikasi textareAif ("gicounter") = 0 thenlstemp = aplikasi ("gachat") (0) elsefor x = 0 Application ("Gicounter")-1LStemp = lstemp & "＜br>" Aplikasi ("Gachats") (x) Nextend ifresponse.White lstemp%> ＜ hr>3. Akhirnya, inisialisasi konten txtwho. Yaitu, ketika browser memasuki namanya sekali, dia tidak perlu memasukkannya lagi. Untuk membedakan setiap penonton yang berbeda, objek "sesi" digunakan di sini. Nama penampil direkam menggunakan sesi ("SSWHO"). Kode berikut ditulis langsung di bawah kode di atas dan disimpan dalam aspchat.asp.
＜form method="POST" action="aspchat.asp" name="frmAsp">＜div align="center">＜center>＜p>Speech:＜input type="text" name="txtCents" size="34">＜/p>＜/center>＜/div>＜div align="center">＜center>＜p>Object:＜input type="submit" value = "kirim" name = "b1"> ＜/p> ＜/center> ＜/div> ＜/form>
Menyelesaikan. Cukup tambahkan kode file HTM lengkap sebelum dan sesudah 2 dan 3 langkah kode dan simpan sebagai aspchat.asp. Ini adalah program ruang obrolan ASP yang sangat sederhana. Anda dapat terus meningkatkan fungsinya saat Anda belajar!
Di atas adalah bagaimana ASP membangun ruang obrolan sederhana. Apakah Anda juga sangat tersentuh? Jika Anda ingin belajar di sini, maka ambil tindakan dengan cepat.