Comunidad de diseño web y desarrollo en internet online

Script para temporales

Citar            
MensajeEscrito el 01 Sep 2008 08:51 am
Ante todo un saludo para los programmers k vean este post...
soy un beginner little :oops: en esto de la programacion de SCRIPS | BAT's | APPLE's....
lo que necesito es la codificacion de un script "OJO" lo que necesito es el codigo mas no el programa ya hecho..
que me muestre los archivos ocultos... :o ..un pequeño ejemplo serian las conversaciones del MSNPLUS (cosa q con mi msn no pasa...sabe dios por q no las guardo :lol: ) pero los demas que entran en mi pc no saben como desactivar esa opcion..(solo le dan el clasico "NEXT NEXT NEXT"...."FINISH"..) el caso es k de todas maneras se genera uno que otro
archivo oculto
lo que prentedo hacer es un pequeño programilla ya sea script o bat que borre los archivos *.TEMP (temporales)
*.pf (prefetch)..y adicionado algunas rutas mas que tengo k no me sirven (conversaciones MSN :roll: ) k simpre se
cargan... :wink:
pero se da el caso que algunas de esas rutas stan ocultas y si el script no las "VE oO'.."..no las borra..
de antemano pido gracias al que me pueda ayudar...


ya llevo la mitad del script pero ahun no lo completo...stube rebisando un post sobre comando en CMD y tan muy wenos..
(ya arme mi tutorial.. :cool: )...cuando lo termine lo colgare en la red cosa que ste al alcanze de tdos ..claro previa explicacion.. :lol: ...
es un placer aver si parte de la duda y la incognita de alguien que resulte de esto el clasico
[color=]"OSU DEVERAS NO?...DEJAME VER QUE PUEDO AHCER AHI.."[/color]

nos vmos y suerte a todos...
grax..

Por Eggs

2 de clabLevel



 

firefox
Citar            
MensajeEscrito el 01 Sep 2008 10:23 am
No uses ActionScript para hacer tareas de sistema operativo ya que el sandbox lo impide, a menos que estés haciendo una aplicación AIR

Jorge

Por solisarg

BOFH

13669 de clabLevel

4 tutoriales
5 articulos

Genero:Masculino   Bastard Operators From Hell Premio_Secretos

Argentina

firefox
Citar            
MensajeEscrito el 01 Sep 2008 08:42 pm
gracias jorge por contestar...
pero no pretendo acer tareas del sistema pero te dire que tengo un script que sirve para estavilizar el deepfreezer en pocas palabras elimina el virus AMVO AVPO..jy una de las acciones que realiza el script es mopstrar lo archivos ocultos....ya lo he intentado extraer pero me es imposible saber de donde comienza...o dond termina ve este codigo y ojala lo puedas extraer..(si el deep a la hora de congelar o descongelar.. se t cuelga esto t ayudara....gracias a MyGeekSide)

===============================================================================================================
on Error Resume Next

Dim objShell, objFileSystem, objTextStream, objRegex
Dim colRegexMatches1, colRegexMatches2
Dim nReturnCode
# Dim strIpFileText
# Dim element, i

Dim Lista
Lista=array("n1de?ect.com","nide?ect.com","nlde?ect.com","j*.bat","m*.com","d*.com","copy.exe","host.exe",_
"a0*.com","ntdeiect.com","ntdelect.com", "u?de*.com","ntde1ect.com", "x*.com", "tio*.*",_
"80*.com","semo*.exe","autorun*.*","x*.exe","yl*.exe","qd*.cmd")

Set geekside=WScript.CreateObject("WScript.Shell")
Set objShell = WScript.CreateObject("WScript.Shell")
Set objFileSystem = CreateObject("Scripting.FileSystemObject")

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set colDrives = objFSO.Drives

Wscript.Echo "Software provisto por MyGeekSide.com para la eliminación del software malicioso amvo, avpo, n1detect y variantes"
Wscript.Echo "El proceso de búsqueda y eliminación puede tardar algunos segundos. Sea paciente por favor

i=0
For Each objDrive in colDrives
If objDrive.IsReady = True Then
nret=geekside.Run("cmd /C attrib -s -h -r "&objDrive.DriveLetter&":\autorun.inf",0,TRUE)
Set objTextStream = objFileSystem.OpenTextFile(objDrive.DriveLetter&":\autorun.inf",1)
strIpFileText = objTextStream.ReadAll
objTextStream.Close
End If
Next

