GraphQLTest: Prepare for test

Modules.Interfaces/GraphQLInterface.vb

@@ -71,11 +71,12 @@ Public Class GraphQLInterface
     Public Function GetData(Query As String, OperationName As String) As HttpWebResponse
         Try
             Dim oQueryData As New QueryData() With {
-                       .OperationName = OperationName,
-                       .Query = Query,
-                       .Variables = New Object
-                   }
-            Dim oBytes = ToBytes(JsonConvert.SerializeObject(oQueryData))
+                .operationName = OperationName,
+                .query = Query,
+                .variables = New Object
+            }
+            Dim oJson = JsonConvert.SerializeObject(oQueryData)
+            Dim oBytes = ToBytes(oJson)
             Dim oRequest = GetRequest("/graphql", oBytes)
 
             Using stream = oRequest.GetRequestStream()
@@ -107,7 +108,7 @@ Public Class GraphQLInterface
 
     Private Function GetCookies() As CookieContainer
         If _cookieJar Is Nothing Then
-            _cookieJar = New CookieContainer()
+            _cookieJar = New CookieContainer(300, 20, 8192)
         End If
 
         Return _cookieJar