-- cambios guias

This commit is contained in:
rrene
2020-06-02 08:14:57 -07:00
parent f3e6d01590
commit e3917bb04f
5 changed files with 13 additions and 12 deletions

View File

@@ -1667,7 +1667,7 @@ Partial Class Clientes
End If
TxtCorreoEntregaCompras.Text = ObjClientes.DtResultados(0)("CorreoEntregaCompras").ToString
TxtCorreoEntregaAlmacen.Text = ObjClientes.DtResultados(0)("CorreoEntregaCompras").ToString
TxtCorreoEntregaAlmacen.Text = ObjClientes.DtResultados(0)("CorreoEntregaAlmacen").ToString
Else
Existe = False
Alert("El Cliente Solicitado no existe, por favor revise su búsqueda.", TipoMensaje.MsgAdvertencia)