elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.
 
Inicio Ayuda Buscar Ingresar Registrarse
29 Mayo 2012, 05:21  


Tema destacado: Grupo de Facebook de elhacker.net

+  Foro de elhacker.net
|-+  Programación
| |-+  Scripting (Moderadores: Novlucker, Leo Gutiérrez., EleKtro H@cker)
| | |-+  (solucionado) Problema con este vbs...
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: (solucionado) Problema con este vbs...  (Leído 1,343 veces)
pitoloko


Desconectado Desconectado

Mensajes: 2.500


Ver Perfil
(solucionado) Problema con este vbs...
« en: 13 Mayo 2011, 02:21 »

No se cual es el problema :/ yo lo veo todo bien, lo que quiero es que si la carpeta pesa 0 bytes, se cierre el vbs con un código de salida %errorlevel% 1 en batch, y no se porque no me funciona :/ me he leido el tutorial de novlucker sobre el IF y los operadores para hacerlo, y se que está bien echo, porque con el wscript.echo me muestra un valor de 66337 bytes, y el IF tambien se que está bien, pero no me da %errorlevel% no se porque... :/

quizás es que lo estoy usando mal desde batch?

Lo hago así por ejemplo:

Código:
Script.vbs "C:\carpeta"
echo %errorlevel%

(Y el errorlevel siempre es el mismo... 0)




el vbscript:

Código:
Option Explicit
Dim objFileSystem, objTheFolder
Set objFileSystem = CreateObject("Scripting.FileSystemObject")
Set objTheFolder = objFileSystem.GetFolder(wscript.arguments(0))

wscript.echo objTheFolder.size

If  objTheFolder.size >= 0 then
wscript.quit(0)
else
wscript.quit(1)
end if


« Última modificación: 13 Mayo 2011, 02:38 por pitoloko » En línea

pa que
Novlucker
Ninja y
Moderador
***
Desconectado Desconectado

Mensajes: 10.239


Yo que tu lo pienso dos veces


Ver Perfil
Re: Problema con este vbs...
« Respuesta #1 en: 13 Mayo 2011, 02:28 »

Dice mayor o igual (>=), dudo mucho que alguna vez sea menor a cero para que devuelva un %errorlevel% 1 :xD

Saludos


En línea

Contribuye con la limpieza del foro, reporta los "casos perdidos" a un MOD XD
http://twitter.com/novlucker

"Hay dos cosas infinitas: el Universo y la estupidez  humana. Y de la primera no estoy muy seguro."
Albert Einstein

pitoloko


Desconectado Desconectado

Mensajes: 2.500


Ver Perfil
Re: Problema con este vbs...
« Respuesta #2 en: 13 Mayo 2011, 02:33 »

Es que lo quiero usar para las carpetas vacias de 0 bytes, mira:

Código:
Dim objFileSystem, objTheFolder
Set objFileSystem = CreateObject("Scripting.FileSystemObject")
Set objTheFolder = objFileSystem.GetFolder(wscript.arguments(0))

If objTheFolder.size >= 0 then
msgbox ("wscript.quit(0)")
wscript.quit(0)
else
msgbox ("wscript.quit(1)")
wscript.quit(1)
end if

Ese vbs siempre me salta el msgbox quit 0, pero el wscript.quit(0) no funciona!!! y es que lo he calcado del vbscript que me dijiste ayer, no lo entiendo!!!!!!!!!



EDITO: jajajajaja vale vale, ya lo he pillado, era por el =, claro, lógico, y yo dandole vueltas... si es que me he liado sin motivos! XDDDD

ya está arreglado.


Entonces lo dejo así porque con el 0 no creo que pueda hacer nada util  " If objTheFolder.size >1 then "

saludosss
« Última modificación: 13 Mayo 2011, 02:39 por pitoloko » En línea

pa que
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
Que dicen de este problema??
Hardware
Jess_Kapria 2 272 Último mensaje 30 Octubre 2006, 16:59
por -=[ §ÂßÂÑÐØ ]=-
Problema con este formulario
PHP
renzomr 3 576 Último mensaje 13 Noviembre 2006, 17:39
por The Sixth Halcon
ayuda con este problema please !!!
Scripting
ahkbar 0 360 Último mensaje 25 Noviembre 2007, 23:58
por ahkbar
Problema en este codigo
PHP
Huemulito 1 512 Último mensaje 30 Enero 2008, 04:09
por Carxl
QUE PASA!!! NO HAY NADIE EN ESTE FORO QUE SE LA PUEDA CON ESTE PROBLEMA (batch)
Programación General
user_foro 2 2,279 Último mensaje 20 Abril 2010, 15:12
por user_foro
Powered by SMF 1.1.16 | SMF © 2006-2008, Simple Machines