unidades extaribles y particiones [vbs][Solucionado]

[Nilrac]

Disculpa amigo !

como te dije anteriormente no se mucho de esto  

Me podrias explicar si el codigo esta completo o hay que agregarle algo segun lo que quiero hacer ?

Quiero borrar el archivo autorun.inf de todas las unidades / particiones , que me diga si los elimino y en donde y crear una carpeta con el nombre autorun.inf la cual quede oculta !

Código [Seleccionar] Expandir

Set objfso = createobject("scripting.filesystemobject")
set dc = objfso.drives

for each d in dc
if d.drivetype=1 or d.drivetype=2 then
if objfso.fileexists(d.driveletter & ":\autorun.inf") then
objfso.deletefile d.driveletter & ":\autorun.inf", true
end if
end if
next

Gracias !

[Novlucker]

Con eso eliminas los archivos autorun.inf de todas las unidades

Solo faltaría agregar la carpeta, pero desde ya te digo que esa carpeta no va a funcionar como debe, ... veo que quieres hacer uno de esos scripts que crean la carpeta y luego cuando un "bicho" quiere crear el autorun obtiene un error

Saludos

[Nilrac]

Exacto eso es lo que quiero hacer, es un metodo de desinfecion tradicional

Por que dices que no se puede crear la carpeta y ocultarla como se debe ?

Entonces aplicare la creacion de carpeta desde BATCH pero quiero ocultarla desde .VBS eso si funcionaria ?