AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

- nuevo método SubString

Browse Source
This commit is contained in:
rrene
2024-01-08 11:05:29 -07:00
parent 6704d38b99
commit 6769d82e23
2 changed files with 5 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
Ventas/Ventas.aspx.vb
View File

@@ -5194,7 +5194,7 @@ Partial Class Ventas
HdnTotalVenta.Value = DbRowVenta("Total").ToString().FormatoNumero(2)
TxtMotivoDescuento.Text = DbRowVenta("MotivoDescuento").ToString()
TxtObsFact.Text = DbRowVenta("Observaciones").ToString()
LblUsuario.Text = DbRowVenta("Nombre").ToString().Substring(0, If(DbRowVenta("Nombre").ToString.Length > 30, 30, DbRowVenta("Nombre").ToString.Length))
LblUsuario.Text = DbRowVenta("Nombre").ToString().SubStringADS(30)
LblFechaRegistro.Text = DbRowVenta("FechaIng").ToString().ToDate.ToShortDateString
LblSeTimbro.Text = DbRowVenta("SeTimbro").ToString()
LblMail.Text = DbRowVenta("EnvioMail").ToString()