ASP-Technologie in WAP (4)
Autor：Eve Cole
Aktualisierungszeit：2009-05-30 19:54:43
Wählen Sie ein Theater und eine Showzeit
Mit diesem Teil des Codes kann der Benutzer auswählen, wann er den Film ansehen möchte. Alle Datensätze werden basierend auf dem auf der vorherigen Seite ausgewählten Film bestimmt. Wählen Sie hier Ihr Theater und Ihre Vorstellungszeit.
movie_id = Request("movie")
sqlQuery = "SELECT title FROM movie WHERE Movie_id = " & movie_id
set rsMovie = conn.Execute(sqlQuery)
movie_title = rsMovie("title")
:
sqlQuery = „SELECT [name], [time], [show_id] FROM Show, Theater „ &_
"WHERE show.movie_id = " & movie_id &_
„UND theater.theater_id = show.theater_id“
set rsShows = conn.Execute(SQLquery)
Wenn Sie diesen Code sorgfältig studieren, möchten Sie möglicherweise Session verwenden, um Filminformationen zu speichern, und die Abfrage auf dieser Seite ist dann einfacher. Leider ist auch eine Sitzung erforderlich
Obwohl die Cookie-Unterstützung auch in der WAP-Spezifikation unterstützt wird, wird sie im Nokia 7110 nicht unterstützt. Dies bedeutet, dass wir Sitzungen in WAP noch nicht verwenden können.
Im Dienst.
Hier sind einige interessante Dinge:
<select name='show'>
<%
Tun Sie dies jedoch nicht mit rsShows.eof
Response.write("<option value='" & rsShows("show_id") & "'>" & Left(rsShows("name"),cutter) & " (" &
rsShows("time") & ")" & "</option>" &vbcrlf)
rsShows.MoveNext
Schleife %>
</select>
Wenn Sie sich über die Cutter-Variable wundern, finden Sie hier etwas, das Sie zum Lachen oder Weinen bringen wird.
Dimmschneider
if InStr(Request.ServerVariables("HTTP_USER_AGENT"), "Nokia7110") dann
Fräser = 12
anders
Fräser = 7
Ende wenn
Dieser Code zeigt Optionen basierend auf verschiedenen Geräten an. Dafür haben wir gute Gründe: Der Nokia Toolit 1.2-Emulator reduziert meine Optionen gerne auf nur wenige Zeichen, und wir möchten den Filmnamen und das Veröffentlichungsdatum anzeigen, also müssen wir die Zeichen des Filmnamens reduzieren. Dieses Problem tritt bei echten Mobiltelefonen nicht auf, daher müssen wir zunächst den Gerätetyp bestimmen.
Als ich die Chance hatte (ich war arm und hatte kein Geld, das war nur ein ferner Traum...), meinen Code auf einem echten Nokia 7110 zu testen, hatten wir sofort das Gefühl, dass wir mehr hatten, als wir dachten. Tatsächlich haben einige Kinos seltsame Namen, und diese langen Namen nehmen viel Platz auf der Leinwand ein. Es besteht keine Notwendigkeit, diesen Anzeigeplatz zu verschwenden und zu versuchen, diese Namen zu vereinfachen.
Ticket
Der nächste Schritt besteht darin, den Benutzer die gewünschte Anzahl an Stimmen auswählen zu lassen. Dieser Teil des Codes ähnelt den anderen Teilen. Ich werde dieselben Daten aus der Datenbank abfragen, da Session nicht real verwendet werden kann
Es wird ein WAP-Telefon verwendet, daher muss ich einige Inhalte überprüfen, um zu sehen, ob noch Plätze zum Verkauf stehen.
SQLquery = "SELECT * FROM show WHERE Show_id = " & show_id
set rsShow = conn.Execute(SQLquery)
:
Seats = rsShow("free_seats")
:
wenn Sitze = 0 dann
Response.write("Leider keine Plätze mehr")
rsShow.close
setze rsShow = nichts
Response.write("</p></card></wml>")
Antwort.Ende
anders
Wenn Sitzplätze > 6, dann buchen Sie bis zu 6 Tickets oder maximal verfügbar
max_seats=6
anders
max_seats = Sitzplätze
Ende wenn
Ende wenn
%>
<%=movie_title%> bei <% =theater_name%>
<select name='ticket'>
<%
dimi
i=1
Tun Sie dies, während i <= max_seats
Response.write("<option value='" & i & "'>" & i & " Ticket(s)" & "</option>" &vbcrlf)
ich = ich + 1
Schleife %>
</select>
Stimmen speichern
Da wir nun alle benötigten Daten haben, müssen wir sie speichern:
Tickets = Request("Ticket")
:
free_seats = rsShow("free_seats")
:
free_seats = free_seats - Tickets
:
SQLUpdate = "UPDATE Show " &_
"SET Show.free_seats=" & free_seats & " " &_
" WHERE Show_ID=" & show_id
conn.Execute(SQLupdate)
SQLquery = „SELECT max([Booking_ID]) als Buchungsnummer FROM booking“
Setze rsBooking = conn.execute(SQLquery)
maxbookid = rsBooking("bookingnumber") + 1
SQLinsert = „INSERT INTO Booking (show_id, booking_seats)“ & _
"VALUES ('" & show_id & "', '" & Tickets & "')"
conn.Execute(SQLinsert) %>
Sie haben <%=tickets%> Tickets für <%=movie_title%><br /> gebucht
Die Show findet im <%=theater_name%> (<%=time%>) statt.
<br />
Ihre Referenznummer ist <%=maxbookid%>
Unten ist die Anzeige:
Abbildung 4: Vollständige Transaktion.
Die Transaktion ist abgeschlossen und das Kino kann an der Kinotür sitzen, um Geld einzusammeln.
abschließend
WAP hat gerade erst seine ersten Schritte gemacht, ist aber eine der revolutionärsten IT-Entwicklungen der letzten Jahre. In diesem Artikel stelle ich vor, wie man WAP-Anwendungen mit ASP schreibt.
Und ich habe Ihnen einige Warnungen gegeben, von denen ich hoffe, dass sie für Ihre zukünftige Entwicklung nützlich sein werden. Multimedia-Technologie kann in WAP immer noch nicht ausreichend genutzt werden, ihre Mobilität ist jedoch wichtig und bietet Händlern viele Geschäftsmöglichkeiten.
