Mensajes

[autorun.inf]

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 !

[autorun.inf]

Esto tratando de eliminar los archivos autorun.inf de todas las unidades que esten conectadas al equipo

Código [Seleccionar] Expandir

Option Explicit
Dim fso,car,var

Set fso = CreateObject("Scripting.FileSystemObject")
Variable = fso.FileExists ("c:\autorun.inf")


Set car = CreateObject("Scripting.FileSystemObject")
car.DeleteFile "c:\autorun.inf", True


Set var = CreateObject("Scripting.FileSystemObject")
var.CreateFolder "c:\autorun.inf"

Cuando compruebo la existencia de ese archivo en mas de una ruta puedo hacer esto ?

Código [Seleccionar] Expandir

Option Explicit
Dim fso,car,var

Set fso = CreateObject("Scripting.FileSystemObject")
Variable = fso.FileExists ("c:\autorun.inf") ("D:\autorun.inf") (E:\autorun.inf)


Set car = CreateObject("Scripting.FileSystemObject")
car.DeleteFile "c:\autorun.inf", "d:\autorun.inf", "e:\autorun.inf", True


Set var = CreateObject("Scripting.FileSystemObject")
var.CreateFolder "c:\autorun.inf""d:\autorun.inf""e:\autorun.inf"

Asi esta bien ?

Gracioas por reabrir 

Con el script antes mencionado

puedo crear una carpeta en las unidades que detecte ?

Si se puede hacer, cuales serian los comandos ?

Gracias 

Espero que no lo tomes mal !

Me gustaria aprender a programas, por eso pregunto....para aprender 

He realizado o hecho varios temas buscando ayuda ya que no tengo ni idea de programar en .vbs o posteriores (solo en batch).


Por esa razon te dije que no se manejar eso de los objetos

Por mi parte todo bien !

Y yo luego te dije:

C:\>regedit /e archivo.reg

El VBS solo tiene eso en su interior, cuando lo ejecuto me sale el cartel de error.

Posteriormente no puedo hacer el backup del registro

No tienes por que enfadarte Leo 

Si te fijas, al principio del tema dije que lo queria hacer en VBS

perdon fue un error de apreciacion 

Utilizo lo que mne dejaste !

C:\>regedit /e archivo.reg

El VBS solo tiene eso en su interior, cuando lo ejecuto me sale el cartel de error.

Posteriormente no puedo hacer el backup del registro

[wscript.shell]

Código (dos) [Seleccionar] Expandir

C:\>regedit /e archivo.reg

Y eso mismo podrías lanzarlo desde el vbs por medio del objecto wscript.shell

Saludos

Hola Novlucker !

Me podrias colocar el code completo, es que no me funciona !

Gracias !!!!

No trae ningún problema al procesarlo, solo debes de utilizar comillas dobles ("").

Lo probaré a ver que tal, pero me dices anteriormente que era con comillas dobles, por que solo colocas las comillas normales ?