-- option strict on

2023-08-25 07:35:45 -07:00
parent 7789b60482
commit 6ac06a9649
21 changed files with 76 additions and 76 deletions
--- a/Sistemas/PopUpCambiaUsuarioEmpresa.aspx.vb
+++ b/Sistemas/PopUpCambiaUsuarioEmpresa.aspx.vb
@@ -49,7 +49,7 @@ Partial Class Sistemas_PopUpCambiaUsuarioEmpresa

            Dim splitedtext As String() = Request.Url.AbsoluteUri.Replace("http://", "").Replace("https://", "").Split("."c)
            If Request.Url.AbsoluteUri.Contains("sig.agrojam.com.mx") Then
-                CveEmpresa = 119
+                CveEmpresa = "119"
            End If

            If splitedtext.Length > 0 Then