elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.


Tema destacado: Estamos en la red social de Mastodon


  Mostrar Mensajes
Páginas: 1 ... 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641 [642] 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 ... 1253
6411  Programación / Scripting / Re: (Ayuda,) Cambiar asociaciones de JPG o PNG con un BAT en: 17 Noviembre 2014, 16:36 pm
¿Por qué la necesidad de utilizar un Script?

Puedes cambiar la asociación de cualquier archivo mediante Windows:
Click derecho > Abrir con... > Elegir programa predeterminado

¿No te sirve eso para llevar a cabo tu propósito?, no se si te entendí bien pero no creo que vayas a querer establecer el programa predeterminado 300 veces al día...

De todas formas si sigues queriendo una herramienta para automatizar la tarea, puedes probar este Script que desarrollé hace años:
[Batch] (APORTE) ASSOC7 (Crea, Asocia, Y desasocia tipos de archivos)

1) Realiza un backup completo del registro.
2) Utiliza el siguiente comando:
Código
  1. ASSOC7.exe -a ".png" "mspaint.exe"

Saludos
6412  Foros Generales / Foro Libre / Re: Sobre las pirámides egipcias en: 16 Noviembre 2014, 22:30 pm
documentándome acerca de los detalles arquitectónicos de las pirámides he quedado sorprendido con algunos detalles sobre la precisión y error mínimo de la colocación de las piedras, así como los largos y kilométricos pasadizos que alberga en su interior, además del corto plazo de construción y las herramientas y materiales empleados para la misma.

No he visto el video, pero he visto decenas de documentales (algunos más fiables que otros) que hablan y documentan practicamente lo mismo, las asombromsas incongluencias tecnológicas de los egipcios, las mediciones exactas y (casi) perfectas que a cualquier arquitecto le resultarían su mayor reto en la vida, una auténtica pesadilla de "copiar".

Sólo puede haber una respuesta a estas incógnitas:
1) Estamos muy equivocados respecto a los conocimientos que adquirieron los arquitectos egipcios por si mismos, los hemos subestimado.
2) Los alienígenas nos enseñaron cómo construir edificaciones para nuestro desarrollo en La tierra, para nuestra evolución como seres humanos, ¿por qué no?.





De hecho no se si sabras que lo egipcios inventaron la electricidad



@Senior++
Con todo mi respeto, ya sabes que yo apoyo la teoría de los alienígenas ancestrales, pero no de la forma en la que nos lo cuenta el señor Erich von Däniken ("autor" de la teoría) o como la cuenta la serie-documental de Ancient Aliens que está totalmente basada en las pamplinas de Erich von Däniken, este individuo solo cuenta mentiras para enriquecer las bases de su teoría y llenar su bolsillo, literalmente.

Esa imagen egipcia que muestras es un cuento, lo diré de otra manera: ¡ESO NO ES UNA BOMBILLA GIGANTE! y lo del interior no es el "filamento" de una bombilla, se trata de una simple serpiente y lo que lo rodea es una superficie que representa otras cosas... una flor de loto de la que brota una burbuja de "vida" de donde sale el primer Dios egipcio, Atum, representado en forma de serpiente, es una representación de la vida y de los dioses como cualquier otra representación egipcia, realmente no es nada fuera de lo normal en esta cultura, se está utilizando el mismo simbolismo egipcio.

Yo a pesar de ser bastante crédulo con este tipo de teorías siempre he intentado contrastar la información que me dan con otras fuentes de opiniones expertas e imparciales (egiptologos, arquitectos, textos antiguos, debunkers, en fin lo que se encuentre por internet), y te puedo asegurar que el 99% o el 100% de todo lo relacionado con la serie Ancient Aliens y con el libro de Erich von Däniken es una farsa, todo está manipulado de forma exagerada, y utilizando argumentos del hombre de paja, la mitad de palabras sacadas de textos antiguos se las inventan para enriquecer falsos argumentos (y esto se puede comparar con las transcripciones reales de textos antiguos).

Hay una verdad muy oculta y muy grande relacionada con los alienígenas y con las civilizaciones antiguas, pero no hay que confiar en todo lo que veamos en la TV.

