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 - FJDA

#251
Cita de: engel lex en 21 Febrero 2020, 08:12 AM
sobre los anarquistas hay una mala concepcion... anarquista que haga caos solo porque es anarquista, no sabe que es anarquismo XD el anarquismo es un movimiento que procede al comunismo, es decir es el siguiente paso, donde el hombre es tan consciente del bien y el mal que no requiere dirigentes en la sociedad...
pero los anarquistas se organizan ¿no? y los que los organizan ¿no son dirigentes? es totalmente anti-natural, quien más o quien menos pertenece o ha pertenecido a un grupo de amigos, nadie nombra un jefe pero siempre hay alguien que manda,  un líder, o pueden ser varios, y el resto les sigue, un/a alfa. Así es como funciona es algo instintivo.

#252
mujeres, me parece bien, que digo super bien. Cuando vi Los becarios (The Internship)casi me caigo  para atrás viendo la de tías buenas que salían en la película. Todas jovencitas, delgaditas, y más de una de muy buen ver. ¡venga ya!. Si vas a cualquier clase de informática y por cada 20 hombres lo mismo hay una o dos mujeres, y dicho sea de paso más feas que el culo de una mula o tirando a normalitas.





#253
softonic, no me explico como sigue existiendo 19 años y medio dando por c.
La primera y única vez que me descargué un programa de Softonic, me cambió la página de inicio  del navegador, como no sabía, empecé a tocar el registro de windows, borrar archivos, y tuve que instalar el SO de nuevo. El boca a boca ya  debería haber hundido esa página a la miseria más absoluta, pero es que hay mucho amante de lo "gratis".
#254
Buenas me gustaría saber como iniciar windows de forma automáticas tras hibernación.
He buscado en Google, pero salen opciones desde BIOS o usando programas de terceros y yo me pregunto ¿y qué hacen esos programas de terceros?, digo yo que debe haber alguna forma manual de hacerlo, sea programando una tarea pero en tal caso no encuentro como.
La idea de usar comandos shell no me gusta porque quiero ver donde se guarda dicha información, sea el registro o donde sea y poder crearlo yo o modificarlo.

Gracias



como no tengo ningunas esperanzas de que nadie conteste... he seguido buscando. Me fui a la deep web porque google, ya se sabe anuncios, y páginas para que compres x programa y clones y clones que dicen exáctamente lo mismo.


nada fue buscar en la deep y a la primera una opción y otra en el registro, pero no puedo acceder a la clave para modificar. Lo estaba buscando porque mi PC arranca solo cada 30 minutos y si yo fuera un ciberdelincunte que hago un bot o troyano y lo programo para que realice unos cambios y que arranque el PC de forma automática offline ¿ como  lo hago? pues de eso se trata de intentar hacerlo yo a ver si así encuentro la fuente del problema.

Encontré esto:
Simplemente en el Programador de tareas crear una tarea y en Condiciones marcar "Activar el equipo para ejecutar esta tarea"

https://www.howtogeek.com/119028/how-to-make-your-pc-wake-from-sleep-automatically/



es curioso que buscando en Google encuentro una página que dice como apagar desde el programador de tareas pero para arrancar el PC de forma automática te da la opción del BIOS e ignora esta, no lo entiendo, pero bueno.  Maldito Google que me ha tenido toda la tarde buscando y nada. :¬¬

Buscando tareas una por una encontré una que tenía activada esta opción pero resulta que es de mi antivirus y no lo tiene programado para que lo haga tras 30 minutos.
dios si que lo tiene programado para que lo haga cada 30 minutos. Yo buscando un virus y resulta que lo hacía mi antivirus.


https://www.symantec.com/connect/forums/lets-get-some-additional-information-here-antimalwaremigrationtask
#255
buenas

Pues vuelvo a tener problemas con la hibernación. Ayer me falló el sistema y tuve que repararlo, al final conseguí no tener que instalar Windows de nuevo.

Anteriormente me ocurría y  creo que era porque   la tarjeta gráfica  el Adaptador de red despertaba el PC de la hibernación, lo desactivé y mano de santo.



Sin embargo la casilla "Permitir sólo un Magic Pocket para reactivar el equipo" no se puede desactivar. Queda como se ve en esta imagen:



