últimos mensajes de: Eleкtro

Mostrar Mensajes
Páginas: 1 ... 829 830 831 832 833 834 835 836 837 838 839 840 841 842 843 [844] 845 846 847 848 849 850 851 852 853 854 855 856 857 858 859 ... 1254

8431	Informática / Hardware / Re: Ayuda con servicios de recuperación de datos... ¿ 600 € ?	en: 8 Septiembre 2013, 14:30 pm
Cita de: imoen en 8 Septiembre 2013, 14:02 pm también has tenido la idea de darle *un golpecillo* para ver si el brazo estaba atascado xD. siiii.... uuuuuuuuuuuuuuno... no más... xD ya perdí la cuenta. Citar Cuanto mas tiempo pase mas dificil sera encontrar un disco como el tuyo para piezas , si puedes intenta localizar un disco igual al tuyo y cuando puedas pagar eso al menos puedes aportar disco de piezas. No creas que no lo he pensado, algun dia se extinguirá por completo la serie de mi HDD y ya si que no habrá ninguna esperanza... tienes razón ahora que lo pienso mejor es muy buena idea comprar un hdd igual que el mio para tenerlo de reserva por si el día de mañana consigo una solución y debo aportar el HDD porque no se puede encontrar... ...espero poder estar a tiempo de encontrarlo, hasta que no me devuelvan mi HDD no sé el numero de serie ni nada. Pero básicamente en lo que me tengo que fijar si intento adquirir el mismo HDD es que el modelo sea el mismo, ¿lo demás como el número de serie y todo eso no importa ...o si? Un maxtor del mismo modelo y misma capacidad, ¿debo tener en cuenta algún detalle técnico más? Gracias Imoen, saludos

