home *** CD-ROM | disk | FTP | other *** search
/ Australian Personal Computer 1999 April / APC443.iso / features / grpware / coldfus / coldfusi.exe / data1.cab / Examples / publish / admin / createobject.cfm < prev    next >
Encoding:
Text File  |  1998-10-08  |  1.2 KB  |  52 lines

  1. <!--- Initialize the Session variables we're going to need --->
  2. <CFSET Session.AddContent.ClassID = "">
  3. <CFSET Session.AddContent.ObjectID = "">
  4.  
  5. <!--- Fetch data classes --->
  6. <CFQUERY DATASOURCE="CFexamples" NAME="GetDataClasses">
  7. SELECT * FROM PubDataClasses
  8. </CFQUERY>
  9.  
  10. <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2 Final//EN">
  11.  
  12. <HTML>
  13. <HEAD>
  14.     <TITLE>Create Object</TITLE>
  15. <STYLE TYPE="text/css">
  16. <!-- A {text-decoration: none} -->
  17. </STYLE>
  18. </HEAD>
  19.  
  20. <BODY BGCOLOR="#660000" TEXT="#FFFFFF" LINK="#FFFF00" VLINK="#FFFF00">
  21.  
  22. <TABLE ALIGN="RIGHT" CELLPADDING="0" CELLSPACING="0">
  23. <TR>
  24.     <TD>
  25.     <FONT FACE="MS Sans Serif, Helvetica" SIZE="-2">
  26.         <A HREF="index.cfm">Administrator Home</A>
  27.     </FONT>
  28.     </TD>
  29. </TR>
  30. </TABLE>
  31.  
  32. <P><IMG SRC="images/createobject.gif" WIDTH=144 HEIGHT=28 BORDER=0 ALT="Create Object"></P>
  33.  
  34. <FORM ACTION="addcontent.cfm" METHOD="POST">
  35.  
  36. <P><FONT FACE="Helvetica"><B>1. Choose an object class:</B></FONT></P>
  37.  
  38. <FONT FACE="MS Sans Serif, Helvetica" SIZE="-2">
  39.  
  40. <P><CFOUTPUT QUERY="GetDataClasses">
  41.     <INPUT TYPE="RADIO" NAME="ClassID" VALUE="#ClassID#">#ClassName#<BR>
  42. </CFOUTPUT></P>
  43.  
  44. </FONT>
  45.  
  46. <P><INPUT TYPE="SUBMIT" VALUE="Continue"></P>
  47.  
  48. </FORM>
  49.  
  50. </BODY>
  51. </HTML>
  52.