Tras la reparación volvía a estar activado, lo he vuelto a desactivar pero nada sigue arrancando solo. He mirado el log de eventos y esto es lo que me dice del evento Microsoft-Windows-Power-Troubleshooter:




El sistema estaba en suspensión y se reanudó.

Hora de suspensión: ‎2020‎-‎02‎-‎19T11:12:55.650390600Z
Hora de reactivación: ‎2020‎-‎02‎-‎19T11:42:28.984375000Z

Origen de la reactivación: Desconocido

SleepTime = 2020-02-19T11:12:55.650390600Z
WakeTime = 2020-02-19T11:42:28.984375000Z
SleepDuration = 9395
WakeDuration = 1472
DriverInitDuration = 1219
BiosInitDuration = 0
HiberWriteDuration = 24021
HiberReadDuration = 11635
HiberPagesWritten = 144005
Attributes = 16641
TargetState = 5
EffectiveState = 5
WakeSourceType = 0
WakeSourceTextLength = 0
WakeTimerOwnerLength = 0
WakeTimerContextLength = 0

Provider:
Microsoft-Windows-Power-Troubleshooter

Descripción:
El sistema estaba en suspensión y se reanudó.

Hora de suspensión: ‎2020‎-‎02‎-‎19T11:12:55.650390600Z
Hora de reactivación: ‎2020‎-‎02‎-‎19T11:42:28.984375000Z

Origen de la reactivación: Desconocido

Process ID:
1740

Thread ID:
4400


El Visor de elementos me da esto:


Código (xml) [Seleccionar]
Nombre de registro:System
Origen:        Microsoft-Windows-Power-Troubleshooter
Fecha:         19/02/2020 12:42:33
Id. del evento:1
Categoría de la tarea:Ninguno
Nivel:         Información
Palabras clave:
Usuario:       SERVICIO LOCAL
Equipo:        FJ-PC
Descripción:
El sistema estaba en suspensión y se reanudó.

Hora de suspensión: ‎2020‎-‎02‎-‎19T11:12:55.650390600Z
Hora de reactivación: ‎2020‎-‎02‎-‎19T11:42:28.984375000Z

Origen de la reactivación: Desconocido
XML de evento:
<Event xmlns="http://schemas.microsoft.com/win/2004/08/events/event">
 <System>
   <Provider Name="Microsoft-Windows-Power-Troubleshooter" Guid="{CDC05E28-C449-49C6-B9D2-88CF761644DF}" />
   <EventID>1</EventID>
   <Version>1</Version>
   <Level>4</Level>
   <Task>0</Task>
   <Opcode>0</Opcode>
   <Keywords>0x8000000000000000</Keywords>
   <TimeCreated SystemTime="2020-02-19T11:42:33.453125000Z" />
   <EventRecordID>113771</EventRecordID>
   <Correlation ActivityID="{872B88A8-29AC-4A6D-998B-8D216CDC8665}" />
   <Execution ProcessID="1740" ThreadID="4400" />
   <Channel>System</Channel>
   <Computer>FJ-PC</Computer>
   <Security UserID="S-1-5-19" />
 </System>
 <EventData>
   <Data Name="SleepTime">2020-02-19T11:12:55.650390600Z</Data>
   <Data Name="WakeTime">2020-02-19T11:42:28.984375000Z</Data>
   <Data Name="SleepDuration">9395</Data>
   <Data Name="WakeDuration">1472</Data>
   <Data Name="DriverInitDuration">1219</Data>
   <Data Name="BiosInitDuration">0</Data>
   <Data Name="HiberWriteDuration">24021</Data>
   <Data Name="HiberReadDuration">11635</Data>
   <Data Name="HiberPagesWritten">144005</Data>
   <Data Name="Attributes">16641</Data>
   <Data Name="TargetState">5</Data>
   <Data Name="EffectiveState">5</Data>
   <Data Name="WakeSourceType">0</Data>
   <Data Name="WakeSourceTextLength">0</Data>
   <Data Name="WakeSourceText">
   </Data>
   <Data Name="WakeTimerOwnerLength">0</Data>
   <Data Name="WakeTimerContextLength">0</Data>
   <Data Name="WakeTimerOwner">
   </Data>
   <Data Name="WakeTimerContext">
   </Data>
 </EventData>
