comprobar y eliminar varios archivos del servidor con fso

[potenkin]

hola,
tengo un problema con "eliminar archivos" mediante fso

quiero que se compruebe si existen 2 archivos en el servidor y si es así que los elimine. La ruta de los archivos se la doy con la dirección + un recordset que recoge de un formulario.

El problema es que si elimino la funcion "fileexist" funciona correctamente y elimina los dos archivos (siempre que existan, sinó da error), pero si intento comprobar si existen no me funciona.

este es el codigo:
--------------------------------------------------------
<%
Function BorrarArchivo(archivo)
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")

archivocast = "D:\XVRT\dominio.com\Html\pdfs\" & (Recordset1.Fields.Item("pdf").Value)
archivoeng = "D:\XVRT\dominio.com\Html\pdfs\" & (Recordset1.Fields.Item("pdf_english").Value)

if fso.FileExists(archivocast) then fso.DeleteFile(archivocast)
if fso.FileExists(archivoeng) then fso.DeleteFile(archivoeng)
Set fso = Nothing
End function
%>
--------------------------------------------------------

alguien podria ayudarme e indicarme el error.

gracias por adelantado

Alf