como elimino el ultimo caracter de una cadena

[mc_quake]

hola tengo una variable que contendra correos

asi

Correos = Correos & Rs("con_email")&";"

funciona bien pero me deja un ; siempre al final como puedo hacer para eliminar el ultimo ; de la cadena ya que la longitud de esta variara dependiendo de la cantidad de correos ue esten en la bd

mi cadena actual:

[email protected];[email protected];

asi quiero que quede:

[email protected];[email protected]

[JuanRAPerez]

+ obtene el valor de la cadena con un len
+ luego haces un mid desde la posicion 1 hasta el total menos 1

suerte

[u_goldman]

cadena = left(cadena, len(cadena)-1)

Saludos

[mc_quake]

ok gracias por la ayuda (solucionado)