DESCRIPCIÓN:
Formatea la cadena de ValorOrigen para que sea aceptada en una URL
EJEMPLO:
ValorOrigen: “Artículo 20% Descuento 10€”
ValorProcesado: “articulo-20-descuento-10”
CONFIGURACIÓN:
| Valor | Valor2 | Relacion | Relacion2 | Operacion | Factor |
| URL | |||||
CÓDIGO:
If Factor = “ConEspacios” Then
Else
ValorOrigen = ValorOrigen.ToString.Replace(” “, “-“)
End If
ValorOrigen = ValorOrigen.ToLower
ValorOrigen = ValorOrigen.ToString.Replace(“.”, “”)
ValorOrigen = ValorOrigen.ToString.Replace(“,”, “”)
ValorOrigen = ValorOrigen.ToString.Replace(“:”, “”)
ValorOrigen = ValorOrigen.ToString.Replace(“*”, “”)
ValorOrigen = ValorOrigen.ToString.Replace(“/”, “”)
ValorOrigen = ValorOrigen.ToString.Replace(“‘”, “”)
ValorOrigen = ValorOrigen.ToString.Replace(“(“, “”)
ValorOrigen = ValorOrigen.ToString.Replace(“)”, “”)
ValorOrigen = ValorOrigen.ToString.Replace(“ª”, “”)
ValorOrigen = ValorOrigen.ToString.Replace(“º”, “”)
ValorOrigen = ValorOrigen.ToString.Replace(“^”, “”)
ValorOrigen = ValorOrigen.ToString.Replace(“@”, “”)
ValorOrigen = ValorOrigen.ToString.Replace(“$”, “”)
ValorOrigen = ValorOrigen.ToString.Replace(“{“, “”)
ValorOrigen = ValorOrigen.ToString.Replace(“}”, “”)
ValorOrigen = ValorOrigen.ToString.Replace(“[“, “”)
ValorOrigen = ValorOrigen.ToString.Replace(“]”, “”)
ValorOrigen = ValorOrigen.ToString.Replace(“+”, “”)
ValorOrigen = ValorOrigen.ToString.Replace(“¡”, “”)
ValorOrigen = ValorOrigen.ToString.Replace(“!”, “”)
ValorOrigen = ValorOrigen.ToString.Replace(“%”, “”)
ValorOrigen = ValorOrigen.ToString.Replace(“&”, “”)
ValorOrigen = ValorOrigen.ToString.Replace(“\”, “”)
ValorOrigen = ValorOrigen.ToString.Replace(“=”, “”)
ValorOrigen = ValorOrigen.ToString.Replace(“ñ”, “n”)
ValorOrigen = ValorOrigen.ToString.Replace(“€”, “”)
ValorOrigen = ValorOrigen.ToString.Replace(“á”, “a”)
ValorOrigen = ValorOrigen.ToString.Replace(“é”, “e”)
ValorOrigen = ValorOrigen.ToString.Replace(“í”, “i”)
ValorOrigen = ValorOrigen.ToString.Replace(“ó”, “o”)
ValorOrigen = ValorOrigen.ToString.Replace(“ú”, “u”)
ValorOrigen = ValorOrigen.ToString.Replace(“ü”, “u”)
ValorOrigen = ValorOrigen.ToString.Replace(Chr(34), “”)
ValorOrigen = ValorOrigen.ToString.Replace(Chr(39), “”)
ValorProcesado = ValorOrigen