Me gustaría que te tomases unos minutos para ver este video subtitulado al Castellano, a partir del minuto 4:00 lo comprenderás todo a la perfección:

Refutando "astronautas ancestrales": parte 10 Focos electricos Egipcios


Saludos!
6413  Programación / Scripting / Re: Redirigir el resultado de un comando a una variable ¿Se puede? ¿Cómo? [BATCH] en: 16 Noviembre 2014, 22:10 pm
al hacer la segunda solicita detallar dónde y con qué nombre va a ir el archivo ¿Verdad? Bueno, pues he ingresado C:\prueba1.txt y en C: no quedó ningún .txt con esa información. Lo más probable es que yo no esté entendiendo el código

Lo que ocurre es que en el bloque de la opción [2] pido el nombre del archivo, no pido la ruta completa ni tampoco la extensión, el archivo se guarda con el nombre especificado en el directorio de trabajo actual.

El código que escribí es un sólo ejemplo para orientarte y está abierto a modificaciones para adaptarlo a tus necesidades.





se ingresa a la primer opción y luego cuando ingreso a la segunda, entra nuevamente por la primera.

El problema, obviamente, está aquí:
Citar
Código
  1. if (%o%==1) goto :uno else (if (%o%==2) (goto :if2) else (if (%o%==3) (goto :if3) else (if (%o%==4) (goto :cuatro) else (goto :error))))

Estás intentando simular un 'ElseIf', pero esta es otra característica que no está soportada en Batch (aunque por otro lado si que soporta un 'And', pero de forma invisible).
No es necesario que anides los ifs para conseguirlo.

¿Qué hago?

Tienes tres opciones:

1) usar múltiples If:
Código
  1. If "%o%" EQU "1" (Goto :uno)
  2. If "%o%" EQU "2" (Goto :dos)
  3. etc...

2) Usar el comando Choice como ya mostré.

3) Omitir el uso de If y llamar al método deseado de forma dinámica:

Código
  1. @echo off
  2.  
  3. :menu
  4. cls
  5. echo 1) listar archivos segun su criterio
  6. echo 2) la busqueda anterior se almacena en un archivo
  7. set /p "o= Elija su opcion:"
  8. Call :%o%
  9. Goto :Menu
  10.  
  11. :1
  12. Echo Soy el método 1
  13. goto :EOF
  14.  
  15. :2
  16. Echo Soy el método 2
  17. goto :EOF


saludos
6414  Programación / Scripting / Re: Redirigir el resultado de un comando a una variable ¿Se puede? ¿Cómo? [BATCH] en: 16 Noviembre 2014, 17:15 pm
Buenas!

Citar
La primera es listar archivos según un criterio ingresado por el usuario

Citar
el problema está en la primer opción, ¿cómo hago para que éste resultado se almacene en una variable? ¿Se puede?

1) Te están pidiendo que listes archivos, no que almacenes el resultado de la búsqueda en una variable,
    sé que intentas ser eficiente pero en Batch no puedes serlo, así que mi consejo es que no hagas más de lo necesario, es decir, aquello que te piden que hagas.

2) Lamentablemente Batch no llega ni a poder calificarse como "lenguaje de programación", y las variables multi-linea no es una característica soportada (de forma natural) en Batch.
    Para crear una variable multilinea debes recurrir a un pequeño Hack, algo que te resultaría bastante engorroso en la situación que te encuentras (Dir + For /F + MultiLine Hack):
Código
  1. @Echo OFF & SetLocal EnableDelayedExpansion
  2.  
  3. :: New Line Hack Start
  4. set NewLine=^
  5.  
  6.  
  7. :: New Line Hack End
  8.  
  9. set "MultiLine=Line1!NewLine!Line2"
  10. set "MultiLine=!MultiLine!!NewLine!Line3"
  11.  
  12. Echo !MultiLine!
  13.  
  14. Pause&Exit

3) Consejo: Utiliza la programación en Inglés, el desarrollo en Castellano, además de feo, no es nada productivo.

