home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 2000 July / macformat-092.iso / Macromedia Flash 4 / Sample Pages / Objects / save.asp < prev   
Encoding:
Text File  |  1999-05-10  |  230 b   |  15 lines
  1. <% 
  2.  
  3. state = Request.form("state")
  4.  
  5. Application.Lock
  6. id = Application("objectid") + 1
  7. Application("objectid") = id
  8. Application("objectstate") = state
  9. Application.Unlock
  10.  
  11. response.write("id=") 
  12. response.write(id)
  13.  
  14. %>
  15.