I had this problem. Copy the below and save it as a .vbs file. Get it to run at logon and it will look for and delete the desktop.ini file. I have it in use here and it always works.
'On Error resume next
'Dimension variables
Dim oShell, filesys, text, readfile, path
'Set shell object
Set oShell = CreateObject( "WScript.Shell" )
'Get users home directory UNC path from environment variable and add
'\Desktop.ini to the end to give the name of the file
path = oShell.ExpandEnvironmentStrings("%HOMESHARE%") & "\Desktop.ini"
'Create File system object
Set filesys = CreateObject("Scripting.FileSystemObject")
'Check to see if the file exists
If filesys.FileExists(path) Then
'If it does, open the file and make it a normal hidden file
Set readfile = filesys.GetFile(path)
readfile.Attributes = 2
'Delete it
readfile.Delete(True)
'Create a new Desktop.ini file and leave it blank
Set text = filesys.CreateTextFile(path)
text.Write " "
text.Close
Else
'If it doesnt exist create a new Desktop.ini file and leave it blank
Set text = filesys.CreateTextFile(path)
text.Write " "
text.Close
End If
'Open the new file
Set readfile = filesys.GetFile(path)
'Make the file read only and hidden
readfile.Attributes = readfile.Attributes Or 1 Or 2
Thanks
Sean