Ejemplo:
Código
  1. @Echo OFF
  2.  
  3. :Menu
  4. Echo [1] Perform a file search in drive '%~d0\'.
  5. Echo [2] Write the search result of option [1] to file.
  6. Echo [3] *********
  7. Echo [4] Terminate
  8. Choice.exe /C "1234" /M "Choose an option: "@Echo OFF & SetLocal EnableDelayedExpansion
  9. Cls
  10. Call :Option%ErrorLevel%
  11. Cls
  12. Goto :Menu
  13.  
  14. :Option1 :: Perform file search by pattern.
  15. Set /P "SearchPattern.Filename=Write a partial filename: "
  16. Set /P "SearchPattern.Extension=Write a file extension (or keep it empty for any extension): "
  17.  
  18. Set "SearchPattern.Drive=%~d0"
  19. Set "SearchPattern.Filename=*%SearchPattern.Filename%*"  & :: Fix empty file name.
  20. Set "SearchPattern.Extension=%SearchPattern.Extension%*" & :: Fix empty file extension.
  21.  
  22. (
  23. Dir /A-D /B /S "%SearchPattern.Drive%\%SearchPattern.Filename%.%SearchPattern.Extension%"
  24. )>"%Temp%\SearchResult.tmp"
  25.  
  26. Type "%Temp%\SearchResult.tmp" | MORE
  27. Goto :EOF
  28.  
  29. :Option2 :: Save result to file.
  30. If Not Exist "%Temp%\SearchResult.tmp" (
  31. Echo There is any previous search result to save.
  32. ) Else (
  33. Set /P "FileName=Set the destination filename: "
  34. Call Move /Y "%Temp%\SearchResult.tmp" "%CD%\%%FileName%%.txt"
  35. )
  36. Goto :EOF
  37.  
  38. :Option3
  39. :: Do Something.
  40. Goto :EOF
  41.  
  42. :Option4