</Event>



El  ProcessID="1740" es svchost.exe
el usuario es  SERVICIO LOCAL y origen Desconocido. Por lo que no consigo averiguar que p programa o lo que sea arranca el PC


Una ayudita por favor


edito:
De momento seguiré este tutorial a ver si suena la campana:

http://www.expertosensistemas.com/wol-wake-on-lan-remoto/




vale, el modo Ring-In-Power On (WOR) del BIOS estaba desactivado luego descartado que desde módem se encienda la compu.




he desactivado Wake on Magic Pocket y ahora si he podido desactivar la opción,
"Permitir sólo un Magic Pocket para reactivar el equipo".



Tras 10 minutos no se ha reanudado, ya veremos tras  una hora o más a ver que pasa.  :-\




Vale, podría desactivar el reinicio automático pero quiero tenerlo activado.




:huh: :huh: :huh: :huh: :huh:
No he conseguido averiguar todavía a que se debe que reanude. El PC se reactiva tras  30 minutos tras hibernar.

Lo he mirado todo, con process Explorer y process hacker todos los procesos, también servicios, el programador de tareas, he deshabilitado las no esenciales., he comprobado las tareas del sistema, he buscado virus (ni rastro), he quitado todos los componentes excepto el teclado y des-habilitado permitir reaundar el sistema, para teclado y ratón. Y ahí sigue despertando cada 30 minutos, riéndose de mi en toda la cara.  Si se trata de un virus es cojonudo, porque no hay manera de detectarlo.




SOLUCIONADO
Resulta que lo hacía mi antivirus, estaba programado en el Programador de tareas. Yo buscaba un virus y obviamente ignoré las configuraciones del antivirus.  :-\

La solución está aquí,ya que creé un nuevo tema enfocándolo desde otro punto de vista, el de un hacker. :

https://foro.elhacker.net/windows/como_iniciar_windows_de_forma_automatica_tras_hibernacion_sin_programas-t502993.0.html;msg2215785#msg2215785