8432	Programación / .NET (C#, VB.NET, ASP) / Re: [SOURCE] PATHS	en: 8 Septiembre 2013, 11:46 am
NUEVA VERSIÓN DISPONIBLE Versión 1.1 Cambios: · He extendido la funcionalidad de la aplicación para poder administrar también las extensiones del PATHEXT · He implementado y compatibilizado todas las opciones originales del PATH con la la nueva funcionalidad extendida para manejar la variable PATHEXT (añadir extension, eliminar extension, backup, clean, etc...). · Caracteristica opcional en el instalador, esta caracteristica agrega la opción "Añadir carpeta al PATH" en le menú contextual del mouse (No lo he testeado en WinXP) PD: Las imágenes del post principal NO son de esta última versión. Saludos

8433

Programación / .NET (C#, VB.NET, ASP) / Re: Hola tengo una pregunta sobre C#

en: 8 Septiembre 2013, 08:26 am

Hola

Cita de: NetFire97 en 8 Septiembre 2013, 05:36 am

en los cuales tengo 3 elementos

...De que elementos se tratan, o tenemos que adivinarlo xD?.

Bueno, como no has proporcionado la suficiente información te muestro mi solución en VB.NET, requiere el uso de Framework ~~4.0~~ 3.5 por las extensiones LINQ:

Básicamente lo que tienes que hacer es recorrer la colección de controles del contenedor y comprobar la cantidad de esos controles que están "seleccionados" para "deshabilitar" el resto de controles.

Código

    Private CheckBoxes() As CheckBox
    Private CheckIt As Boolean
 
    Private Sub CheckBoxes_CheckedChanged(sender As Object, e As EventArgs) _
    Handles CheckBox1.CheckedChanged, CheckBox2.CheckedChanged, _
            CheckBox3.CheckedChanged, CheckBox4.CheckedChanged
 
        CheckBoxes = Me.GroupBox1.Controls.OfType(Of CheckBox)().ToArray
 
        Select Case CheckBoxes.Where(Function(x) x.Checked).Count
            Case Is >= 2 : CheckIt = False
            Case Is < 2 : CheckIt = True
        End Select
 
        For Each ctrl As CheckBox In CheckBoxes.Where(Function(x) Not x.Checked)
            ctrl.Enabled = CheckIt
        Next
 
        CheckBoxes = Nothing
 
    End Sub

Aquí tienes una traducción al vuelo para C#,
convierte el Switch a un par de IF's y te debería funcionar

Código:

si Checkeds es igual o mayor que 2...
  Enable = false
si checkeds es menor que 2...
  Enable = true

Código

 
private void CheckBoxes_CheckedChanged(object sender, EventArgs e)
{
	dynamic Controls = this.GroupBox1.Controls.OfType<CheckBox>();
	dynamic Checkeds = Controls.Where(x => x.Checked).Count;
	bool Enable = false;
 
	switch (Checkeds) {
		case  // ERROR: Case labels with binary operators are unsupported : GreaterThanOrEqual
2:
			Enable = false;
			break;
		case  // ERROR: Case labels with binary operators are unsupported : LessThan
2:
			Enable = true;
			break;
	}
 
	foreach (CheckBox ctrl in Controls.Where(x => !x.Checked)) {
		ctrl.Enabled = Enable;
	}
 
}
 
//=======================================================
//Service provided by Telerik (www.telerik.com)
//Conversion powered by NRefactory.
//Twitter: @telerik
//Facebook: facebook.com/telerik
//=======================================================

Saludos!

8434

Programación / .NET (C#, VB.NET, ASP) / [SOURCE] PATHS (Administra las entradas de las variables de entorno 'PATH' y...)

en: 8 Septiembre 2013, 07:43 am

Código:

 :::::::::     ::: ::::::::::: :::    :::  ::::::::  
 :+:    :+:  :+: :+:   :+:     :+:    :+: :+:    :+: 
 +:+    +:+ +:+   +:+  +:+     +:+    +:+ +:+        
 +#++:++#+ +#++:++#++: +#+     +#++:++#++ +#++:++#++ 
 +#+       +#+     +#+ +#+     +#+    +#+        +#+ 
 #+#       #+#     #+# #+#     #+#    #+# #+#    #+# 
 ###       ###     ### ###     ###    ###  ########  

 By Elektro H@cker

· DESCRIPCIÓN:

PATHS es una aplicación por línea de comandos para administrar las entradas de la variable de entorno PATH y PATHEXT de Windows.

Tiene opciones para agregar y eliminar entradas así como limpiar, restaurar o crear una copia de seguridad del PATH y del PATHEXT.

La aplicación ha sido desarrollada usando VisualStudio 2012 en el lenguaje VB.NET y bajo Framework 4.0 por el uso de LINQ.

· MODO DE EMPLEO:

Código:

[+] Syntax:

    PATHS.exe [SWITCHES] [DIRECTORY or EXTENSION or INDEX]

Código:

[+] Switches:

    /l (or) /list    | Displays a list of the path entries.
    /b (or) /backup  | Backup the entries to a Registry file.   
    /c (or) /clean   | Clean duplicates and invalid entries.
    /r (or) /reset   | Reset the paths to Windows default.
                     |
    /add -current    | Add an entry to the current user PATH.
    /add -local      | Add an entry to the local machine PATH.
    /a (or) /add     | Add an entry to both PATH's.
                     |
    /del -current    | Delete an entry from current user PATH.
    /del -local      | Delete an entry from local machine PATH.
    /d (or) /del     | Delete an entry from both PATH's.
                     |
    /addext -current | Add an extension to current user PATHEXT.
    /addext -local   | Add an extension to local machine PATHEXT.
    /addext          | Add an extension to both PATHEXT's.
                     |
    /delext -current | Delete an extension from current user PATHEXT.
    /delext -local   | Delete an extension from local machine PATHEXT.
    /delext          | Delete an extension from both PATHEXT's.
                     |
    /? (or) /help    | Display this help.

Código:

[+] Additional switch value's Syntax:

    /del -current (Directory)
    /del -current (Entry Index)

    /del -local   (Directory)
    /del -local   (Entry Index)

    * You can see all the entry index numbers typing: PATHS /list

    /addext -current (File-Extension)
    /addext -local   (File-Extension)

    /delext -current (File-Extension)
    /delext -local   (File-Extension)

Código:

[+] Usage examples:

    PATHS /list

    PATHS /clean

    PATHS /reset

    PATHS /backup "C:\Registry File.reg"
    (Saves all the PATH and PATHEXT entries to the destination file)

    PATHS /add -current "C:\Directory"
    (Adds a new entry "C:\Directory" to Current User PATH)

    PATHS /add -local "C:\Directory"
    (Adds a new entry "C:\Directory" to All Users PATH)

    PATHS /add "C:\Directory"
    (Adds a new entry "C:\Directory" to both PATH's)

    PATHS /del -current "C:\Directory"
    (Deletes entries matching as "C:\Directory" from Current User PATH)

    PATHS /del -local "C:\Directory"
    (Deletes entries matching as "C:\Directory" from All Users PATH)

    PATHS /del "C:\Directory"
    (Deletes entries matching as "C:\Directory" from both PATH's)

    PATHS /del -current 5
    (Deletes entry index 5 from Current User PATH)

    PATHS /del -local 5
    (Deletes the entry index 5 from All Users PATH)

    PATHS /addext -current ".hack"
    (Adds a new ".hack" extension to Current User PATHEXT)

    PATHS /addext -local ".hack"
    (Adds a new ".hack" extension to All Users PATHEXT)

    PATHS /addext ".hack"
    (Adds a new ".hack" extension to both PATHEXT's)

    PATHS /delext -current ".hack"
    (Deletes extensions matching as ".hack" from Current User PATHEXT)

    PATHS /addext -local ".hack"
    (Deletes extensions matching as ".hack" from All Users PATHEXT)

    PATHS /addext ".hack"
    (Deletes extensions matching as ".hack" from both PATHEXT's)[/quote]

· IMÁGENES:

· DESCARGA:

(Resubido el 05-Marzo-2014)
http://www.mediafire.com/download/ffuxgwezf4jd5c0/PATHS.rar

Incluye Source, compilado, ~~e instalador.~~

Aquí pueden ver o descargar una versión antigua y no tán completa que codeé hace bastante tiempo en Ruby: [RUBY] [APPORTE PARA WINDOWS] PATHS v0.3 - Una utilidad para el PATH

8435	Sistemas Operativos / Windows / Re: como puedo poner permisos	en: 8 Septiembre 2013, 01:51 am
Cita de: shitoman en 8 Septiembre 2013, 01:36 am yo quiero que en mi windows solo se puedan abrir el office el internet explorer y el visual basic, todo lo demas no se podra abrir. ¿Quieres restringirte el acceso de esas aplicaciones a ti tambien?, ¿o sólamente a las demás personas que utilicen tu PC?. Para lo primero te puedo decir la forma manual de hacerlo (modificando los permisos de lectura del usuario, uno por uno en cada ejecutable, te llevaría un rato), para lo segundo existen aplicaciones que protegen el acceso a otras aplicaciones mediante el uso de contraseñas, aunque ahora mismo no recuerdo el nombre de ninguna. Saludos

8436

Programación / .NET (C#, VB.NET, ASP) / Re: Librería de Snippets !! (Posteen aquí sus snippets)

en: 8 Septiembre 2013, 01:43 am

Este código devuelve la cantidad de coincidencias de un String en los valores de un Array:

Código

#Region " Count Array Matches "
 
    ' [ Count Array Matches ]
    '
    ' // By Elektro H@cker
    '
    ' Examples :
    ' MsgBox(Count_Array_Matches({"a", "b", "c", "d", "d", "d"}, "d")) ' Result: 3
 
    Private Function Count_Array_Matches(ByVal Collection As String(), _
                                         ByVal Match As String, ByVal _
                                         IgnoreCase As Boolean) As Integer
 
        Return IIf(IgnoreCase, _
                  Collection.Where(Function(str) str.ToLower = Match.ToLower).Count, _
                  Collection.Where(Function(str) str = Match).Count)
 
    End Function
 
#End Region

Este código elimina los valores únicos de un array:

Código

#Region " Delete Array Unique Names "
 
    ' [ Delete Array Unique Names ]
    '
    ' // By Elektro H@cker
    '
    ' Examples :
    ' Dim MyArray as String() = Delete_Unique_Values_In_Array({"a", "b", "c", "d", "d", "d"}) ' Result: {"d", "d", "d"} 
 
    Private Function Delete_Unique_Values_In_Array(ByVal Collection As String()) As String()
        Return Collection.GroupBy(Function(x) x) _
        .Where(Function(x) x.Count() > 1) _
        .SelectMany(Function(x) x) _
        .ToArray()
    End Function
 
#End Region

PD: No está muy optimizado pero para Arrays pequeños no se aprecia nada el performance.

8437	Programación / Scripting / Re: ejecutar aplicacion en %appdata%	en: 8 Septiembre 2013, 01:18 am
Cita de: asdexiva en 8 Septiembre 2013, 00:11 am gracias electro utilize %homepatch% funcionara en windows 7 ? No, si quieres utilizar la variable de entorno HOMEPATH debes añadirle la letra de la unidad al principio: Código: Echo "%homedrive%\%homepath%" Pero en lugar de eso puedes usar la variable USERPROFILE que almacena el perfil del usuario actual: Código: Echo %userprofile% Cita de: asdexiva en 8 Septiembre 2013, 00:11 am no entiendo por que esto Start /B "" " las comillas Citar Syntax START "title" [/Dpath] [options] "command" [parameters] Always include a TITLE this can be a simple string like "My Script" or just a pair of empty quotes "" According to the Microsoft documentation, the title is optional, but you will have problems if it is omitted. Tu estabas especificando el título al usar las comillas dobles, tu título era "%APPDATA%\xd.bat", no estabas especificando ningún archivo que abrir, si NO hubieras usado las comillas entonces si que se tomaría como una ruta y no como un título (aunque si tu nombre de usuario contiene espacios entonces no te habría funcionado de todas formas xD). Lee un poco la ayuda de los comandos cuando te surgan dudas: Código: Start /? Correcto: Código: Start /B app.exe Start /B "" "app.exe" Start /B "" "app con espacios.exe" Incorrecto: Correcto: Código: Start /B "app.exe" Start /B "app con espacios.exe" Start /B app con espacios.exe Saludos

8438	Programación / Scripting / Re: ejecutar aplicacion en %appdata%	en: 8 Septiembre 2013, 00:01 am
Cita de: asdexiva en 7 Septiembre 2013, 23:46 pm mi prenguta es por que esto no ejecuta la aplicacion Código: start /b "%APPDATA%\xd.bat" Prueba así: Código If Exists "%APPDATA%\xd.bat" (Start /B "" "%APPDATA%\xd.bat") ELSE (Echo El archivo no existe) PD: Para la próxima vez lo mínimo que puedes hacer cuando tengas una duda es postear el error que te manda la CMD al intentar ejecutar el archivo, no somos adivinos. Cita de: asdexiva en 7 Septiembre 2013, 23:46 pm y si me podrian decir directorios donde batch pueda copiar en windows 7 por ejemplo windows 7 no deja copiar ni crear carpetas en el directorio de windows por el uac ay carpetas que no tengan bloqueos ? Me parece que todas las carpetas del usuario actual están "desprotegidas", es decir todas las carpetas que estén dentro de la carpeta del perfil del usuario logueado, menos las ocultas como Application Data. Y puedes cambiar el propietario de cualquier carpeta con TAKEOWN y modificar los privilegios de acceso para ese usuario con ICACLS. Saludos

8439	Informática / Hardware / Re: Ayuda con servicios de recuperación de datos... ¿ 600 € ?	en: 7 Septiembre 2013, 13:31 pm
Cita de: imoen en 7 Septiembre 2013, 12:22 pm Insisto si no puedes o no quieres pagar los 600 es que los datos no valen ese dinero para ti Te aseguro que si yo fuese rico pagaría el precio, pero no lo soy, no es que no quiera pagarlo porque los datos no valgan ese dinero, es que por responsabilidad no puedo pagar un precio tan elevado, como ya digo he guardado el disco durante 5 años así que imaginate si tengo ganas de poder recuperarlos o no Cita de: imoen en 7 Septiembre 2013, 12:22 pm y no has probado a arreglar tu el disco ?¿ , puedes comentar el problema que tiene y lo mismo podemos ayudarte , aunque las opciones se reducen a dos A) error de la parte electronica , cambiar la placa por una igual dificultad media , mas que nada encontrar una placa igual B) error mecanico pues o pagas o destruyes el disco Pues eso es lo que intento averiguar Imoen, según la empresa este es el supuesto fallo del disco: Diréctamente el disco no funciona, al arrancar la bios intenta reconocer el disco pero no puede reconocerlo, el disco empieza a hacer un ruido como una correa de bicicleta y luego hace un "Click!" como si llegase a un "tope", y se repiten esos ruidos durante unos minutos hasta que finálmente la bios deja de intentar reconocer el disco y los ruidos paran. Yo no estoy capacitado para reparar el disco porque no se calibrar los bloques de los cabezales ni esas historias... pero no sé si esto es dificil para una persona con nivel medio de conocimientos sobre la reparación de HDD's, por eso aun me queda la pequeña esperanza de poder contratar la ayuda de algún técnico de este foro por un precio que no sea tan desorbitado como los de estas empresas... PD: Intenté un par de veces lo de meter el disco en una bolsa en el congelador pero no me funcionó . Un saludo!

8440	Sistemas Operativos / Windows / Re: Ocultación de archivos en: C:\Users\Usuario\Downloads	en: 7 Septiembre 2013, 01:55 am
Cita de: S@l0o en 6 Septiembre 2013, 23:29 pm me dice que la carpeta esta vacia, enseguida reintento acceder y me aparecen los archivo Un virus no hace eso. Cita de: S@l0o en 6 Septiembre 2013, 23:29 pm ¿Falta de mantenimiento preventivo? ¿Que cantidad de archivos hay en esa carpeta?. Alguna que otra vez suele pasar, me ha pasado sobretodo en máquinas virtuales, windows necesita tiempo para listar y mostrar los archivos de las carpetas a las que accedes, ese tiempo puede demorar entre unos pocos milisegundos o incluso segundos, si tienes un procesador lento y miles de archivos en esa carpeta entonces me parece normal lo que comentas. Otras veces me ha pasado que el único modo de que se actualizase la carpeta sea reaccediendo como tu has comentado. 1. Empieza por decir que Windows usas. 2. En la carpeta Downloads desactiva todas las columnas inecesarias 3. Si en la carpeta hay imágenes entonces en las propiedades del sistema puedes desactivar la vista prevía de imágenes si no te importa perder los thumbnails 4. Si lo crees conveniente puedes desactivar algunas opciones más relacionadas con las ventanas del explorer 5. Prueba a desactivar también el panel de vista previa y el panel de navegación del explorer. Todo eso para que las carpetas se carguen de forma más fluida sin necesitar tanto tiempo de carga. Saludos

Páginas: 1 ... 829 830 831 832 833 834 835 836 837 838 839 840 841 842 843 [844] 845 846 847 848 849 850 851 852 853 854 855 856 857 858 859 ... 1254