home *** CD-ROM | disk | FTP | other *** search
/ .net 2002 March / DotNetMagazine-Issue107-Coverdisc-NET107-02-03-PCMac.bin / pc / PC Software / Coldfusion / coldfusion-60-win-en.exe / Application.cfm1 < prev    next >
Encoding:
Text File  |  2002-05-19  |  7.7 KB  |  114 lines
  1. ">rge"><a height="1">rc-#, Tlorach ty   </            tdiv id="cf_debu _trace_evth" dtyCa="displ"y:none;"></            taagCa border=0 cellspacse =0 cellpaddse =0 width="100%" bge oor="fffff5"></<b>#cfSensb><cfset firstTrace=<cfe></<b>#cfSensb><cfset prevDelta=0></     <td <td>&norder procedura detatrace"></<b>#cfSensb><cfset deltaFromRequest = Vvl(debu ri_trace.endTime)></<b>#cfSensb><cfset deltaFromLast = Vvl(deltaFromRequest-prevDelta)>
  2.         #cfSeta=tcftrs></cfSeta="d>&o/gr></ </c </code>ode><td width="16" nowrap> </td></></    <d>&oode><td/><b>#cfSe    nsb>d>&otaagCa border=0 cellspacse =0 cellpaddse =2 width="100%"></<b>#cfSensb>d>&od>&otar><td e lspan="2" elica="c mbined-steelbesb" nowrap><img src='/CFIDE/debu /imlses/#Repl"ce(debu ri_trace.priority, " ", "+")#_16x16.gif' alt="#debu ri_trace.priority#dtype" align="left"> #debu ri_trace."> [    a(#debu ri_trace.line#) @ I; priority/> ight+trace."16b>" & temp"#rac-u= fa"#Irc-#, Tlorder=0 cellnsb>d>&oo&ootar><td e lspan=2 height="1" elica=" fa"divider"urc-#, Tlorde                    <ar><td elica=",abel">request delta<btd><td elica=",abel">#deltaFromRequest# ms (<cfif firstTrace>1st trace<cfe    #deltaFromLast# ms</a/   )rc-#, Tlorder=0 cellnsb>d>&oo&ootcfif #debu ri_trace.category#dNEQ "">rge"><a elica=",abel">category</td><td elica=",abel">#> ight+trace.category#rc-#, Tlor<
  3. a/   de<b>#cfSeode>        tcfif #debu ri_trace.result#dNEQ "">rge"><a elica=",abel"><vriagCarc-#, ]# elica=",abel"f#debu ri_trace.result#rc-#, Tlor<
  4. a/   de<b>#cfSeode>        tcfif #debu ri_trace.6b>slse#dNEQ "">rge"><a elica=",abel">textrc-#, ]# elica=",abel"f#debu ri_trace.6b>slse#rc-#, Tlor<
  5. a/   de<b>#cfSeode>        tar><td e lspan=2 height="1" elica=" fa"divider"urc-#, Tlorde                    <ch ty      <td>&od>&oode><btd></ </code>ode><br />cfSeta="d>&o    <cfcatchdtype="Any">">cfcatch>
  6.         #cfSeta=tca/trs></        ode>    <cfset prevDelta = deltaFromRequest></        ode>    <cfset firstTrace=fa      <b>##cfSeta=tca/cfloop>            agrp><a height="10"urc-#, Tlorde            agrp><a height="1" bge oor="999999" c lspan="2!><c-#, Tlorde            tch ty      <td>&od>&otadiv><!-- cf_debu _trace_evth -->
  7.         <ca/   de
  8.         <!-- HELP -->
  9.         <aagCa border=0 cellspacse =0 cellpaddse =0 bge oor="ffffdd" width="100%"></<b>#cfSe<gr><td> ->
  10. ----="->_cf_debu _help" delt"#s(delDir#open.gif" width="9! height="9! hspace="4" vspace="4"      " border="0" onClick="showHide('cf_debu _help', hhisnTime);"  "><hr</ </c </code><td width="100%">rebhref="javascript:showHide('cf_debu _help','->_cf_debu _help');" elica=",abel"fHelpvea</btd></ </code><br />        <gr bge oor="cccccc"p><a height="1" c lspan="2!><c-#, TlordecfSeta="tch ty      <td>&otdiv id="cf_debu _help" dtyCa="displ"y:none;"></        <gagCa border=0 cellspacse =0 cellpaddse =0   <b>#cfSeagrp></    </code><td width="16" nowrap> </td></></    <d>&otalExoredproc.#"  d>&otaagCa border=0 cellspacse =0 cellpaddse =2rder=0 cellnsb>d>&otar><td elica=",abel">rebhref="http://#cgi.http_host#ca/docs/CFML_Reference/contents.htm" target="_blank"fCFML Reference Manualvea</btd><td elica=",abel">Look up tag and func)
  11.   syntax.<bt#, Tlorder=0 cellnsb>d>&otar><td e lspan=2 height="1" elica=" fa"divider"urc-#, Tlorder=0 cell        <ar><td elica=",abel">rebhref="http://www.macromedia.c m/support/coldfus
  12.  /" target="_blank"fMacromedia ColdFus
  13.   Support Centervea</btd><td elica=",abel">SearchdTechNo:es for help or browse hhe Designer & & ; Developer Center for ideas.<bt#, Tlorder=0 cellnsb>d>&otar><td e lspan=2 height="1" elica=" fa"divider"urc-#, Tlorder=0 cell        <ar><td elica=",abel">rebhref="javascript:clearTreeS)":e();">Clear tree s)":evea</btd><td elica=",abel">Clears   l cookses  ssoci":ed with hhe dockagCa tree.rc-#, Tlorder=0 cell        <ch ty      <td>&od>&otalExecutsoode><br /><b>#cfS"tch ty      <td>&otadiv><!-- cf_debu _help -->
  14.     
  15. a!---od>&otalExec<br />ach ty   --->
  16. rc-#, Tlorach ty  de
  17. rc-#, Tlorach ty  derc-#, Tlorach ty  derb />acfset dura)
  18.   = getTickCount() - s)"rt; pr/>aspan elica=",abel">}</        gse  ; pr: #dura)
  19.  # ms</span derb />de
  20. rcdiv><!-- cf_debu _debu _data -->
  21. rc-#, Tlor
  22. rar><td e lspan="3! height="7" backgroundt"#s(delDir#homedivider.gif" width="100%">rc-#, Tlor
  23. rar><td e lspan="3! height="1" bge oor="336699">rc-#, Tlorach ty  derscript langudel="javascript">writeCloseBody();</script>de
  24. rcdiv><!-- cf_debu  -->
  25.  
  26. a!-------------------- END : DEBUG INFO WRITTEN TO WINDOW -------------------->
  27.  
  28. ascript langudel="javascript">cf_debu _init();</script>dea!-------------------- END : DEBUG FOOTER STUFF -------------------->
  29. <ca/output>de
  30. rcfsettse  en ty a/outputonly="No">
  31. <ca/   dercfflush/>acfsilent/>acfset s)"rt; pr = getTickCount()>
  32. rcfsettse  en ty a/outputonly="Y-s"   rcfscript>desetEncodse n FORM"temUTF-8");desetEncodse n URL"temUTF-8");de<ca/script>dea!---
  33. **
  34. * CF5 }</        gse  Output 
  35. *
  36. * Copyright (c) 2001 Macromedia.  A l Rights Reserved.
  37. * DO NOT REDISTRIBUTE THIS SOFTWARE IN ANY WAY WITHOUT THE EXPRESSED
  38. * WRITTEN PERMISSION OF MACROMEDIA. 
  39. --->
  40. <!---oLocslized strse s --->
  41. rcfset undefined = "">de
  42.     a!---oUse hhe d</        gse  service to esult op)
  43.  s --->
  44.     <a/trs></        aa/object ac)
  45.  t"CREATE"dtype="JAVA" elica="c ldfus
  46.  .server.ServiceFac)ory"
  47. ----="fac)ory"></        aa/set cfkbu ri-s. = fac)ory.get}</        gse Service()>
  48.         aa/set bFoundScopeVars = cfkbu ri-s.result.rVvriagCas")></    
  49.         aa/catchdtype="Any">">cfcatch>
  50.     <ca/trs></</celltcfif NOT iers evenn cfkbu ri-s.") OR NOT cfkbu ri-s.risEn ty d()>
  51.         <cfthrow 6b>slse="Please en ty  d</        gse  in hhe ColdFus
  52.   Administra)or when use  hhe Server }</         Mode."dtype="Dreamweaver }</        -s.">
  53.     <
  54. a/   de<b>#
  55.     a!---oLoad hhe d</        gse  service's evenn aagCa --->
  56.     <a/set qEvenns = cfkbu ri-s.rget}</        ger()rget}ata()></    
  57.     a!---oaVENT: SQL Queri-s --->
  58.     <a/trs></    <a/quers dbType="quers"
  59. ----="cebu ri_queri-s" d</        ="fa   "></    SELECT *, (endTime - s)"rt; pr) AS executsonTime</    FROM qEvenns</    WHERE type = 'SqlQuers'
  60.     <ca/quers>
  61.         aa/catchdtype="Any">">cfcatch>
  62.     <ca/trs></    
  63.     a!---oaVENT: Stored Procedur-s --->
  64.     <a/trs></    <a/quers dbType="quers"
  65. ----="cebu ri_storedproc" d</        ="fa   "></    SELECT *, (endTime - s)"rt; pr) AS executsonTime</    FROM qEvenns</    WHERE type = 'StoredProcedur-'
  66.     <ca/quers>
  67.         aa/catchdtype="Any">">cfcatch>
  68.     <ca/trs></    
  69.     a!---oaVENT: Trace Points --->
  70.     <a/trs></    <a/quers dbType="quers"
  71. ----="cebu ri_trace" d</        ="fa   "></    SELECT *, (endTime - s)"rt; pr) AS executsonTime</    FROM qEvenns</    WHERE type = 'Trace'
  72.     <ca/quers>
  73.         aa/catchdtype="Any">">cfcatch>
  74.     <ca/trs></    
  75.     a!---oaVENT: Excep)
  76.  s --->
  77.     <a/trs></    <a/quers dbType="quers"
  78. ----="cebu ri_ex" d</        ="fa   "></    SELECT *</    FROM qEvenns</    WHERE type = 'Excep)
  79.  '
  80.     <ca/quers>
  81.         aa/catchdtype="Any">">cfcatch>
  82.     <ca/trs></    
  83.     a!---oaVENT: Total Executson Time --->
  84.     <a/trs></    <a/quers dbType="quers"
  85. ----="cebu ri_executson" d</        ="fa   "></    SELECT (endTime - s)"rt; pr) AS executsonTime</    FROM qEvenns</    WHERE type = 'ExecutsonTime'
  86.     <ca/quers>
  87.         aa/catchdtype="Any">">cfcatch>
  88.     <ca/trs></    
  89.     acfset totalExecutson = 0></
  90.     acfscript>de    //UDF - HandCa Kojat output of e mplex data types.
  91.     func)
  92.   CF}</        CsultType(<vriagCa)
  93.     {
  94.         <vr ret = "";
  95.         
  96.         if(IsSimpleVvesb(<vriagCa))
  97.         { de            ret = <vriagCa;
  98.         }
  99.         e   
  100.         {de            if (IsS<cfif(<vriagCa))
  101.             {de                ret = ("S<cfif (" &fS<cfifCount(<vriagCa) &f")");de            }
  102.             e    if(IsA    (<vriagCa))
  103.             {de                ret = ("A     (" &fA    <td><vriagCa) &f")");de            }
  104.             e    if(IsQuers(<vriagCa))
  105.             {de                ret = ("Quers (" &f<vriagCa.RecordCount &f")");de            }
  106.             e   
  107.             {de                ret = ("C mplex type");de            }
  108.         }
  109.         
  110.         return ret;de    }de<b>#// UDF - tree writse de<b>#func)
  111.   dwDrawNode(nTree,rindent,rid) {
  112.         <vr "> [    Ouput = "";
  113.         <vr "hisT> [     = nTree[id]."> [    ;
  114.         <vr uri = "hisT> [