[VBS] Rimuovere un file se esistente

[daneel]

Utilizzando il FileSystemObject, devo verificare che un file sia presente sul disco e, se c'è, rimuoverlo. Cancellarlo non è un problema, ma come faccio a verificare che ci sia?

[daneel]

up

[ale500]

VBS intendi VBScript...vero????

quindi solo per IE...ti va bene uguale se te lo dico in JScript...(tanto entrambi vanno bene solo per IE....)

[daneel]

Va bene un qualsiasi linguaggio di scripting (JavaScript o VisualBasic Scripting Edition) per IE, tanto devo lavorare sul server, e quindi non m'importa nemmeno niente della protezione.

[ale500]

questa è la funzione in JScript:
(naturalmente la devi riadattare)
function controllo(n) {
//src dynamic
document.wFile.dynsrc=document.myForm.action;
if(document.wFile.fileSize>-1){
alert("User OK!\nPass OK!\n"+"Dimensione: "+document.wFile.fileSize+" bytes.");
var destinazione=document.myForm.action+"?"+document.m yForm.userid.value;
document.links[0].href=destinazione;
document.links[0].click();
}
else if(n==1){
setTimeout("controllo(2)",500);
}
else
alert("User o Pass sbagliate!.");
}

e nella pagina devi mettere una immagine tipo:

[img][/img]

se non hai capito bene vai qui... è una piccola pillola che ho fatto da poco dove utilizzo la quella funzione per l'autenticazione dell'utente....

[daneel]

Forse non sono stato chiaro nel porre la domanda.
Nel seguente esempio mi interessa verificare che c:\documento.adtg esista, prima di procedere alla sua cancellazione, per non ricevere un errore.

var fso,documento;
fso=new ActiveXObject("Scripting.FileSystemObject");
documento=fso.GetFile("c:\\documento.adtg");
documento.Delete();

[ale500]

ed infatti io ti ho risposto a quello....

per verificare se esiste ti crei una immagine (in realtà non è una vera e propria immagine):

[img]c:\win\tuo_file.ale[/img]

e poi crei una funzione che va a controllare la sua dimensione...

se (document.wFile.fileSize>-1) vuol dire che il file esiste

[willybit]

<script language="VBScript">
set fso = CreateObject("Scripting.FileSystemObject")
strfile="c:\\documento.adtg"
if fso.fileexists(strfile) then
	fso.deletefile(strfile)
end if
</script>

[daneel]

Grazie willybit.