home *** CD-ROM | disk | FTP | other *** search
/ Internet Pratica / IPRAT_01.iso / ASP / ASPFusion_Basic_Suite / examples / cf / advregistry / act_getall.cfm < prev    next >
Encoding:
ColdFusion Markup Language  |  2001-03-15  |  932 b   |  31 lines
  1. <html>
  2. <head>
  3.     <title>AdvRegistry Component</title>
  4. </head>
  5. <body>
  6. <cfobject class="AdvRegistry.Registry" action="CREATE" name="AdvRegistry">
  7. <cfset AdvRegistry.Type = #Form.Type#>
  8. <cfset AdvRegistry.Sort = #Form.Sort#>
  9. <cfSet Result = AdvRegistry.GetAll(#Form.Branch#)>
  10. <cfif #AdvRegistry.IsError# Eq 1>
  11.     Error: <cfoutput>#AdvRegistry.ErrorReason#</cfoutput> <br>
  12. <cfelse>
  13.     <TABLE WIDTH=75% ALIGN=center BORDER=1 CELLSPACING=1 CELLPADDING=1>
  14.     <TR bgcolor="black">
  15.         <TD bgcolor="black"><b><font color="white">Entry</font></b></TD>
  16.         <TD bgcolor="black"><font color="white">Type</font></b></TD>
  17.         <TD bgcolor="black"><font color="white">Value</font></b></TD>
  18.     </TR>
  19.     <cfloop collection="#Result#" item="Member">
  20.     <cfoutput><TR>
  21.         <TD>#Member.Entry#</TD>
  22.         <TD>#Member.Type#</TD>
  23.         <TD>#Member.Value#</TD>
  24.     </TR></cfoutput>
  25.     </cfloop>
  26.     </TABLE>
  27. </cfif>
  28. <A HREF="dsp_getall.htm">Back</A>
  29. </body>
  30. </html>
  31.