PowerBasic Museum 2020-A

Legacy Software (PBWIN 9.0+/PBCC 5.0+) => Windows Script Runtime => Source Code => Scripting => FileSystemObject => Topic started by: José Roca on July 14, 2008, 03:06:53 AM

Title: IFileSystem.DeleteFile Method
Post by: José Roca on July 14, 2008, 03:06:53 AM


The following example illustrates the use of the DeleteFile method.

JScript


function DeleteAFile(filespec)
{
   var fso;
   fso = new ActiveXObject("Scripting.FileSystemObject");
   fso.DeleteFile(filespec);
}


VBScript


Sub DeleteAFile(filespec)
   Dim fso
   Set fso = CreateObject("Scripting.FileSystemObject")
   fso.DeleteFile(filespec)
End Sub


PowerBASIC


SUB DeleteAFile (BYVAL strFileSpec AS STRING)

   LOCAL fso AS IFileSystem

   fso = NEWCOM ("Scripting.FileSystemObject")
   fso.DeleteFile(UCODE$(strFileSpec))

END SUB