home *** CD-ROM | disk | FTP | other *** search
/ Australian Personal Computer 1999 April / APC443.iso / features / grpware / coldfus / coldfusi.exe / data1.cab / Examples / publish / admin / viewpage.cfm < prev   
Encoding:
Text File  |  1998-10-08  |  3.4 KB  |  104 lines
  1. <CFHEADER NAME="pragma" VALUE="no-cache">
  2.  
  3. <CFQUERY DATASOURCE="CFexamples" NAME="GetPage">
  4. SELECT * FROM PubPages WHERE PageID = #PageID#
  5. </CFQUERY>
  6.  
  7. <CFQUERY DATASOURCE="CFexamples" NAME="GetInstances">
  8. SELECT * FROM PubInstances, PubContent
  9. WHERE PubInstances.ObjectID = PubContent.ObjectID
  10.     AND PubContent.TypeID = 1
  11.     AND PageID = #PageID#
  12. ORDER BY Priority DESC
  13. </CFQUERY>
  14.  
  15. <CFQUERY DATASOURCE="CFexamples" NAME="GetTypeName">
  16. SELECT * FROM PubContentTypes
  17. WHERE TypeID = 1
  18. </CFQUERY>
  19.  
  20. <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2 Final//EN">
  21.  
  22. <HTML>
  23. <HEAD>
  24.     <TITLE>Page Details</TITLE>
  25. <STYLE TYPE="text/css">
  26. <!-- A {text-decoration: none} -->
  27. </STYLE>
  28. </HEAD>
  29.  
  30. <BODY BGCOLOR="#660000" TEXT="#FFFFFF" LINK="#FFFF00" VLINK="#FFFF00">
  31.  
  32. <TABLE ALIGN="RIGHT" CELLPADDING="0" CELLSPACING="0">
  33. <TR>
  34.     <TD ALIGN="RIGHT">
  35.     <FONT FACE="MS Sans Serif, Helvetica" SIZE="-2">
  36.         <A HREF="index.cfm">Administrator Home</A><BR>
  37.         <A HREF="selectpage.cfm">Select New Page</A><BR>
  38.     </FONT>
  39.     </TD>
  40. </TR>
  41. </TABLE>
  42.  
  43. <P><IMG SRC="images/pagedetails.gif" WIDTH=102 HEIGHT=24 BORDER=0 ALT="Page Details"></P>
  44.  
  45. <P><FONT FACE="MS Sans Serif, Helvetica" SIZE="-2"><B>Click on an ObjectID to bring up that object's Property page.</B></FONT></P>
  46.  
  47. <TABLE BORDER="1" CELLPADDING="5" CELLSPACING="2">
  48. <TR>
  49.     <TD><FONT FACE="MS Sans Serif, Helvetica" SIZE="-2"><B>Object ID</B></FONT></TD>
  50.     <TD><FONT FACE="MS Sans Serif, Helvetica" SIZE="-2"><B><CFOUTPUT>#GetTypeName.TypeName#</CFOUTPUT></B></FONT></TD>
  51.     <TD><FONT FACE="MS Sans Serif, Helvetica" SIZE="-2"><B>Priority</B></FONT></TD>
  52.     <TD><FONT FACE="MS Sans Serif, Helvetica" SIZE="-2"><B>Start</B></FONT></TD>
  53.     <TD><FONT FACE="MS Sans Serif, Helvetica" SIZE="-2"><B>End</B></FONT></TD>
  54.     <TD><FONT FACE="MS Sans Serif, Helvetica" SIZE="-2"><B>Priority</B></FONT></TD>
  55.     <TD></TD>
  56. </TR>
  57. <CFOUTPUT QUERY="GetInstances">
  58. <TR>
  59.     <TD><FONT FACE="MS Sans Serif, Helvetica" SIZE="-2"><A HREF="properties.cfm?ObjectID=#ObjectID#">#ObjectID#</A></FONT></TD>
  60.     <TD><FONT FACE="MS Sans Serif, Helvetica" SIZE="-2">#Data#</FONT></TD>
  61.     <TD><FONT FACE="MS Sans Serif, Helvetica" SIZE="-2">#Priority#</FONT></TD>
  62.     <TD><FONT FACE="MS Sans Serif, Helvetica" SIZE="-2">
  63.         <CFIF StartTime IS "">Beginning of time
  64.         <CFELSE>#StartTime#</CFIF>
  65.         </FONT></TD>
  66.     <TD><FONT FACE="MS Sans Serif, Helvetica" SIZE="-2">
  67.         <CFIF EndTime IS "">End of time
  68.         <CFELSE>#EndTime#</CFIF>
  69.         </FONT></TD>
  70.     <TD><FONT FACE="MS Sans Serif, Helvetica" SIZE="-2">#Priority#</FONT></TD>
  71.     <TD><FONT FACE="MS Sans Serif, Helvetica" SIZE="-2"><A HREF="deleteinstance.cfm?InstanceID=#InstanceID#" onClick="return confirm('This will delete the instance (the object will remain intact).\n\nPress OK to continue.')">Delete</A></FONT></TD>
  72. </TR>
  73. </CFOUTPUT>
  74. </TABLE>
  75.  
  76. <P> </P>
  77.  
  78. <P> </P>
  79.  
  80. <TABLE BORDER="2" CELLPADDING="7" CELLSPACING="0">
  81. <TR>
  82.     <TD>
  83.     <CFOUTPUT>
  84.     <FORM ACTION="deletepage.cfm" METHOD="POST">
  85.     <INPUT TYPE="HIDDEN" NAME="PageID" VALUE="#PageID#">
  86.  
  87.     <P><FONT FACE="MS Sans Serif, Helvetica" SIZE="-1"><B>Delete Page</B></FONT></P>
  88.     
  89.     <P><FONT FACE="MS Sans Serif, Helvetica" SIZE="-2">
  90.     <INPUT TYPE="RADIO" NAME="FileDelete" VALUE="0" CHECKED>Remove from database only<BR>
  91.     <INPUT TYPE="RADIO" NAME="FileDelete" VALUE="1">Remove from database AND delete <B>#GetPage.TemplatePath#</B> from hard drive
  92.     </FONT></P>
  93.     
  94.     <P><INPUT TYPE="SUBMIT" VALUE="Delete"></P>
  95.     
  96.     </FORM>
  97.     </CFOUTPUT>
  98.     </TD>
  99. </TR>
  100. </TABLE>
  101.  
  102. </BODY>
  103. </HTML>
  104.