Jump to content

Recommended Posts

Posted

Hi... I'm curious to find out how to make Windows delete a specific file on shutdown...

I'd rather do it on shutdown instead of startup. It's just a simple playlist but anyway... if you got a tip for me, please let me know.

BTW, I'm using Windows XP Pro.

Thanx :)


Posted

Click

  • Start » Run » (type) gpedit.msc » OK

Then

  • Computer Configuration » Windows Settings » Scripts (Startup/Shutdown) » (Double Click) Shutdown » Add

and browse to your script etc.

Posted (edited)

It's nothing like that but thanx anyway. It has to be done on every shutdown. Trying to figure out this scripting thing. So far I've figured I should use this:

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

Just seems to be put into content in some way. Can't use the function as it is...

The file is:

C:\Program Files\foobar2000\playlists\000000000 - Default.fpl

- or maybe the entire folder.

Any help would be appreciated :)

Edited by JonesDK
Posted

In vbs you will probably want something like this

WScript.CreateObject("Scripting.FileSystemObject").DeleteFile("C:\Program Files\foobar2000\playlists\000000000 - Default.fpl")

Posted (edited)

This is with a error control in it. It is always better to use a If Exists Statement,

in a vbs script.

If Exists statement to delete file

Dim Fso : Set Fso = CreateObject("Scripting.FileSystemObject")

If Fso.FileExists("C:\Program Files\foobar2000\playlists\000000000 - Default.fpl") Then

Fso.DeleteFile("C:\Program Files\foobar2000\playlists\000000000 - Default.fpl")

Else

Msgbox "Cannot Find File", 0 + 32, "Error"

End If

If Not Statement to delete file

Dim Fso : Set Fso = CreateObject("Scripting.FileSystemObject")

If Not Fso.FileExists("C:\Program Files\foobar2000\playlists\000000000 - Default.fpl") Then

Msgbox "Cannot Find File", 0 + 32, "Error"

Else

Fso.DeleteFile("C:\Program Files\foobar2000\playlists\000000000 - Default.fpl")

End If

The If exixts Statement in One Line

Dim Fso : Set Fso = CreateObject("Scripting.FileSystemObject") : If Fso.FileExists("C:\Program Files\foobar2000\playlists\000000000 - Default.fpl") Then Fso.DeleteFile("C:\Program Files\foobar2000\playlists\000000000 - Default.fpl") Else Msgbox "Cannot Find File", 0 + 32, "Error" End If
Edited by gunsmokingman
Posted (edited)

Cool... will try one of those. I was a little too quick with the first script. It DID give an error... just not when I tested it using cscript.exe, but on shutdown it did.

Edited by JonesDK
Posted

right click the vbs file

select open with

navigate to windows\system32\wscript.exe

select that.

It sound like you have to re associate the wscript as

the defualt script engine.

Posted (edited)

Found another quite simple solution ;)

And by the way, it WAS already associated to wscript, so I don't know exactly what's wrong. Maybe I need a re-install of windows. Been a long time now.

The simple solution was to just make a clean playlist and make it read-only. And it seems to work :D

Thanx all for your suport anyway.

Edited by JonesDK

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...