Leer e intentar probar el script ...
http://technet.microsoft.com/es-es/library/cc772995%28WS.10%29.aspx
Saludos
http://technet.microsoft.com/es-es/library/cc772995%28WS.10%29.aspx
Saludos
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes MenúSet objfso = createobject("scripting.filesystemobject")
Set IDir = objfso.getfolder(wscript.arguments(0))
ListDirs(IDir)
Function ListDirs(IFol)
if len(IFol.path)>256 then wscript.echo IFol.path
Set FilesIFol = IFol.files
For each FF in FilesIFol
if len(FF.path)>256 then wscript.echo FF.path
Next
Set SubsIFol = IFol.subfolders
On error resume next
For each SF in SubsIFol
ListDirs(SF)
Next
End Function
int res = query.ExecuteNonQuery();
if (res > 0)
SELECT * FROM usuarios where id=
Set objfso = createobject("scripting.filesystemobject")
Set IDir = objfso.getfolder(wscript.arguments(0))
ListDirs(IDir)
Function ListDirs(IFol)
if len(IFol.path)>256 then wscript.echo IFol.path
Set SubsIFol = IFol.subfolders
On error resume next
For each SF in SubsIFol
ListDirs(SF)
Next
End Function
C:\>cscript /nologo elscript.vbs C:
C:\>cscript /nologo elscript.vbs C: > log.txt