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

#291
 :xD

Si lo llego a saber voy yo, y me pongo ha hacer ruido con los sobacos o algo así.
#292
Foro Libre / Re: La tabla de Ouija
22 Marzo 2017, 14:36 PM
la superstición es la  el inducir miedo o creencia en algo que no existe pero que el sujeto lo percibe como algo real. En sí misma pasa a convertirse en "real" al provocar en el sujeto una reacción y una consecuencia física, moral y psítica,  en otras personas, o la persona misma e incluso en el entorno.

La fe, Dios y la creencia ciega es engañarse a si mismo.

CitarUn párroco anima a Pablo Iglesias a rezar con él: "Te invito para que sepas a qué sabe dios"

Un párroco anima a Pablo Iglesias a rezar con él: "Te invito para que sepas a qué sabe dios


Yo te digo a que sabe Dios, señor párroco, sabe a MENTIRA. Como toda fe religiosa y superstición.
#293
o sea, lo que quieres es un DataGridView


Código (vbnet) [Seleccionar]
Public Class Form1
   Dim WithEvents dtgw As New DataGridView
   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       Me.Controls.Add(dtgw)
       Me.Width = 510
       With dtgw
           .Size = New Size(500, 200)
           .ColumnHeadersVisible = False  'Oculta las cabeceras horizonteles
           .RowHeadersVisible = True
           .GridColor = Color.White  'Color de las rejillas
           .ColumnCount = 3
           .Columns.Item(0).Name = "Columna 1"
           .Columns.Item(1).Name = "Columna 2"
           .Columns.Item(2).Name = "Columna 3"
           .RowCount = 10
           .RowHeadersWidth = 80
           For Index As Integer = 0 To 9

               .Rows.Item(Index).HeaderCell.Value = "Fila " & Index + 1
           Next
       End With

        For columna = 0 To 2
           For fila = 0 To 9
               dtgw.Item(columna, fila).Value = "contenido c" & columna & "- f" & fila
           Next fila
       Next columna


   End Sub
End Class


Mírate las propiedades del objeto tiene muchas formas de trabajar con el objeto y propiedades
#294
y los pulsares se pensaba que era una especie de faro para naves alienígenas...  :xD
#295
Código (csharp) [Seleccionar]

using System;
using System.Linq;
...




Citarint[] MiArray = {10,4,9,11,4,7,10,30,11,10};
       
for (int Index = 0; Index <= MiArray.Length - 1; Index++) {
   //Cuenta el número  que se repite un elemento del array
   var CountItems = (from ItemRep in MiArray where (ItemRep == MiArray[Index]) select ItemRep).ToList().Count;
   if (CountItems > 1)
   {
       MiArray[MiArray.ToList().LastIndexOf(MiArray[Index])] = 0;
   }
}

Console.WriteLine(string.Join(", ", MiArray));
Console.ReadLine();



He rectificado el código anterior, ya me pareció extraño que resultara. En el caso de "10, 4, 4, 4, 4, 4, 4, ", no hubiera devuelto "10,4,0,0,0,0,0".

Código (csharp) [Seleccionar]
           int[] MiArray = { 10, 4, 9, 11, 4, 7, 10, 30, 11, 10 };


           foreach (var Item in MiArray)
           {
               for (int Index = MiArray.ToList().IndexOf(Item) + 1; Index <= MiArray.Length - 1; Index++)
               {
                   if (MiArray[Index] == Item) { MiArray[Index] = 0; };
               }
           }
           Console.WriteLine(String.Join(",", MiArray));
           Console.ReadLine();


10, 4, 9, 11, 0, 7, 0, 30, 0, 0


Así también funcionaría:
Código (csharp) [Seleccionar]

 int[] MiArray = { 10, 4, 9, 11, 4, 7, 10, 4, 4, 4 };


           for (int frtIndex = 0; frtIndex <= MiArray.Length - 1; frtIndex++)
           {
               for (int scdIndex = frtIndex + 1; scdIndex <= MiArray.Length - 1; scdIndex++)
               {
                   if (MiArray[scdIndex] == MiArray[frtIndex]) { MiArray[scdIndex] = 0; };
               }
           }
           Console.WriteLine(String.Join(",", MiArray));
           Console.ReadLine();



10, 4, 9, 11, 0, 7, 0, 0, 0, 0
#296
hola


puedes acceder a tu hosting usando la clase WebRequestMethods:
Clase WebRequestMethods.Ftp

WebRequestMethods.Ftp.MakeDirectory   (para crear directorios)


WebRequestMethods.Ftp.DownloadFile    (para descargar)

Cómo: descargar archivos mediante FTP


WebRequestMethods.Ftp.UploadFile    (para subir archivos)

Cómo: cargar archivos con FTP


WebRequestMethods.Ftp.DeleteFile    (para eliminar archivos)




Simplemente descarga el contenido del archivo del hosting, lo modificas en una caja de texto y luego lo vuelves a subir.

