編集履歴

質問編集履歴

"試行内容"を追加致しました。ご確認よろしくお願い致します。

2019/10/20 09:02

投稿

tap_13

スコア15

test CHANGED Viewed

File without changes

test CHANGED Viewed

@@ -16,6 +16,14 @@
 ![![イメージ説明](1c64d47da58a7a0556d2b1c4f0458540.png)
+### 進捗状況
+Form1,Form2の画面の表示(インスタンスの生成)は出来ています。
 ### ソースコード
 ※フォーム１はC#、フォーム２はVBで開発しています。
@@ -32,12 +40,6 @@
         xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
-        xmlns:d="http://schemas.microsoft.com/expression/blend/2008"
-        xmlns:mc="http://schemas.openxmlformats.org/markup-compatibility/2006"
-        mc:Ignorable="d"
         Title="MainWindow" Height="450" Width="800">
     <Grid>
@@ -58,14 +60,6 @@
 ```
-using System.Diagnostics;
-using System.ServiceModel;
-using System.Windows;
 namespace Form1
 {
@@ -112,10 +106,6 @@
         /// </summary>
-        /// <param name="sender"></param>
-        /// <param name="e"></param>
         private void Button_Click(object sender, RoutedEventArgs e)
         {
@@ -126,30 +116,20 @@
                 var message = Host.CallExecute(TextBox1.Text);
                 MessageBox.Show(message);
             }
-            catch(ProtocolException ex)
+            catch(FaultException<FailureInfo> fx)
             {
+                FailureInfo info = fx.Detail;
-                MessageBox.Show(ex.Message);
+                MessageBox.Show(info.Message);
             }
-            catch(FaultException<FailureInfo> fx)
-            {
-                FailureInfo info = fx.Detail;
-                MessageBox.Show(info.Message);
-            }
         }
     }
@@ -166,10 +146,6 @@
 ```
-using System.ServiceModel;
 namespace Form1
 {
@@ -198,14 +174,6 @@
 ```
-using System;
-using System.Reflection;
-using System.ServiceModel;
 namespace Form1
 {
@@ -238,10 +206,6 @@
 ```
-using System.Runtime.Serialization;
 namespace Form1
 {
@@ -270,45 +234,9 @@
-⑥フォーム２のXAML
+⑥フォーム２のコードビハインドクラス
-```
+```
-<Window x:Class="MainWindow"
-        xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
-        xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
-        xmlns:d="http://schemas.microsoft.com/expression/blend/2008"
-        xmlns:mc="http://schemas.openxmlformats.org/markup-compatibility/2006"
-        mc:Ignorable="d"
-        Title="MainWindow" Height="450" Width="800">
-    <Grid>
-        <TextBox x:Name="TextBox1" HorizontalAlignment="Left" Height="23" Margin="50,33,0,0" TextWrapping="Wrap" VerticalAlignment="Top" Width="120"/>
-    </Grid>
-</Window>
-```
-⑦フォーム２のコードビハインドクラス
-```
-Imports System.ServiceModel
-Imports Form1
 ''' <summary>
@@ -318,62 +246,46 @@
 Public Class MainWindow
     Public Host As ServiceHost
     Public Const Uri As String = "net.pipe://localhost/Form2"
+    Public Sub New()
+        Host = New ServiceHost(GetType(WcfClient))
+        Host.AddServiceEndpoint(
+                GetType(IWcfClient),
+                New NetNamedPipeBinding(NetNamedPipeSecurityMode.None),
+                New Uri(Uri))
+        Host.Open()
+        InitializeComponent()
+    End Sub
     ''' <summary>
-    ''' コンストラクタ
+    ''' テキストボックスに値をセットする
     ''' </summary>
-    Public Sub New()
-        Host = New ServiceHost(GetType(WcfClient))
-        Host.AddServiceEndpoint(
-                GetType(IWcfClient),
-                New NetNamedPipeBinding(NetNamedPipeSecurityMode.None),
-                New Uri(Uri))
-        Host.Open()
-        InitializeComponent()
-    End Sub
-    ''' <summary>
-    ''' テキストボックスに値をセットする
-    ''' </summary>
-    ''' <param name="text"></param>
-    ''' <returns></returns>
     Public Function Reply(ByVal text As String) As String
 　　　　　// テキストボックスにフォーム1より受け取った値をセット
         TextBox1.Text = text
         Return "Form2 Replyメソッドが呼ばれました"
     End Function
@@ -384,9 +296,173 @@
-### 実行結果
-FaultExceptionのスタックトレースに以下が出力されます。
+### 試行内容
+「④サービスの具象クラス」を以下のようにFacadeを用い、呼び出すアセンブリ・クラス・メソッドを動的に指定出来るように書き替え、Form1からForm2へプロセス間通信を実行しました。
+```
+    [ServiceBehavior(InstanceContextMode = InstanceContextMode.Single)]
+    public class WcfClient: IWcfClient
+    {
+        public string CallExecute(string text)
+        {
+            // Facadeを用いてForm２のReplyメソッドをコール
+            return Facade<string>("Form2.exe", "Form2.MainWindow", "Reply", text);
+        }
+        private T Facade<T>(string assembly, string className, string methodName, string text = "")
+        {
+            string path = Environment.CurrentDirectory + @"\" + assembly;
+            Assembly asm = Assembly.LoadFrom(path);
+            object obj = asm.CreateInstance(className);
+            Type type = obj.GetType();
+            MethodInfo mi = type.GetMethod(methodName);
+            object[] param = new object[1];
+            param[0] = text;
+            object returnObj = mi.Invoke(obj, param);
+            return (T)returnObj;
+        }
+    }
+}
+```
+上記を実行した結果、以下のスタックトレースが出力されました。
+```
+System.ServiceModel.FaultException
+  HResult=0x80131501
+  Message=内部エラーのため、クライアントは要求を処理できませんでした。このエラーの詳細については、例外情報をクライアントに返信するためにサーバーで IncludeExceptionDetailInFaults を有効にするか (ServiceBehaviorAttribute または <serviceDebug> 構成動作を通じて)、Microsoft .NET Framework SDK ドキュメントに従ってトレースを有効にして、サーバーのトレース ログを調べてください。
+  Source=mscorlib
+  スタック トレース:
+   場所 System.Runtime.Remoting.Proxies.RealProxy.HandleReturnMessage(IMessage reqMsg, IMessage retMsg)
+   場所 System.Runtime.Remoting.Proxies.RealProxy.PrivateInvoke(MessageData& msgData, Int32 type)
+   場所 Form1.IWcfClient.CallExecute(String text)
+   場所 Form1.MainWindow.Button_Click(Object sender, RoutedEventArgs e) (C:\workspace\20191020\WcfConnection\Form1\MainWindow.xaml.cs):行 34
+   場所 System.Windows.RoutedEventHandlerInfo.InvokeHandler(Object target, RoutedEventArgs routedEventArgs)
+   場所 System.Windows.EventRoute.InvokeHandlersImpl(Object source, RoutedEventArgs args, Boolean reRaised)
+   場所 System.Windows.UIElement.RaiseEventImpl(DependencyObject sender, RoutedEventArgs args)
+   場所 System.Windows.UIElement.RaiseEvent(RoutedEventArgs e)
+   場所 System.Windows.Controls.Primitives.ButtonBase.OnClick()
+   場所 System.Windows.Controls.Button.OnClick()
+   場所 System.Windows.Controls.Primitives.ButtonBase.OnMouseLeftButtonUp(MouseButtonEventArgs e)
+   場所 System.Windows.UIElement.OnMouseLeftButtonUpThunk(Object sender, MouseButtonEventArgs e)
+   場所 System.Windows.Input.MouseButtonEventArgs.InvokeEventHandler(Delegate genericHandler, Object genericTarget)
+   場所 System.Windows.RoutedEventArgs.InvokeHandler(Delegate handler, Object target)
+   場所 System.Windows.RoutedEventHandlerInfo.InvokeHandler(Object target, RoutedEventArgs routedEventArgs)
+   場所 System.Windows.EventRoute.InvokeHandlersImpl(Object source, RoutedEventArgs args, Boolean reRaised)
+   場所 System.Windows.UIElement.ReRaiseEventAs(DependencyObject sender, RoutedEventArgs args, RoutedEvent newEvent)
+   場所 System.Windows.UIElement.OnMouseUpThunk(Object sender, MouseButtonEventArgs e)
+   場所 System.Windows.Input.MouseButtonEventArgs.InvokeEventHandler(Delegate genericHandler, Object genericTarget)
+   場所 System.Windows.RoutedEventArgs.InvokeHandler(Delegate handler, Object target)
+   場所 System.Windows.RoutedEventHandlerInfo.InvokeHandler(Object target, RoutedEventArgs routedEventArgs)
+   場所 System.Windows.EventRoute.InvokeHandlersImpl(Object source, RoutedEventArgs args, Boolean reRaised)
+   場所 System.Windows.UIElement.RaiseEventImpl(DependencyObject sender, RoutedEventArgs args)
+   場所 System.Windows.UIElement.RaiseTrustedEvent(RoutedEventArgs args)
+   場所 System.Windows.UIElement.RaiseEvent(RoutedEventArgs args, Boolean trusted)
+   場所 System.Windows.Input.InputManager.ProcessStagingArea()
+   場所 System.Windows.Input.InputManager.ProcessInput(InputEventArgs input)
+   場所 System.Windows.Input.InputProviderSite.ReportInput(InputReport inputReport)
+   場所 System.Windows.Interop.HwndMouseInputProvider.ReportInput(IntPtr hwnd, InputMode mode, Int32 timestamp, RawMouseActions actions, Int32 x, Int32 y, Int32 wheel)
+   場所 System.Windows.Interop.HwndMouseInputProvider.FilterMessage(IntPtr hwnd, WindowMessage msg, IntPtr wParam, IntPtr lParam, Boolean& handled)
+   場所 System.Windows.Interop.HwndSource.InputFilterMessage(IntPtr hwnd, Int32 msg, IntPtr wParam, IntPtr lParam, Boolean& handled)
+   場所 MS.Win32.HwndWrapper.WndProc(IntPtr hwnd, Int32 msg, IntPtr wParam, IntPtr lParam, Boolean& handled)
+   場所 MS.Win32.HwndSubclass.DispatcherCallbackOperation(Object o)
+   場所 System.Windows.Threading.ExceptionWrapper.InternalRealCall(Delegate callback, Object args, Int32 numArgs)
+   場所 System.Windows.Threading.ExceptionWrapper.TryCatchWhen(Object source, Delegate callback, Object args, Int32 numArgs, Delegate catchHandler)
+   場所 System.Windows.Threading.Dispatcher.LegacyInvokeImpl(DispatcherPriority priority, TimeSpan timeout, Delegate method, Object args, Int32 numArgs)
+   場所 MS.Win32.HwndSubclass.SubclassWndProc(IntPtr hwnd, Int32 msg, IntPtr wParam, IntPtr lParam)
+   場所 MS.Win32.UnsafeNativeMethods.DispatchMessage(MSG& msg)
+   場所 System.Windows.Threading.Dispatcher.PushFrameImpl(DispatcherFrame frame)
+   場所 System.Windows.Threading.Dispatcher.PushFrame(DispatcherFrame frame)
+   場所 System.Windows.Application.RunDispatcher(Object ignore)
+   場所 System.Windows.Application.RunInternal(Window window)
+   場所 System.Windows.Application.Run(Window window)
+   場所 System.Windows.Application.Run()
+   場所 Form1.App.Main()
+```
+調べたところ、FaultExceptionの実行例外の詳細をクライアント側で取得するためには⑤のようなデバッグ追跡用のデータクラスが必要であったため、「FailureInfoクラス」を新規作成しました。
+そしてプロセス間通信の実行例外（FaultException）のスタックトレースを確認するため「④サービスの具象クラス」のように書き換えました。
+### 質問内容
+「④サービスの具象クラス」でFaultExceptionをスローし、プロセス間通信の実行例外のスタックトレースを確認した結果、以下が出力されました。
 自身で調査しましたが、真因が追求出来ていません。解決策をご存知の方いらっしゃいましたらご教授お願い致します。