Dim s As String = $"SELECT axgroups.*, axio.TimeX101, axio.TimeX102, axio.TimeX103,
axio.TimeX104, axio.FirstCharX201, axio.FirstCharX202, axio.FirstCharX203, axio.FirstCharX204,
axio.HaveReaderTime, axio.AXConnectX201, axio.AXConnectX202, axio.AXConnectX203, axio.AXConnectX204,
axio.APBXReader1, axio.APBXReader2, axio.APBXReader3, axio.APBXReader4, axio.X101, axio.X102, axio.X103,
axio.X104 FROM axgroups, axio WHERE axgroups.Client = 'RS Support' AND axio.Client = 'RS Support' AND axgroups.ModuleName = 'Singel Module' AND (axgroups.TagNumber LIKE '%0000000036A5813C%' OR axgroups.TagNumber LIKE '%36A5813C%') AND axio.AXName = 'Singel Module' AND axgroups.UserUsing = 1 AND axgroups.ConX201 = '1';"$
fx.Clipboard.SetString(s)
Log(s.Length)
Log(fx.Clipboard.GetString.Length)