ChatControl + Test

ChatTest/ChatTest.vbproj

@@ -134,6 +134,10 @@
       <Project>{1f278760-4f6b-42e8-b82d-01d4c8618340}</Project>
       <Name>ChatControl</Name>
     </ProjectReference>
+    <ProjectReference Include="..\Modules.Logging\Logging.vbproj">
+      <Project>{903b2d7d-3b80-4be9-8713-7447b704e1b0}</Project>
+      <Name>Logging</Name>
+    </ProjectReference>
   </ItemGroup>
   <Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
 </Project>

ChatTest/Form1.vb

@@ -1,3 +1,11 @@
-Public Class Form1
+Imports DigitalData.Modules.Logging
 
+Public Class Form1
+    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles Me.Load
+        Dim oLogConfig As New LogConfig(LogConfig.PathType.CustomPath, Application.StartupPath)
+        Dim oConnectionString = "Server=sDD-VMP04-SQL17\DD_DEVELOP01;Database=IDB_TEST;User Id=sa;Password=dd;"
+
+        ChatControl1.Init(oLogConfig, oConnectionString, "JenneJ")
+        ChatControl1.LoadConversations(10070)
+    End Sub
 End Class