Menú

Mostrar Mensajes

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ú

Mensajes - Eleкtro

#11501
Scripting / Re: [VBS] como hacer este bucle?
22 Febrero 2012, 10:14 AM
Cita de: Flamer en  6 Febrero 2012, 00:58 AM
y funciona calalo con uno solo y ya con el script que te puse se ase

Sorry por tardar, Nada, No hay manera flamer, No me sale  :(

¿Nadie sabe hacer esto en python o ruby? También me serviria xD

Voy a hacer algún intento con ruby.

Salu2

Este es el code original en el que quiero realizar un FOR:

Código (vb) [Seleccionar]
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace("<Folder or Share Location>")
Set objFolderItem = objFolder.ParseName("<TTF File Name>")
objFolderItem.InvokeVerb("Install")






EDITO:

Al fin he encontrado este script que hace lo que quiero

Fin de la historia  ::)

No he logrado hacer el maldito bucle pero Gracias por vuestra ayuda y paciencia

Código (vb) [Seleccionar]
Set ofso = CreateObject("Scripting.FileSystemObject")
SourceFolder = ofso.GetParentFolderName(Wscript.ScriptFullName)

Const FONTS = &H14&

Set objShell  = CreateObject("Shell.Application")
Set oSource   = objShell.Namespace(SourceFolder)
Set oWinFonts = objShell.Namespace(FONTS)

Set rxTTF = New RegExp
rxTTF.IgnoreCase = True
rxTTF.Pattern = "\.ttf$"

FOR EACH FontFile IN oSource.Items()
    IF rxTTF.Test(FontFile.Path) THEN   
        oWinFonts.CopyHere FontFile.Path
    END IF
NEXT
#11502
Cita de: Di~OsK en 22 Febrero 2012, 09:19 AMTengo un windows modificado, por lo que este método falla
Es por eso que me interesa saber sobre instalar "encima".

¿Que quieres decir con "falla"?
¿Ya probaste a instalar encima y te falló en algún sentido?
Explicanos eso  :huh:


Yo solo instalo windows modificados (Modificados por mi), Que yo sepa la ventana donde elijes el tipo de instalación no se puede saltear con el rt 7 lite ni parecidos :/

A veces con el mismo dvd de instalación (Modificado) he tenido que instalar "encima" y sin problemas, como dije, al instalar encima te guarda todos tus datos y programas en "C:\Windows.old".

Pero vamos, Que si tienes dudas sobre el dvd de instalación que estás usando solo tienes que probar el método de instalación en VBox o VMWare para salir de dudas.

Salu2
#11503
Tengo 2 discos duros SATA asignado a estas letras: C: y E:

Desde hace 2 dias tengo problemas con el disco principal C:, Si lo "calentaba" y le daba caña, Sonaba un "clok" en el disco duro y se quedaba como "muerto", Se paraba durante un minuto  y no hacia ruido, no procesaba datos, Y luego al pasar ese minuto o 2, Volvia a la vida y a trabajar... Pues así así cada vez que lo "calentaba" demasiado.

Tengo que decir que el disco C: solo daba parones si tengo los 2 discos conectados. Si desconecto "E:" y le meto caña a "C:" por ejemplo copiando archivos grandes durante una hora no sucede nada extraño.

De momento este problema lo he "solucionado" cambiando el cableado de los discos DE SITIO. El de C: a E: y el de E: a C:.

EDITO:

Pues no se ha solucionado no... Sigue habiendo parones en el disco C:, Ahora se empiezan a notar...

Necesito ayuda ._.

Ah, y desde que empecé a notar el problema, Restauré la configuración por defecto de la BIOS, Pero no ha servido para nada xD.

También cabe decir que he desactivado la caché de escritura en los 2 discos, para evitar que los parones me jodan archivos... y para que el cableado fluya mejor (Aunque no se si afecta a los cables xD)...

También tengo desactivados la mayoría de servicios de Windows, Como los temas, para evitar que el disco trabaje más de lo necesario...

No se que más datos aportar.




Por otro lado y a raíz de ese problema, Ahora cuando inicio sesion en Windows, A los 5 o 10 minutos (Eso es lo más extraño de todo) aparece un nuevo disco duro en "mi pc": "(D:) Disco local", con un icono de disco duro y un interrogante azul.

Obviamente es una unidad innaccesible porque no existe y no debería estar ahí...
La unidad no aparece en el administrador de dispositivos y particiones...

- ¿Que puede ser?

He escaneado con NOD y no tengo virus.

También le he pasado un chkdsk y a C: y me ha arreglado archivos ilegibles debido a los parones del primer problema.

- ¿El problema de los parones puede tener algo que ver como para que sea algo tán exagerado de crearme un nuevo disco en Windows?

- ¿Alguna alternativa antes de formatear?...

Gracias.
#11504
Me mataste!
Tu script es más complicado de lo que imaginaba, Ya por el principio me pierdo con CPORT y MPORT no se para que sirven esos puertos... Tengo que estudiar cada cosa del script poco a poco xD , Lo único que entiendo de ahí es el catalá y poco más :xD

Está molt currat :) y muy explicado, se agradece, Aunque si haces uno para enviar archivos a mediafire, Mejor  >:D

Un saludo

PD:
Citar{"FAPFAPFAP" : '192.168.171.12',
"FAPFAP" : '192.168.171.17',
"FAP" : '192.168.171.19'}

