home *** CD-ROM | disk | FTP | other *** search
/ Cool Page Magazine 16 / CoolPage_16.iso / dynadb / codes / deldetl.cfm < prev    next >
Text File  |  1998-01-22  |  1KB  |  51 lines
  1. <!------------------------------└╔ªWíGDeldetl.cfm------------------------------------------>
  2. <!----------------------------------------------------------------------------------------->
  3.  
  4. <html>
  5. <BODY background="paper12l.jpg">
  6.  
  7.  
  8.     <CFQuery Name="GetRecord" datasource="Dynamic database"> 
  9.         select * from detail, product
  10.         where detail.prod_id=product.prod_id
  11.     </CFQuery>
  12.  
  13. <cfif #GetRecord.recordcount# is 0>
  14.     ╝╞╛┌«wñññw╕g¿Sª│Ñ⌠ª≤░O┐²ñFíC
  15. <cfelse>
  16.  
  17.     <cfset k=0>
  18.     <cfset DetailRecord=ArrayNew(2)>
  19.     <cfoutput query="GetRecord">
  20.         <cfset k=k+1>
  21.         <cfset DetailRecord[1][k]="Order= " & #order_id# & ", product=" & #product_name#>
  22.         <cfset DetailRecord[2][k]=#order_id# & chr(142) & #prod_id#>
  23.     </cfoutput>
  24.     
  25.     ╜╨┐∩╛▄¡nºR░ú¬║¡q│µ╜s╕╣⌐M│f¬½╜s╕╣<br>
  26.     <PRE>
  27.  
  28.     <CFFORM NAME="UpdateForm" ACTION="deldtl2.cfm">
  29.        ▓╙╕`ñ║«e:     <cfSELECT NAME="selected_order_id"
  30.                 size="1">
  31.             <cfloop index="j" from="1" to=#k#>
  32.                 <cfoutput>
  33.                 <option value="#DetailRecord[2][j]#">#DetailRecord[1][j]#
  34.                 </cfoutput>
  35.             </cfloop>
  36.  
  37.             </cfselect>
  38.             <br>    
  39.  
  40.     ªp¬G╜T⌐w¡nºR░ú¬║╕▄íA╜╨½÷ñUñU¡▒¬║½÷╢síC    
  41.     <input type=submit value=¼O¬║íAº┌╜T⌐w¡nºR░ú│o¡╙¡q│µ▓╙╕`>
  42.  
  43.     </PRE>
  44.     </cfFORM>
  45. </cfif>
  46. <hr>
  47. <P ALIGN="center"><A HREF="/dynadb/index.htm">ª^¿∞ÑD¡╢</A></P>
  48. </BODY>
  49. </HTML>
  50.  
  51.