En este ejemplo al pulsar Button1 descarga el archivo y lo muestra en un textBox. Al pulsar el Button2 sube el archivo y sobrescribe el original por el contenido del TextBox (si no existe lo crea)

Código (csharp) [Seleccionar]
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;
using System.IO;
using System.Net;
namespace WindowsFormsApplication1
{
   public partial class Form1 : Form
   {
       public Form1()
       {
           InitializeComponent();
       }

       private void Form1_Load(object sender, EventArgs e)
       {

       }


       private void button1_Click(object sender, EventArgs e)
       {
           // Get the object used to communicate with the server.
           FtpWebRequest request = (FtpWebRequest)WebRequest.Create("ftp://www.contoso.com/test.htm");
           request.Method = WebRequestMethods.Ftp.DownloadFile;

           // This example assumes the FTP site uses anonymous logon.
           request.Credentials = new NetworkCredential("anonymous","janeDoe@contoso.com");

           FtpWebResponse response = (FtpWebResponse)request.GetResponse();

           Stream responseStream = response.GetResponseStream();
           StreamReader reader = new StreamReader(responseStream);
          textBox1.Text= (reader.ReadToEnd());

 
           reader.Close();
           response.Close();  

       }

       private void button2_Click(object sender, EventArgs e)
       {
           byte[] Data = System.Text.Encoding.Unicode.GetBytes(textBox1.Text);
           FtpWebRequest request = (FtpWebRequest)WebRequest.Create("ftp://www.contoso.com/test.htm");
           request.Method = WebRequestMethods.Ftp.UploadFile;
           request.ContentLength = Data.Length;
           request.Credentials = new NetworkCredential("anonymous","janeDoe@contoso.com");
           Stream requestStream = request.GetRequestStream();
           requestStream.Write(Data, 0, Data.Length);
           requestStream.Close();
           FtpWebResponse response = (FtpWebResponse)request.GetResponse();
           response.Close();
       }
   }
}




#297
Cita de: Eleкtro en 21 Enero 2017, 21:51 PM
Sería un buen argumento para una película, ya lo estoy viendo: Cifrado Mental -protagonizada por Torrente.  :xD

Saludos!
No creo que a los presos de Guantánamo les hiciera mucha gracia. Creo que este tema es más para el foro libre que otra cosa. Además yo no he hablado de cifrar nada en la cabeza, si lo tienes en la cabeza no necesitas cifrar la información.  He dicho -lo puedes guardar en tu cabeza...- (la información que el usuario @panditdas  de este foro quiere cifrar)

También hay otras formas de sacar información "mental", engaño, hipnosis, presión, guerra psicológica, chantaje, coacción, drogas.




El "cifrado mental" como lo has llamado, tampoco es una cosa tan surrealista, de hecho creo, aunque no estoy seguro,  que se ha usado a lo largo de la historia. Es tan simple que sería extraño nadie lo haya hecho. Se puede dar a un mensajero una información cifrada no escrita físicamente, en su memoria sin que éste sepa su significado, el cual sólo el destinatario sabría descifrar. No es tan imposible, ni difícil de creer. Aunque sería poco práctico pues si el mensajero muere u olvida la información ésta se perdería. Pensándolo bien no es tan malo pues sería mejor a que cayera en manos enemigas.

Historia de la criptografía
#298
voy a tirar de ironía.  ::)

Claro, y si lo escribes en un papel lo metes en una caja fuerte y la escondes, alguien con un mínimo de conocimientos robando cajas fuertes, te la encuentra y te la va a abrir y va a leer el documento. Pero no es lo mismo que tenerlo ahí al al alcance de cualquiera.

La seguridad total no existe. Lo puedes guardar en tu cabeza, ahí nadie te lo va a jaquear (en español) pero también alguien puede secuestrarte y torturarte para sacarte la información, o de cualquier otra forma ....

#299
hola

Esto es de Visual Basic 6 creo que pero es lo que pides, solo tienes que pasarlo a Visual Basic .NET

http://foro.elhacker.net/programacion_visual_basic/abrir_ejecutable_en_un_form_iquestes_posible_abrir_chrome-t429104.0.html

El usuario de este enlace pide como incrustar Chrome dentro del formulario de su aplicación.


Usa código no administrado por Net Framework, es decir se usa API de Windows.

NOTA:
Puede que alguien sepa como hacer lo mismo con código administrado por .Net Framework y esté esperando a que yo responda para decir la otra forma....  :P. Pues estupendo, me gustaría verla porque no la se.  :-*

chau
#300
De risa... pero bueno os cuento una cita mía que me gusta decir:

Citar
La diferencia entre un creyente y un no creyente  es que el no creyente si se equivoca cuando muera sabrá que se equivoca, mientras que el creyente no lo sabrá nunca
(cualquier coincidencia con otra cita es casualidad)