home *** CD-ROM | disk | FTP | other *** search
/ io Programmo 40 / IOPROG_40.ISO / SOFT / NETFrameworkSDK.exe / comsdk.cab / samples.exe / Remoting / MyObject / RemDiag.aspx < prev    next >
Encoding:
Text File  |  2000-06-23  |  5.6 KB  |  210 lines
  1. <%@ Page Language="C#" %>
  2. <%@ Import Namespace="System.Threading" %>
  3. <%@ Import Namespace="System.Reflection" %>
  4. <%@ Import Namespace="System.Runtime.Remoting" %>
  5.  
  6. <html>
  7.  
  8. <body style="font: 10pt verdana">
  9. <h3>Remoting Channels </h3>
  10.  
  11. <table cellpadding="1" cellspacing="1" width="100%" style="COLOR:
  12. black;FONT: 8pt verdana, arial" border="0" >
  13.  
  14.     <tr bgcolor="ffffff">
  15.         <td style="padding-left:10" width="*" bgcolor="#b6cbeb"><b>Channel Scheme</b></td>
  16.         <td style="padding-left:5;padding-right:15" width="*" bgcolor="#b6cbeb"><b>Priority</b></td>
  17.  
  18.         <td style="padding-left:5;padding-right:15" width="*" bgcolor="#b6cbeb"><b>MimeType</b></td>
  19.  
  20.         <td style="padding-left:5;padding-right:15" width="*" bgcolor="#b6cbeb"><b>Comments</b></td>
  21.     </tr>
  22.  
  23.     <% IChannel[] channels = ChannelServices.RegisteredChannels; %>
  24.     
  25.     <% for(int i=0;i<channels.Length;i++) { %>
  26.  
  27.     
  28.     <tr bgcolor="#eeeeee">
  29.  
  30.         <td style="padding-left:10"><%=channels[i].ChannelName%></td>
  31.  
  32.         <td style="padding-left:10"><%=channels[i].ChannelPriority%></td>
  33.  
  34.         <td style="padding-left:10"><%=channels[i].MimeType%></td>
  35.  
  36.  
  37.         <td style="padding-left:5;padding-right:15;COLOR:black;FONT: 7pt verdana, arial" width="320" align="left"><%=channels[i].ChannelName%></td>
  38.  
  39.  
  40.     </tr>
  41.    <% } %>
  42.    
  43.     <TD>
  44.  
  45. </table>
  46.  
  47.  
  48. <h3>Remoting Sender Channels </h3>
  49.  
  50. <table cellpadding="1" cellspacing="1" width="100%" style="COLOR:
  51. black;FONT: 8pt verdana, arial" border="0" >
  52.  
  53.     <tr bgcolor="ffffff">
  54.         <td style="padding-left:10" width="*" bgcolor="#b6cbeb"><b>Channel Scheme</b></td>
  55.     </tr>
  56.  
  57.     <% IChannel[] senderChannels = ChannelServices.RegisteredChannels; %>
  58.     
  59.     <% for(int i=0;i<senderChannels.Length;i++) { %>
  60.         
  61.         <% if (senderChannels[i] is IChannelSender) {%>
  62.  
  63.         
  64.     <tr bgcolor="#eeeeee">
  65.  
  66.         <td style="padding-left:10"><%=senderChannels[i].ChannelName%></td>
  67.  
  68.     </tr>
  69.         <% } %>
  70.    
  71.    <% } %>
  72.    
  73.     <TD>
  74.  
  75. </table>
  76.  
  77.  
  78. <h3>Remoting Receiver Channels </h3>
  79.  
  80. <table cellpadding="1" cellspacing="1" width="100%" style="COLOR:
  81. black;FONT: 8pt verdana, arial" border="0" >
  82.  
  83.     <tr bgcolor="ffffff">
  84.         <td style="padding-left:10" width="*" bgcolor="#b6cbeb"><b>Channel Scheme</b></td>
  85.  
  86.         <td style="padding-left:5;padding-right:15" width="*" bgcolor="#b6cbeb"><b>ChannelData</b></td>
  87.     </tr>
  88.  
  89.     <% IChannel[] receiverChannels = ChannelServices.RegisteredChannels; %>
  90.     
  91.     <% for(int i=0;i<receiverChannels.Length;i++) { %>
  92.         
  93.         <% if (receiverChannels[i] is IChannelReceiver) {%>
  94.  
  95.         
  96.     <tr bgcolor="#eeeeee">
  97.  
  98.         <td style="padding-left:10"><%=receiverChannels[i].ChannelName%></td>
  99.  
  100.         <td style="padding-left:10">
  101.             <% Object channelData = ((IChannelReceiver)receiverChannels[i]).ChannelData;%>
  102.             
  103.             <% if (channelData is System.String[]){ %>
  104.                 
  105.                 <% 
  106.                 String[] stringArray = (String[])(channelData);
  107.                 for(int j=0;j<stringArray.Length;j++) { %>
  108.                 <%=stringArray[j]%>
  109.             <p>
  110.                 <% } %>
  111.             
  112.             <% } %>
  113.             
  114.             <% else %>
  115.                 <%=((IChannelReceiver)receiverChannels[i]).ChannelData.ToString()%></td>
  116.  
  117.  
  118.     </tr>
  119.         <% } %>
  120.    
  121.    <% } %>
  122.    
  123.     <TD>
  124.  
  125. </table>
  126.  
  127.  
  128. <h3>Assemblies </h3>
  129.  
  130. <table cellpadding="1" cellspacing="1" width="100%" style="COLOR:
  131. black;FONT: 8pt verdana, arial" border="0" >
  132.  
  133.     <tr bgcolor="ffffff">
  134.         <td style="padding-left:10" width="*" bgcolor="#b6cbeb"><b>Assembly</b></td>
  135.  
  136.         <td style="padding-left:5;padding-right:15" width="*" bgcolor="#b6cbeb"><b>Description</b></td>
  137.     </tr>
  138.  
  139.     <% Assembly[] assemblies = Thread.GetDomain().GetAssemblies(); %>
  140.     
  141.     <% for(int i=0;i<assemblies.Length;i++) { %>
  142.     
  143.     <tr bgcolor="ffffff">
  144.         <td style="padding-left:10"><%=assemblies[i].FullName %></td>
  145.  
  146.         <td style="padding-left:10"><%=assemblies[i].ToString() %></td>
  147.  
  148.     </tr>
  149.  
  150.    <% } %>
  151.    
  152.     <TD>
  153.  
  154. </table>
  155.  
  156.  
  157. <h3>Lifetime </h3>
  158.  
  159. <table cellpadding="1" cellspacing="1" width="100%" style="COLOR:
  160. black;FONT: 8pt verdana, arial" border="0" >
  161.  
  162.     <tr bgcolor="ffffff">
  163.         <td style="padding-left:10" width="*" bgcolor="#b6cbeb"><b>Setting</b></td>
  164.  
  165.         <td style="padding-left:5;padding-right:15" width="*" bgcolor="#b6cbeb"><b>Value</b></td>
  166.  
  167.         <td style="padding-left:5;padding-right:15" width="*" bgcolor="#b6cbeb"><b>Description</b></td>
  168.     </tr>
  169.  
  170.     <tr bgcolor="ffffff">
  171.         <td style="padding-left:10">LeaseTime</td>
  172.  
  173.         <td style="padding-left:10"><%=LifetimeServices.LeaseTime %></td>
  174.  
  175.         <td style="padding-left:10">Default Lease Time span</td>
  176.     </tr>
  177.  
  178.     <tr bgcolor="ffffff">
  179.         <td style="padding-left:10">RenewOnCallTime</td>
  180.  
  181.         <td style="padding-left:10"><%=LifetimeServices.RenewOnCallTime %></td>
  182.  
  183.         <td style="padding-left:10">Renew on call time span</td>
  184.     </tr>
  185.  
  186.     <tr bgcolor="ffffff">
  187.         <td style="padding-left:10">SponsorshipTimeout</td>
  188.  
  189.         <td style="padding-left:10"><%=LifetimeServices.SponsorshipTimeout %></td>
  190.  
  191.         <td style="padding-left:10">Default SponsorShipTimeout</td>
  192.     </tr>
  193.  
  194.     <tr bgcolor="ffffff">
  195.         <td style="padding-left:10">LeaseManagerPollTime</td>
  196.  
  197.         <td style="padding-left:10"><%=LifetimeServices.LeaseManagerPollTime %></td>
  198.  
  199.         <td style="padding-left:10">LeaseManagerPollTime</td>
  200.     </tr>
  201.  
  202.     <TD>
  203.  
  204. </table>
  205.  
  206.  
  207.  
  208. </body>
  209. </html>
  210.