#256
Cita de: luis456 en 16 Febrero 2020, 20:06 PM
Te agradezco tu aporte pero lo que busco es eliminar los que tengan signos negativo adelante ,se que tenia todas esas Rutinas gracias a Electro, pero he perdido todos esos códigos y estoy en cero  >:(
he recuperado parte de todo el codigo pero no encuentro este,

saludos
Luis
no se, soy yo  o te explicas mal "lo que busco es eliminar los que tengan signos negativo adelante" , esto es muy ambiguo por lo menos en un principio

Esto está respondido  arriba multiplicando los elementos por -1, no lo hice porque era mas que evidente pero parece que quiere que te den el código hecho;

Código (vbnet) [Seleccionar]
    For I As Integer = 0 To ListBox1.Items.Count - 1
           If ListBox1.Items(I) < 0 Then
               ListBox1.Items(I) = ListBox1.Items(I) * -1
           End If
       Next


Como se repiten hay que quitar los repetidos, usando el array LIST como te expliqué y he publicado el código eliminas los repetidos.

Código (vbnet) [Seleccionar]

Public Class Form1
   Dim lista() As Integer = {-1, -2, -3, -4, -5, 0, 1, 2, 3, 4, 5, 6}
   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       'ListBox1.DataSource = lista
       For Each elemento In lista
           ListBox1.Items.Add(elemento)
       Next
   End Sub

   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       '//QUITAR SIGNOS NEGATIVOS
       For I As Integer = 0 To ListBox1.Items.Count - 1
           If ListBox1.Items(I) < 0 Then
               ListBox1.Items(I) = ListBox1.Items(I) * -1 'nota: no funciona si se usa  ListBox1.DataSource()
           End If
       Next

       '//QUITAR ELEMENTOS REPETIDOS
       Dim nuevaLista As New List(Of Integer)
       For Each elemento In ListBox1.Items
           nuevaLista.Add(elemento)
       Next

       nuevaLista = nuevaLista.Distinct.ToList() 'elimina repetidos
       nuevaLista.Sort() 'Ordena la lista
       ListBox1.Items.Clear() 'limpia el listbox (no funciona con DataSource)
       'ListBox1.DataSource= Nothing 'usar solo si es se usó datasource para llenar el listbox
       For Each Elemento As String In nuevaLista
           ListBox1.Items.Add(Elemento)
       Next
   End Sub
End Class


Si lo que quieres, porque ya no se que pensar es quitar los número negativos entonces usa linq para obtener solo aquellos números que sean mayores que cero, aunque hay formas más típicas de hacerlo como pasar todo a un array, y volver a meter en e listbox ya sin los negativos usando if then y for next

Código (vbnet) [Seleccionar]

Public Class Form1
   Dim lista() As Integer = {-1, -2, -3, -4, -5, 0, 1, 2, 3, 4, 5, 6}
   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       ListBox1.DataSource = lista
       'For I As Integer = 0 To lista.Length -1
       '    ListBox1.Items.Add(lista(I))
       'Next
   End Sub

   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       '//elimina los número negativos
       Dim NumPositivo As IEnumerable(Of String) = Nothing
       NumPositivo = From value1 In lista Where (value1 >= 0) Select String.Format("{0}", value1)
       ListBox1.DataSource = Nothing
       'Si no se usara DataSourse usar lo siguinte:
       'ListBox1.Items.Clear()
       For Each pairs As String In NumPositivo
           ListBox1.Items.Add(pairs)
           My.Application.DoEvents()
       Next pairs
   End Sub
End Class


Añado que preguntaste:
CitarComo evitar se muestren números con el signo negativo en un ListBox ?

y como "como evitar" es multiplicar por -1 ANTES de meterlo en el listbox y si no los quieres meter números negativos usa la condición si es menor que cero no lo mentas en el listbox.

Claro que si quieres una respuesta exclusivamente de @Elektro perfectamente elaborada, entonces ya eso es otra cosa. A ver si aparece por aquí y si no pues le envías un mensaje personal y a ver si te contesta.


saludos
#257
Cita de: NEBIRE en 16 Febrero 2020, 20:14 PM
...que yo sepa (en España) nadie impide a nadie aprender ninguna lengua... así, que eso de 'opción' es mera tontería, tienen todo el derecho.
me refiero en las escuelas como asignatura. Recuerdo en las comunidades bilingües estudian obligatoriamente tres idiomas, el local, el castellano, y un idioma extranjero, mientras que el resto solo dos.

Cita de: NEBIRE en 16 Febrero 2020, 20:14 PM
Recuerdo que los catalanes obligan a profesores y alumnos a cursar las asignaturas en catalán,
a mí me parece lógico y tampoco me parece mal ¿qué tiene de malo?
#258
lo que habría que hacer es impartir todos las lenguas porque si Catalunya o Valencia son España entonces también el catalán es español, si Galicia es España el gallego también es español, igual con el Vasco.

Si se quiere la UNIDAD de España, el camino empieza por fomentar que España es diversidad cultural y lingüística, y no IMPONER una cultura o una lengua.

Para empezar si es obligatorio que un alumno tenga que estudiar una lengua extranjera como el inglés, francés o alemán, ¿por qué no puede un alumno castellano hablante elegir estudiar también una lengua española sea catalán, vasco o gallego? Si en comunidades autónomas bilíngües, hacen dos idiomas españoles, ¿por qué el resto no puede hacerlo también? Estaría bien que un madrileño, un extremeño o un andaluz tuvieran la opción de aprender un idioma también de su país como el vasco, catalán o gallego. Es mas, creo que debería ser obligatorio


#259
podrías meterlo en array List y luego usar Disctinct.ToList para eliminar elementos repetidos, luego lo metes en un listbox y listo.


Código (vbnet) [Seleccionar]

     Dim Lista As New List(Of Integer)
       Lista.AddRange({1, 5, 5, 5, 4, 1, 12, 4, 55, 55, 55, 55})
       Lista = Lista.Distinct.ToList
        ListBox1.DataSource = Lista

       'For Each Elemento As String In Lista
           'ListBox1.Items.Add(Elemento)
       'Next


#260
Dudas Generales / Re: Caso Práctico
15 Febrero 2020, 23:06 PM
sip obteniendo información del equipo sistema que está presente,