XD
#11505
Cita de: Di~OsK en 22 Febrero 2012, 04:15 AM
en windows 7, puedo hacer esto mismo? sin perder mis documentos?

Claro, Siempre que en la instalación eligas el modo "Actualización", Windows copiará tu perfil a una carpeta llamada "Windows.old".

Salu2.
#11506
Hola.

1 - Usa las respectivas etiquetas de código cuando postees un bat o los moderadores te regañarán.

2 - Estás expandiendo sin motivo.
Borra "Setlocal enabledelayedexpansion" y "END LOCAL" del script.

3 - No estás cerrando el IF con paréntesis, Falta 1.
If "cadena" ("cadena")




Código (dos) [Seleccionar]
@echo off

Find /I "Desconectado" "C:\ctm_internacional\canje2_tra.log" >Nul

If %Errorlevel% EQU 0 (
Echo 0 >> "C:\ctm_internacional\canje2_paso1.txt"
Echo Error en paso1 >> "C:\ctm_internacional\canje2_tra.log"
Type "C:\ctm_internacional\canje2_tra.log" | MORE /E /C
Goto :Error
) ELSE (Goto :END)

:Error
Echo ERROR en el envio o rescate estado DESCONECTADO O Conexion Cerrada Por el host >> "C:\ctm_internacional\canje2_err.log"
Echo ****************************************************************************** >> "C:\ctm_internacional\canje2_err.log"
Type "C:\ctm_internacional\canje2_err.log" | MORE /E /C

:END
Pause
Exit


Aunque no se si se solucionará el problema porque no he probado el ftp.
Salu2.
#11507
CitarEn Ruby, puedes volver a abrir una clase y modificarla.

Código (ruby) [Seleccionar]
class Anfitrion
   attr_accessor :nombre
end


Se supone que eso da acceso a la variable "nombre" dentro de la clase "Anfitrion", Bien, Lo que no explica es luego como poder modificar la variable, ¿Se hace como con una variable de instancia?

Para modificar una variable de instancia es así, verdad?:
Código (ruby) [Seleccionar]
@nombre = "lo que sea"

?

Muxas Gracias..
#11508
BadDevil

Acabo de bajarme el archivo que subí, El que está posteado, y el menú se muestra correctamente

La codificación de texto es correcta, está en ANSI como la guarda el bloc de notas por defecto.

No consigo entender donde está el fallo entonces si tanto tu como yo usamos Win7 x64.

- ¿Que es exactamente lo que se muestra mal?

- ¿Puedes mirar el código de página que tienes en tu CMD?
Simplemente tienes que abrir la consola y escribir "CHCP"
He probado con chcp 850 y chcp 1252 y el .cmd se muestra correctamente :/

No se que podrá ser.

Un saludo.

#11509
Advertencia - mientras estabas escribiendo, una nueva respuesta fue publicada. Probablemente desees revisar tu mensaje.




Cita de: beholdthe en 22 Febrero 2012, 01:38 AM
Esa ruta, para que S.O es????
Es que tanto en XP como en 7, no me sale lo mismo:

Win 7: "HKEY_USERS\TU_SID\Software\Policies\Microsoft\Windows\System"

Pero si creas la clave "system" y la subclave "disablecmd" en la clave que dijeron dentro de la rama "HKEY_CURRENT_USER", debería tener el mismo efecto.

Salu2




Cita de: m0rf en 22 Febrero 2012, 01:27 AM
Dudo que puedas hacer nada con eso pero bueno

Si posteo un comentario y digo que funciona un programa como el RegAlyzer para ese propósito con la CMD deshabilitada y el registro deshabilitado, Es por experiencia propia.

Salu2.
#11510
Este editor no tiene desperdicio, Cada vez veo cosas nuevas en el, jeje

Si estás realizando un script y aprietas "ctrl + B" se lanza la consola de Windows con el script, muy bueno.






Para agregarle soporte en el meú contextual a ".rb" (Ruby)

Windows Registry Editor Version 5.00

[HKEY_CLASSES_ROOT\rubyfile\shell\Editar]
"icon"="\"C:\\windows\\\\system32\\\\notepad.exe\""

[HKEY_CLASSES_ROOT\rubyfile\shell\Editar\command]
@="\"C:\\Program Files\\Sublime Text 2\\sublime_text.exe\" \"%1\""


[HKEY_CLASSES_ROOT\.rb\shell\Editar]
"icon"="\"C:\\windows\\\\system32\\\\notepad.exe\""

[HKEY_CLASSES_ROOT\.rb\shell\Editar\command]
@="\"C:\\Program Files\\Sublime Text 2\\sublime_text.exe\" \"%1\""



Para agregarle soporte en el meú contextual a ".py" (Python)

Windows Registry Editor Version 5.00

[HKEY_CLASSES_ROOT\Python.File\shell\Editar]
"icon"="\"C:\\windows\\\\system32\\\\notepad.exe\""

[HKEY_CLASSES_ROOT\Python.File\shell\Editar\command]
@="\"C:\\Program Files\\Sublime Text 2\\sublime_text.exe\" \"%1\""

[HKEY_CLASSES_ROOT\.Py\shell\Editar]
"icon"="\"C:\\windows\\\\system32\\\\notepad.exe\""

[HKEY_CLASSES_ROOT\.Py\shell\Editar\command]
@="\"C:\\Program Files\\Sublime Text 2\\sublime_text.exe\" \"%1\""