Teknologi ASP di WAP (4)
Penulis:Eve Cole
Waktu Pembaruan:2009-05-30 19:54:43
Pilih teater dan waktu pertunjukan
Bagian kode ini memungkinkan pengguna untuk memilih jam berapa menonton film. Semua rekaman ditentukan berdasarkan film yang dipilih di halaman sebelumnya. Pilih teater dan waktu pertunjukan Anda di sini.
movie_id = Permintaan("film")
sqlQuery = "PILIH judul DARI film WHERE Movie_id = " & movie_id
setel rsMovie = samb.Execute(sqlQuery)
movie_title = rsMovie("judul")
:
sqlQuery = "PILIH [nama], [waktu], [show_id] DARI Pertunjukan, Teater " &_
"WHERE tampilkan.movie_id = " & movie_id &_
"DAN teater.theater_id = pertunjukan.theater_id"
setel rsShows = samb.Execute(SQLquery)
Jika Anda mempelajari kode ini dengan cermat, Anda akan ingin menggunakan Sesi untuk menyimpan informasi film, dan kemudian menanyakannya di halaman ini dengan lebih mudah. Sayangnya juga, Sesi diperlukan
Meskipun dukungan cookie juga didukung dalam spesifikasi WAP, namun tidak didukung di Nokia 7110. Artinya kami belum dapat menggunakan sesi di WAP.
Dalam pelayanan.
Berikut beberapa hal menariknya:
<pilih nama='tampilkan'>
<%
Lakukan tanpa rsShows.eof
respon.write("<nilai pilihan='" & rsShows("show_id") & "'>" & Kiri(rsShows("nama"),cutter) & " (" &
rsShows("waktu") & ")" & "</option>" &vbcrlf)
rsShows.MoveNext
lingkaran %>
</pilih>
Jika Anda bertanya-tanya tentang variabel pemotong, inilah sesuatu yang akan membuat Anda tertawa atau menangis.
Pemotong redup
jika InStr(Request.ServerVariables("HTTP_USER_AGENT"), "Nokia7110") maka
pemotong = 12
kalau tidak
pemotong = 7
berakhir jika
Kode ini menampilkan opsi berdasarkan perangkat yang berbeda. Kami punya alasan bagus untuk melakukan ini, emulator Nokia Toolit 1.2 suka memotong pilihan saya menjadi beberapa karakter saja, dan kami ingin menampilkan nama film dan tanggal rilis, jadi kami harus mengurangi karakter nama film. Masalah ini tidak terjadi pada ponsel sebenarnya, jadi kita harus menentukan terlebih dahulu jenis perangkatnya.
Begitu saya mempunyai kesempatan (saya miskin dan tidak punya uang, ini hanya mimpi belaka...) untuk menguji kode saya pada Nokia 7110 asli, kami langsung merasa bahwa kami memiliki lebih dari yang kami kira. Faktanya, beberapa bioskop memiliki nama yang aneh, dan nama yang panjang ini akan memakan banyak ruang layar. Tidak perlu menyia-nyiakan ruang tampilan ini dan mencoba menyederhanakan nama-nama tersebut.
tiket
Langkah selanjutnya adalah membiarkan pengguna memilih jumlah suara yang diinginkan. Bagian kode ini sama seperti bagian lainnya. Saya akan menanyakan data yang sama dari database karena Sesi tidak dapat digunakan secara nyata
Ponsel WAP digunakan, jadi saya harus memeriksa beberapa konten untuk melihat apakah masih ada kursi yang dijual.
SQLquery = "PILIH * DARI tampilkan WHERE Show_id = " & tampilkan_id
setel rsShow = samb.Execute(SQLquery)
:
kursi = rsShow("kursi_gratis")
:
jika kursi = 0 maka
Response.write("Maaf, tidak ada kursi lagi")
rsShow.close
atur rsShow = tidak ada
Respon.write("</p></card></wml>")
Respon.akhir
kalau tidak
jika kursi > 6 maka 'pesan hingga 6 tiket atau maksimal yang tersedia
kursi_maks=6
kalau tidak
max_seats = kursi
berakhir jika
berakhir jika
%>
<%=movie_title%> di <% =nama_teater%>
<pilih nama='tiket'>
<%
redup
saya=1
Lakukan selagi i <= max_seats
respon.write("<nilai opsi='" & i & "'>" & i & " tiket" & "</option>" &vbcrlf)
saya = saya + 1
lingkaran %>
</pilih>
Simpan suara
Sekarang kita memiliki semua data yang diperlukan, kita perlu menyimpannya:
tiket = Permintaan("tiket")
:
kursi_gratis = rsShow("kursi_gratis")
:
free_seats = free_seats - tiket
:
SQLUpdate = "PERBARUI Tampilkan" &_
"SET Tampilkan.free_seats=" & free_seats & " " &_
" DIMANA Tampilkan_ID=" & tampilkan_id
samb.Execute (pembaruan SQL)
SQLquery = "PILIH maks([ID_Pemesanan]) sebagai nomor pemesanan DARI pemesanan"
Setel rsBooking = samb.execute(SQLquery)
maxbookid = rsBooking("nomor pemesanan") + 1
SQLinsert = "MASUKKAN KE Pemesanan ( show_id, book_seats ) " & _
"NILAI ('" & show_id & "', '" & tiket & "')"
samb.Jalankan(SQLinsert) %>
Anda telah memesan <%=tickets%> tiket untuk <%=movie_title%><br />
Pertunjukan akan berlangsung di <%=theater_name%> (<%=time%>)
<br />
Nomor referensi Anda adalah <%=maxbookid%>
Dibawah ini tampilannya:
Gambar 4: Selesaikan transaksi.
Transaksi telah selesai, dan bioskop dapat duduk di depan pintu bioskop untuk mengumpulkan uang.
sebagai kesimpulan
WAP baru saja mengambil langkah pertamanya, namun ini merupakan salah satu perkembangan TI paling revolusioner dalam beberapa tahun terakhir. Pada artikel ini saya memperkenalkan cara menulis aplikasi WAP menggunakan asp,
Dan saya telah memberikan beberapa peringatan kepada Anda, yang saya harap dapat berguna untuk perkembangan Anda di masa depan. Teknologi multimedia masih belum bisa digunakan terlalu banyak di WAP, namun mobilitasnya penting dan memberikan banyak peluang bisnis bagi para pedagang.