Saludos
6415  Programación / .NET (C#, VB.NET, ASP) / Re: Manejo de Picturebox con un Timer en C# en: 16 Noviembre 2014, 14:05 pm
Había pensado en un arreglo pero nunca hice uno con imágenes y no sé cómo.

Un Array/Colección se puede crear de la misma manera para cualquier tipo de objeto, no tiene mucho misterio solo tienes que asignarle objetos de tipo Bitmap o Image cómo lo harías con enteros para un Array de Integer, por ejemplo.

Si las images no superan los 256x256 de resolución entonces te recomiendo utilizar un ImageList, de lo contrario podrías utilizar una colección genérica de tipo List(<T> Image).

Para el tema de volver a la primera imagen (es decir, el primer elemento de la colección) puedes llevar la cuenta del índice actual en una variable "contador", o bien puedes utilizar los métodos de búsqueda de la lista.

Ejemplo:

VB.Net:
Código
  1. Public Class Form1
  2.  
  3.    ' instancio unas imagenes por defecto para este ejemplo...
  4.    Private ReadOnly img1 As Image = Image.FromFile("D:\Customización\Wallpapers\_Favoritos\001.jpg")
  5.    Private ReadOnly img2 As Image = Image.FromFile("D:\Customización\Wallpapers\_Favoritos\002.jpg")
  6.    Private ReadOnly img3 As Image = Image.FromFile("D:\Customización\Wallpapers\_Favoritos\003.jpg")
  7.    Private ReadOnly img4 As Image = Image.FromFile("D:\Customización\Wallpapers\_Favoritos\004.jpg")
  8.    Private ReadOnly img5 As Image = Image.FromFile("D:\Customización\Wallpapers\_Favoritos\005.jpg")
  9.  
  10.    Private WithEvents imgListPhotos As New List(Of Image) From {img1, img2, img3, img4, img5}
  11.    Private WithEvents pcbPhotos As New PictureBox
  12.    Private WithEvents timerPhotos As New Timer
  13.  
  14.    Private imgInterval As Integer = 2000I
  15.  
  16.    ''' <summary>
  17.    ''' Initializes a new instance of the <see cref="Form1"/> class.
  18.    ''' </summary>
  19.    Public Sub New()
  20.  
  21.        ' This call is required by the designer.
  22.        InitializeComponent()
  23.  
  24.        ' Add any initialization after the InitializeComponent() call.
  25.        Me.Controls.Add(Me.pcbPhotos)
  26.  
  27.        With Me.pcbPhotos
  28.            .Dock = DockStyle.Fill
  29.            .BackgroundImageLayout = ImageLayout.Stretch
  30.        End With
  31.  
  32.        With Me.timerPhotos
  33.            .Interval = Me.imgInterval
  34.            .Enabled = True
  35.            .Start()
  36.        End With
  37.  
  38.    End Sub
  39.  
  40.    ''' <summary>
  41.    ''' Handles the Tick event of the timerPhotos control.
  42.    ''' </summary>
  43.    ''' <param name="sender">The source of the event.</param>
  44.    ''' <param name="e">The <see cref="EventArgs"/> instance containing the event data.</param>
  45.    Private Sub TimerPhotos_Tick(ByVal sender As Object, ByVal e As EventArgs) _
  46.    Handles timerPhotos.Tick
  47.  
  48.        With Me.pcbPhotos
  49.  
  50.            If .BackgroundImage Is Nothing Then
  51.                .BackgroundImage = Me.imgListPhotos.First
  52.  
  53.            Else
  54.                Dim imgIndex As Integer =
  55.                    Me.imgListPhotos.FindIndex(Function(img As Image) img.Equals(.BackgroundImage)) _
  56.                    + 1I
  57.  
  58.                If imgIndex = Me.imgListPhotos.Count Then ' RollBack
  59.                    imgIndex = 0I
  60.                End If
  61.  
  62.                .BackgroundImage = Me.imgListPhotos(imgIndex)
  63.  
  64.            End If ' currentImg Is Nothing
  65.  
  66.        End With ' Me.pcbPhotos
  67.  
  68.    End Sub
  69.  
  70. End Class

C# (conversión online):
Código
  1. using Microsoft.VisualBasic;
  2. using System;
  3. using System.Collections;
  4. using System.Collections.Generic;
  5. using System.Data;
  6. using System.Diagnostics;
  7. public class Form1
  8. {
  9.  
  10. // instancio unas imagenes por defecto para este ejemplo...
  11. private readonly Image img1 = Image.FromFile("D:\\Customización\\Wallpapers\\_Favoritos\\001.jpg");
  12. private readonly Image img2 = Image.FromFile("D:\\Customización\\Wallpapers\\_Favoritos\\002.jpg");
  13. private readonly Image img3 = Image.FromFile("D:\\Customización\\Wallpapers\\_Favoritos\\003.jpg");
  14. private readonly Image img4 = Image.FromFile("D:\\Customización\\Wallpapers\\_Favoritos\\004.jpg");
  15. private readonly Image img5 = Image.FromFile("D:\\Customización\\Wallpapers\\_Favoritos\\005.jpg");
  16.  
  17. private List<Image> imgListPhotos = new List<Image> {
  18. img1,
  19. img2,
  20. img3,
  21. img4,
  22. img5
  23. };
  24.  
  25. private PictureBox pcbPhotos = new PictureBox();
  26. private Timer withEventsField_timerPhotos = new Timer();
  27. private Timer timerPhotos {
  28. get { return withEventsField_timerPhotos; }
  29. set {
  30. if (withEventsField_timerPhotos != null) {
  31. withEventsField_timerPhotos.Tick -= TimerPhotos_Tick;
  32. }
  33. withEventsField_timerPhotos = value;
  34. if (withEventsField_timerPhotos != null) {
  35. withEventsField_timerPhotos.Tick += TimerPhotos_Tick;
  36. }
  37. }
  38.  
  39. }
  40.  
  41. private int imgInterval = 2000;
  42.  
  43. /// <summary>
  44. /// Initializes a new instance of the <see cref="Form1"/> class.
  45. /// </summary>
  46. public Form1()
  47. {
  48. // This call is required by the designer.
  49. InitializeComponent();
  50.  
  51. // Add any initialization after the InitializeComponent() call.
  52. this.Controls.Add(this.pcbPhotos);
  53.  
  54. this.pcbPhotos.Dock = DockStyle.Fill;
  55. this.pcbPhotos.BackgroundImageLayout = ImageLayout.Stretch;
  56.  
  57. this.timerPhotos.Interval = this.imgInterval;
  58. this.timerPhotos.Enabled = true;
  59. this.timerPhotos.Start();
  60.  
  61. }
  62.  
  63. /// <summary>
  64. /// Handles the Tick event of the timerPhotos control.
  65. /// </summary>
  66. /// <param name="sender">The source of the event.</param>
  67. /// <param name="e">The <see cref="EventArgs"/> instance containing the event data.</param>
  68. private void TimerPhotos_Tick(object sender, EventArgs e)
  69. {
  70.  
  71. if (this.pcbPhotos.BackgroundImage == null) {
  72. this.pcbPhotos.BackgroundImage = this.imgListPhotos.First;
  73.  
  74. } else {
  75. int imgIndex = this.imgListPhotos.FindIndex((Image img) => img.Equals(this.pcbPhotos.BackgroundImage)) + 1;
  76.  
  77. // RollBack
  78. if (imgIndex == this.imgListPhotos.Count) {
  79. imgIndex = 0;
  80. }
  81.  
  82. this.pcbPhotos.BackgroundImage = this.imgListPhotos(imgIndex);
  83.  
  84. }
  85.  
  86. }
  87.  
  88. }
  89.  
  90. //=======================================================
  91. //Service provided by Telerik (www.telerik.com)
  92. //Conversion powered by NRefactory.
  93. //=======================================================

Saludos
6416  Foros Generales / Noticias / Re: Nuevo vídeo de Resident Evil Revelations 2 en: 14 Noviembre 2014, 21:58 pm
de nuevo estamos ante cambios que se alejan de los orígenes de Resident Evil, pero creo que pueden resultar beneficios para la jugabilidad y el desarrollo del juego.

Estoy deacuerdo.

Como fan y jugador de la saga desde sus inicios en la PSX, debo decir que a partir del RE3 se hechó a perder la mágia de esta gran Saga, no cabe duda que siguieron sacando maravillosos juegos, y en esta ocasión también estamos ante un buen juego, pero no es un Resident Evil auténtico, y eso me decepciona... para variar.

Prefiero mil veces el remake que lanzaron del RE1 a cualquiera de estos Resident Evil mediocres que sacan de tanto en cuanto.

Saludos!
6417  Programación / Java / Re: duda con el manejo de checkbox en: 14 Noviembre 2014, 19:21 pm
[MOD]:
1) Los códigos van en su respectiva etiqueta.
2) Si publicas una duda en la sección de programación general, como mínimo especifica el lenguaje.
3) Las dudas de Java van en su respestiva sección de Java


