- cambio nome a classi passaggio dati
- aggiunto progetto Data - pulito codice
This commit is contained in:
@@ -1,4 +1,5 @@
|
||||
Imports EgwMultiEngineManager.ExecProcessManager
|
||||
Imports EgwMultiEngineManager.Data
|
||||
Imports EgwMultiEngineManager.ExecProcessManager
|
||||
Imports Newtonsoft.Json
|
||||
Imports StackExchange.Redis
|
||||
|
||||
@@ -54,7 +55,7 @@ Module MainModule
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub ExecProcessManager_AnswerReceived(Answer As ProcessArgsResult)
|
||||
Private Sub ExecProcessManager_AnswerReceived(Answer As Answer)
|
||||
m_RedisManager.Subscriber.Publish(OutputChn, JsonConvert.SerializeObject(Answer))
|
||||
m_stopWatch.Stop()
|
||||
' Format and display the TimeSpan value.
|
||||
@@ -65,7 +66,7 @@ Module MainModule
|
||||
Private Sub EgwEngineInputHandler(RedisChannel As RedisChannel, RedisValue As RedisValue)
|
||||
System.Console.WriteLine("Received value from channel " & RedisChannel.ToString())
|
||||
m_stopWatch.Restart()
|
||||
Dim Request As ProcessArgs = JsonConvert.DeserializeObject(Of ProcessArgs)(RedisValue)
|
||||
Dim Request As Question = JsonConvert.DeserializeObject(Of Question)(RedisValue)
|
||||
m_ExecProcessManager.ArgumentsEnqueue(Request)
|
||||
End Sub
|
||||
|
||||
|
||||
Reference in New Issue
Block a user