Eliminar los ultimos 4 caracteres de una cadena

[3pies]

Código:

<%
'ESTA ES UNA FORMA DE HACERLO:
'Frase, o palabra a cortar, que pasamos a una variable
cadena = "El Barça ganará al Chelsea"
'medimos la longitud de esa frase o palabra
'y la pasamos a una variable
largo = Len(cadena)
'pasamos a una variable, la nueva cadena, quitándole
'los 4 últimos caracteres
nueva_cadena = Mid(cadena, 1, largo - 4)
'imprimimos el resultado
Response.write nueva_cadena
%>