( @drvy es que no me diste tiempo a editar/corregir/mover el mensaje xD )
6418  Foros Generales / Foro Libre / Re: Microsoft transforma la plataforma .NET en Open Source, que llegará a GNU/Linux en: 14 Noviembre 2014, 17:44 pm
Unos datos adicionales para aclarar algunas dudas a aquellos que se hayan ilusionado (como yo) por un posible VisualStudio en Linux:

Solo van a liberar ciertas partes de .NET (lo que ellos llaman Core) que es basicamente la parte orientada a servidores, que es precisamente donde menos presencia tiene Microsoft.

Lo que no liberan es lo que realmente sería interesante para Linux, que es la parte WinForms y en general el subconjunto para aplicaciones de escritorio.

Saludos
6419  Programación / .NET (C#, VB.NET, ASP) / Re: Como puedo llamar un txt desde un botón después de gravado ? en: 14 Noviembre 2014, 13:26 pm
Código
  1. Process.Start(rutaFichero)
6420  Informática / Hardware / Re: ayuda teclado no va en: 14 Noviembre 2014, 13:19 pm
ya está, al final he formateado y todo solucionado.
Gracias a todos

TL/DR:
Utilicé el Wise Registry Cleaner porque parecia mi única alternativa para eliminar unos molestos rastros en los drivers de VMWare Workstation que me estaban ralentizando el PC, pero vaya, al final me acabó jodiendo el teclado xD, el limpiador de registro de CCLeaner no es nada intrusivo, y yo necesitava algo mucho más intrusivo dado el caso, conocía las posibles consecuencias de este tipo de limpiadoes, supongo que habrá sido a causa de eso...

Saludos
Páginas: 1 ... 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641 [642] 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 ... 1253
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines