WAP의 ASP 기술 (4)
저자：Eve Cole
업데이트 시간：2009-05-30 19:54:43
극장과 상영시간을 선택하세요
이 코드 부분을 통해 사용자는 영화를 볼 시간을 선택할 수 있습니다. 모든 기록은 이전 페이지에서 선택한 영화를 기준으로 결정됩니다. 여기에서 극장과 상영 시간을 선택하세요.
movie_id = 요청("영화")
sqlQuery = "영화 WHERE Movie_id = " & movie_id에서 제목 선택
rsMovie = conn.Execute(sqlQuery) 설정
movie_title = rsMovie("제목")
:
sqlQuery = "SELECT [이름], [시간], [쇼_ID] FROM 쇼, 극장 " &_
"어디에서 show.movie_id = " & movie_id &_
"AND Theater.theater_id = show.theater_id"
rsShows = conn.Execute(SQLquery) 설정
이 코드를 주의 깊게 연구하면 Session을 사용하여 영화 정보를 저장한 다음 이 페이지에서 쿼리하는 것이 더 쉽습니다. 또한 안타깝게도 세션이 필요합니다.
쿠키 지원은 WAP 사양에서도 지원되지만 Nokia 7110에서는 지원되지 않습니다. 이는 아직 WAP에서 세션을 사용할 수 없음을 의미합니다.
서비스 중입니다.
다음은 몇 가지 흥미로운 사항입니다.
<이름 선택='표시'>
<%
rsShows.eof가 아닌 동안 수행
response.write("<옵션 값='" & rsShows("show_id") & "'>" & Left(rsShows("name"),cutter) & " (" &
rsShows("시간") & ")" & "</option>" &vbcrlf)
RSShows.MoveNext
루프 %>
</select>
커터 변수가 궁금하다면 웃기도 하고 울기도 하는 내용이 있습니다.
딤 커터
if InStr(Request.ServerVariables("HTTP_USER_AGENT"), "Nokia7110") then
커터 = 12
또 다른
커터 = 7
종료하면
이 코드는 다양한 장치에 따른 옵션을 표시합니다. 이렇게 하는 데는 그럴 만한 이유가 있습니다. Nokia Toolit 1.2 에뮬레이터는 옵션을 몇 글자로 줄이는 것을 좋아하고 영화 이름과 출시 날짜를 표시하려고 하므로 영화 이름의 문자를 줄여야 합니다. 실제 휴대폰에서는 이런 문제가 발생하지 않기 때문에 먼저 기기의 종류를 파악해야 합니다.
실제 Nokia 7110에서 내 코드를 테스트할 기회가 생겼을 때(나는 가난했고 돈도 없었습니다. 이것은 먼 꿈이었습니다...) 우리는 즉시 우리가 생각했던 것보다 더 많은 것을 가지고 있다고 느꼈습니다. 실제로 일부 영화관에는 이상한 이름이 있으며 이러한 긴 이름은 화면 공간을 많이 차지합니다. 이 표시 공간을 낭비하고 이름을 단순화하려고 할 필요가 없습니다.
표
다음 단계는 사용자가 원하는 투표 수를 선택하도록 하는 것입니다. 코드의 이 부분은 다른 부분과 매우 유사합니다. Session은 실제로 사용할 수 없기 때문에 데이터베이스에서 동일한 데이터를 쿼리하겠습니다.
WAP폰을 사용하고 있어서 아직 판매 좌석이 있는지 컨텐츠를 좀 확인해 봐야겠습니다.
SQLquery = "SELECT * FROM show WHERE Show_id = " & show_id
rsShow = conn.Execute(SQLquery)를 설정합니다.
:
좌석 = rsShow("free_seats")
:
좌석 = 0이면
Response.write("죄송합니다. 좌석이 더 이상 없습니다.")
rsShow.close
rsShow = 아무것도 설정하지 않음
Response.write("</p></card></wml>")
응답.끝
또 다른
좌석 > 6인 경우 '최대 6장의 티켓을 예약하거나 최대 이용 가능
최대 좌석=6
또 다른
max_seats = 좌석
종료하면
종료하면
%>
<%=movie_title%>, <% =theater_name%>
<이름 선택='티켓'>
<%
디미
나는=1
내가 <= max_seats인 동안 수행
response.write("<option value='" & i & "'>" & i & " 티켓" & "</option>" &vbcrlf)
나는 = 나는 + 1
루프 %>
</select>
투표 저장
이제 필요한 모든 데이터가 있으므로 저장해야 합니다.
티켓 = 요청("티켓")
:
free_seats = rsShow("free_seats")
:
free_seats = free_seats - 티켓
:
SQLUpdate = "업데이트 표시" &_
"SET Show.free_seats=" & free_seats & " " &_
" WHERE Show_ID=" & 쇼_ID
conn.Execute(SQLupdate)
SQLquery = "예약에서 예약 번호로 max([Booking_ID])를 선택하세요."
rsBooking = conn.execute(SQLquery) 설정
maxbookid = rsBooking("bookingnumber") + 1
SQLinsert = "예약에 삽입( show_id, books_seats ) " & _
"VALUES ('" & show_id & "', '" & 티켓 & "')"
conn.Execute(SQLinsert) %>
<%=movie_title%><br /> <%=tickets%> 티켓을 예약했습니다.
공연은 <%=theater_name%>(<%=time%>)에서 열립니다.
<br />
귀하의 참조 번호는 <%=maxbookid%>입니다.
아래는 디스플레이입니다:
그림 4: 거래 완료.
거래가 완료되었으며 영화관은 영화관 문 앞에 앉아 돈을 징수할 수 있습니다.
결론적으로
WAP는 이제 막 첫 걸음을 내디뎠지만 최근 몇 년간 가장 혁신적인 IT 발전 중 하나입니다. 이 기사에서는 ASP를 사용하여 WAP 애플리케이션을 작성하는 방법을 소개합니다.
그리고 나는 여러분에게 몇 가지 경고를 주었습니다. 이것이 여러분의 향후 발전에 도움이 되기를 바랍니다. 멀티미디어 기술은 여전히 WAP에서 많이 사용될 수 없지만 이동성이 중요하며 판매자에게 많은 비즈니스 기회를 제공합니다.
