 |
热词世界杯 |
2004-02-14 09:33 出处：eNet硅谷动力 作者：飞刀 责任编辑：zwg
| 票 下一步就是让用户选择需要的票数.这部分的代码很像其它的部分。我将从数据库中查询相同的数据，因为Session不能在真正的WAP手机中使用，所以我必须对有些内容进行确认，看看是否还有座位出售. SQLquery = "SELECT * FROM show WHERE Show_id = " & show_id set rsShow = conn.Execute(SQLquery) : seats = rsShow("free_seats") : if seats = 0 then Response.write("Sorry, no more seats") rsShow.close set rsShow = nothing Response.write("< /p >< /card >< /wml >") Response.end else if seats > 6 then 'book up to 6 tickets or max available max_seats=6 else max_seats = seats end if end if ％ > < ％=movie_title％ > at < ％ =theater_name％ > < select name='ticket' > < ％ dim i i = 1 Do while i < = max_seats response.write("< option value='" & i & "' >" & i & " ticket(s)" & "< /option >" &vbcrlf) i = i + 1 loop ％ > < /select > |
软件大小：45.02 MB
软件授权：免费
立即下载