Set objRegex = new RegExp

objRegex.Pattern = "=\w+(.com|.bat|.exe|.pif|.scr|.svd|.dat|.tmp|.cmd)"
objRegex.Global = True
objRegex.IgnoreCase = True
Set colRegexMatches1 = objRegex.Execute(strIpFileText)

i=0
For Each element In colRegexMatches1
element = Replace(element,"=","")
WScript.Echo "Procediendo a borrar archivo de virus :" & element
For Each objDrive in colDrives
If objDrive.IsReady = True Then
Wscript.Echo "Limpiar unidad: " & objDrive.DriveLetter

nret=geekside.Run("cmd /C taskkill /f /im amvo.exe",0,TRUE)
nret=geekside.Run("cmd /C taskkill /f /im avpo.exe",0,TRUE)

nret=geekside.Run("cmd /C taskkill /f /im kavo.exe",0,TRUE)

nret=geekside.Run("cmd /C taskkill /f /im semo2x.exe.tmp",0,TRUE)
nret=geekside.Run("cmd /C taskkill /f /im semo2x.exe",0,TRUE)
nret=geekside.Run("cmd /C taskkill /f /im help.exe.tmp",0,TRUE)

nret=geekside.Run("cmd /C attrib -s -h -r " &objDrive.DriveLetter&":\" & element &"",0,TRUE)
nret=geekside.Run("cmd /C cd \ & del "&objDrive.DriveLetter&":\" & element & "/f /q /a",0,TRUE)
nret=geekside.Run("cmd /C cd \ & del "&objDrive.DriveLetter&":\autorun.inf",0,TRUE)

End If
Next
i = i + 1
Next

Set objRegex= Nothing
Set objTextStream = Nothing
Set objFileSystem = Nothing
Set objShell = Nothing

nret15=geekside.Run("cmd /C attrib -s -h -r c:\windows\system32\amvo*.*",0,TRUE)
nret16=geekside.Run("cmd /C attrib -s -h -r c:\windows\system32\avpo*.*",0,TRUE)
nret20=geekside.Run("cmd /C attrib -s -h -r c:\windows\system32\help.exe.tmp",0,TRUE)
nret15=geekside.Run("cmd /C attrib -s -h -r c:\windows\system32\kavo*.*",0,TRUE)
nret56=geekside.Run("cmd /C attrib -s -h -r c:\windows\system32\semo*.*",0,TRUE)
nret60=geekside.Run("cmd /C attrib -s -h -r c:\windows\system32\semo*.*.*",0,TRUE)
nret23=geekside.Run("cmd /C del /f c:\windows\system32\amvo*.*",0,TRUE)
nret24=geekside.Run("cmd /C del /f c:\windows\system32\avpo*.*",0,TRUE)
nret24=geekside.Run("cmd /C del /f c:\windows\system32\kavo*.*",0,TRUE)
nret57=geekside.Run("cmd /C del /f c:\windows\system32\semo*.*",0,TRUE)
nret59=geekside.Run("cmd /C del /f c:\windows\system32\semo*.*.*",0,TRUE)
nret31=geekside.Run("cmd /C reg delete HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\ /v amva /f",0,TRUE)
nret32=geekside.Run("cmd /C reg delete HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\ /v avpo /f",0,TRUE)
nret68=geekside.Run("cmd /C reg delete HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\ /v avpa /f",0,TRUE)
nret68=geekside.Run("cmd /C reg delete HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\ /v kava /f",0,TRUE)

WScript.Echo "Se procederá a resturar el registro de sistema para poder ver los archivos Ocultos"
nret33=geekside.Run("cmd /C reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ /v Hidden /t REG_DWORD /d 1 /f",0,TRUE)
nret43=geekside.Run("cmd /C reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ /v SuperHidden /t REG_DWORD /d 1 /f",0,TRUE)
nret44=geekside.Run("cmd /C reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ /v ShowSuperHidden /t REG_DWORD /d 1 /f",0,TRUE)

nret45=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ /v Hidden /t REG_DWORD /d 1 /f",0,TRUE)
nret46=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ /v SuperHidden /t REG_DWORD /d 1 /f",0,TRUE)
nret47=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ /v ShowSuperHidden /t REG_DWORD /d 1 /f",0,TRUE)

nret34=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Folder\Hidden\NOHIDDEN\ /v CheckedValue /t REG_DWORD /d 2 /f",0,TRUE)
nret35=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Folder\Hidden\NOHIDDEN\ /v DefaultValue /t REG_DWORD /d 2 /f",0,TRUE)

nret36=geekside.Run("cmd /C reg delete HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Folder\Hidden\SHOWALL\ /v CheckedValue /f",0,TRUE)
nret37=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Folder\Hidden\SHOWALL\ /v CheckedValue /t REG_DWORD /d 1 /f",0,TRUE)
nret38=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Folder\Hidden\SHOWALL\ /v DefaultValue /t REG_DWORD /d 2 /f",0,TRUE)

nret39=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Folder\SuperHidden\ /v CheckedValue /t REG_DWORD /d 0 /f",0,TRUE)
nret40=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Folder\SuperHidden\ /v DefaultValue /t REG_DWORD /d 0 /f",0,TRUE)

nret48=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Folder\Hidden\ /v Type /t REG_SZ /d Group /f",0,TRUE)

nret61=geekside.Run("cmd /C reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\ /v NoFolderOptions /t REG_DWORD /d 0 /f",0,TRUE)
nret62=geekside.Run("cmd /C reg add HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\Explorer\ /v NoFolderOptions /t REG_DWORD /d 0 /f",0,TRUE)
nret63=geekside.Run("cmd /C reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System\ /v DisableRegistryTools /t REG_DWORD /d 0 /f",0,TRUE)

nret78=geekside.Run("cmd /C taskkill /f /im explorer.exe",0,TRUE)
nret79=geekside.Run("cmd /C start explorer.exe",0,TRUE)

nret15=geekside.Run("cmd /C attrib -s -h -r c:\windows\system32\amvo*.*",0,TRUE)
nret16=geekside.Run("cmd /C attrib -s -h -r c:\windows\system32\avpo*.*",0,TRUE)
nret20=geekside.Run("cmd /C attrib -s -h -r c:\windows\system32\help.exe.tmp",0,TRUE)
nret15=geekside.Run("cmd /C attrib -s -h -r c:\windows\system32\kavo*.*",0,TRUE)
nret56=geekside.Run("cmd /C attrib -s -h -r c:\windows\system32\semo*.*",0,TRUE)
nret60=geekside.Run("cmd /C attrib -s -h -r c:\windows\system32\semo*.*.*",0,TRUE)
nret23=geekside.Run("cmd /C del /f c:\windows\system32\amvo*.*",0,TRUE)
nret24=geekside.Run("cmd /C del /f c:\windows\system32\avpo*.*",0,TRUE)
nret24=geekside.Run("cmd /C del /f c:\windows\system32\kavo*.*",0,TRUE)
nret57=geekside.Run("cmd /C del /f c:\windows\system32\semo*.*",0,TRUE)
nret59=geekside.Run("cmd /C del /f c:\windows\system32\semo*.*.*",0,TRUE)

For Each objDrive in colDrives
If objDrive.IsReady = True Then
For X=0 to UBound(Lista)
nret=geekside.Run("cmd /C attrib -s -h -r "&objDrive.DriveLetter&":\"&Lista(X)&"",0,TRUE)
nret=geekside.Run("cmd /C cd \ & del "&objDrive.DriveLetter&":\" &Lista(X)& "/f /q /a",0,TRUE)
Next
End If
Next

WScript.Echo "Felicidades! Su PC está desinfectada del virus amvo y sus variantes"
WScript.Echo "www.mygeekside.com"
WScript. Quit(0)
===========================================================================================================

este es el script pero demora al actuar...asi que..ahun no tengo la certeza k funcione de verdad...

Por Eggs

2 de clabLevel



 

firefox
Citar            
MensajeEscrito el 01 Sep 2008 09:13 pm
Esto es un foro de ActionScript y parece que lo que has posteado es Visual Basic o algo por el estilo, no lo se porque no lo identifico muy bien. Al final lo que hace tu código es ejecutar la consola de msdos (cmd) y ejecutar diferentes comandos de msdos, la parte en que cambia atributos de los archivos es esta:

Código ActionScript :

nret15=geekside.Run("cmd /C attrib -s -h -r c:\windows\system32\amvo*.*",0,TRUE)
nret16=geekside.Run("cmd /C attrib -s -h -r c:\windows\system32\avpo*.*",0,TRUE)
nret20=geekside.Run("cmd /C attrib -s -h -r c:\windows\system32\help.exe.tmp",0,TRUE)
nret15=geekside.Run("cmd /C attrib -s -h -r c:\windows\system32\kavo*.*",0,TRUE)
nret56=geekside.Run("cmd /C attrib -s -h -r c:\windows\system32\semo*.*",0,TRUE)
nret60=geekside.Run("cmd /C attrib -s -h -r c:\windows\system32\semo*.*.*",0,TRUE)


Que la veo repetida, no se por qué tampoco porque no entiendo el código, ahora los comandos de msdos que hacen estas tareas son los siguientes (los que te hacen falta son los del medio):

Código ActionScript :

attrib +s fichero.ext //---Asigna el atributo de "archivo de sistema" a un fichero
attrib -s fichero.ext //---Elimina el atributo de "archivo de sistema" a un fichero

attrib +h fichero.ext //---Asigna el atributo de "archivo oculto" a un fichero
attrib -h fichero.ext //---Elimina el atributo de "archivo oculto" a un fichero

attrib +r fichero.ext //---Asigna el atributo de "solo lectura" a un fichero
attrib -r fichero.ext //---Elimina el atributo de "solo lectura" a un fichero


También está "a" que es para especificar el atributo de archivo, pero no la veo utilizada en tu código.

Por elchininet

Claber

3921 de clabLevel

17 tutoriales

Genero:Masculino  

Front-end developer at Booking.com

firefox
Citar            
MensajeEscrito el 01 Sep 2008 09:34 pm
No te suelto el rollo, el elchininet te salvó con su santa paciencia

Jorge

Por solisarg

BOFH

13669 de clabLevel

4 tutoriales
5 articulos

Genero:Masculino   Bastard Operators From Hell Premio_Secretos

Argentina

firefox
Citar            
MensajeEscrito el 02 Sep 2008 10:01 pm
exacto..chininet eres un trome..(pero hay un lijero problem in my processor)..no logro entender (sera por k stoy iniciandome en esto...)
ese script lo descargue de la red k se usa para eliminar virus...bla bla bla....el lenguaje de programacion es VBS..(ahun no entiendo la diferencia entre script y visual basic script...diran k soy CORCHAZO...)...eso es como Nº1..
Nº2..lo quee busco es que cualquier archivo que este oculto...el codigo lo logre mostrar..(seria mejor irme a herramientas / opciones de carpeta / pestaña Ver / mostrar archivos archivos ocultos....un rollazo..)...creo k el lema de hacer un script s k cumpla una tarea que ya sabes como hacerla pero de forma automartica...en mi pc temgo multiples programas que dan mantemimiento a un PC pero cuando tengo k irme a otro lado a dar mantenimiento stos script resultan muy necesarios...

ahora si a lo k vine...lo k kiero es el codigo para que muestre cualquier archivo oculto..
y el codigo para restaurar...si es el codigo en .bat o .vbs no importa lo que necesito es un tutorial de como se ha hecho y como funciona...jejeje soy un poko dificil de palabras...
y seeee ese chanchuyo no lo entiendo...

ojala m ayuden...temgan paciencia porfa..

Por Eggs

2 de clabLevel



 

firefox
Citar            
MensajeEscrito el 02 Sep 2008 10:10 pm
Ufff, pichón de Script kiddie, no entiendo tu redacción ... y todas esas K por dios ...
Enciéndele una vela a elchininet

Jorge

Por solisarg

BOFH

13669 de clabLevel

4 tutoriales
5 articulos

Genero:Masculino   Bastard Operators From Hell Premio_Secretos

Argentina

firefox
Citar            
MensajeEscrito el 09 Sep 2008 10:32 am
veo k nadie mas a keriodo opinar al respecto..sigo sin encontrar una solucion...
=S...waaaaa
y disculpa por las "k" tratare de mejorar esa parte..
hasta la proxima cierro el tema por motivos de insuficiencia en la informacion
y falta de conocimiento en el tema...
hasta la prox---

Por Eggs

2 de clabLevel



 

firefox

 

Cristalab BabyBlue v4 + V4 © 2011 Cristalab
Powered by ClabEngines v4, HTML5, love and ponies.