No vas del todo mal encaminado, aunque también podrías hacerlo con una pila de caracteres.

Te muestro una posible solución siguiendo el enfoque que le has dado, puedes trasladarlo a tu aplicación de consola.

VB.Net:

Imports System.IO
Imports System.Text
Imports System.Threading.Interlocked
Imports System.Threading.Thread
 
Public Class Form1
 
    Private Sub Test() Handles MyBase.Shown
 
        Writer(sourceFilepath:="C:\Source.txt",
               targetFilepath:="C:\Target.txt",
               maxChars:=15,
               sleepCount:=3,
               sleepInterval:=5 * 1000)
 
    End Sub
 
    Public Sub Writer(ByVal sourceFilepath As String,
                      ByVal targetFilepath As String,
                      ByVal maxChars As Integer,
                      ByVal sleepCount As Integer,
                      ByVal sleepInterval As Integer)
 
        Dim cloneSleepCount As Integer = sleepCount
 
        Dim charCount As Integer = -1
        Dim sr As StringReader = New StringReader(File.ReadAllText(sourceFilepath, Encoding.Default))
        Dim sw As New StringWriter
 
        Do Until (sr.Peek = -1)
 
            sw.Write(Convert.ToChar(sr.Read))
 
            If (Increment(charCount) = maxChars) OrElse (sr.Peek = -1) Then
 
                If Decrement(cloneSleepCount) = 0 Then
                    Debug.WriteLine(String.Format("Deteniendo por {0} ms...", sleepInterval))
                    Sleep(sleepInterval)
                    cloneSleepCount = sleepCount - 1
                End If
 
                Debug.WriteLine(String.Format("Copiando {0} caracteres: '{1}'", charCount, sw.ToString))
                File.AppendAllText(targetFilepath, sw.ToString, Encoding.Default)
 
                charCount = -1
                sw.GetStringBuilder.Clear()
 
            End If
 
        Loop
 
        sr.Close()
        sw.Close()
        Debug.WriteLine("Copia terminada.")
 
    End Sub
 
End Class

Traducción online a C#:

using System;
using System.Diagnostics;
using System.IO;
using System.Text;
using System.Threading.Interlocked;
using System.Threading.Thread;
 
public class Form1
{
 
	private void Test()
	{
		Writer(sourceFilepath: "C:\\Source.txt", targetFilepath: "C:\\Target.txt", maxChars: 15, sleepCount: 3, sleepInterval: 5 * 1000);
	}
 
	public void Writer(string sourceFilepath, string targetFilepath, int maxChars, int sleepCount, int sleepInterval)
	{
		int cloneSleepCount = sleepCount;
 
		int charCount = -1;
		StringReader sr = new StringReader(File.ReadAllText(sourceFilepath, Encoding.Default));
		StringWriter sw = new StringWriter();
 
		while (!((sr.Peek == -1))) {
 
			sw.Write(Convert.ToChar(sr.Read));
 
			if ((Increment(charCount) == maxChars) || (sr.Peek == -1)) {
 
				if (Decrement(cloneSleepCount) == 0) {
					Debug.WriteLine(string.Format("Deteniendo por {0} ms...", sleepInterval));
					Sleep(sleepInterval);
					cloneSleepCount = sleepCount - 1;
				}
 
				Debug.WriteLine(string.Format("Copiando {0} caracteres: '{1}'", charCount, sw.ToString));
				File.AppendAllText(targetFilepath, sw.ToString, Encoding.Default);
 
				charCount = -1;
				sw.GetStringBuilder.Clear();
			}
		}
 
		sr.Close();
		sw.Close();
		Debug.WriteLine("Copia terminada.");
	}
}
 
//=======================================================
//Service provided by Telerik (www.telerik.com)
//=======================================================

Saludos

Tampoco es que esto se rija por unas reglas super estrictas, simplemente si la pregunta no está relacionada con el tema principal entonces deberías crear un nuevo post.


Desde la CMD, con el comando Copy/XCopy puedes transferir archivos por la red local.

También puedes utilizar alguna implementación commandline del protocolo Telnet o SSH, cómo por ejemplo PSCP (Putty Secure Copy Client):
http://www.openssh.com/windows.html

Yo no he utilizado mucho este tipo de aplicaiones por no tener la necesidad, así que no se recomendarte "el mejor".

Saludos

Bienvenido al foro.

Hay una sección de Scripting que es donde deberías formular preguntas de este tipo.

Se puede hacer, solo tienes que agregar el valor de registro correspondiente para iniciar el "intérprete" de VBS, pasándole cómo argumento la ubicación del script, tal que así:


o también:

(dependiendo de tus necesidades)

Saludos

Bueno, Karen Hudes dice más que eso, ella afirma que los "magnates" del banco mundial son reptilianos xD, algo que no resulta nada sensato de creer, pero por otro lado tambien es sentato dudar y hacerse la siguiente pregunta...
¿Qué necesidad tiene de mentir una persona a la que no le flata nada economicamente? (recordemos que trabajaba en ese banco, y según parece perdió su trabajo por afirmar eso).

Solo quería aclarar el dato, no pretendo desvirtuar el tema principal.

Saludos!

¿A que diferencia te refieres exactamente?.

En ambos códigos el tuyo y el de aquella url se llama al mismo método 'Windows.Forms.Control.InvokeRequired' y 'Windows.Forms.Control.Invoke', le pasas el delegado y al compilar se generan las mismas instrucciones IL que internamente determinan lo mismo, hallar el handle del control/form para descubrir a que thread pertenece.

No hay diferencia alguna en lo que se refiere a eficiencia, tampoco por que le pases un delegado con la referencia del método o una expresión lambda.

Ahora, deberías seguir los ejemplos de buenos hábitos, es decir, invocar el control y no el form (aunque eso no afecta para nada al rendimiento pero puede resultar en confusión), y ademas añadir una verificación antes de invocarlo:

Ejemplo en VB.Net

Dim msg As String = "" & ComboBox1.SelectedItem() ' No es necesario invocar para leer.
 
Select Case Me.TextBox1.InvokeRequired
 
  Case True ' Invoco para modificar la propiedad.
      Me.TextBox1.Invoke(Sub() Me.TextBox1.Text = msg)
 
  Case Else
      Me.TextBox1.Text = msg
 
End Select

Traducción online a C#:

string msg = "" + ComboBox1.SelectedItem(); // No es necesario invocar para leer.
 
switch (this.TextBox1.InvokeRequired) {
 
	case true: // Invoco para modificar la propiedad.
		this.TextBox1.Invoke(() => this.TextBox1.Text == msg);
		break;
 
	default:
		this.TextBox1.Text = msg;
		break;
}

Si quieres reducir el código para no tener que estar escribiendo siempre lo mismo, puedes desarrollar un método genérico cómo este:

    ''' <remarks>
    ''' *****************************************************************
    ''' Snippet Title: Control Invoker
    ''' Code's Author: Elektro
    ''' Date Modified: 03-April-2015
    ''' Usage Example: 
    ''' ControlInvoker(TextBox1, Sub(tb) tb.Text = "Hello World!")
    ''' 
    ''' ControlInvoker(TextBox1, Sub(tb As TextBox)
    '''                              For x As Integer = 0 To 5
    '''                                  tb.AppendText(CStr(x))
    '''                              Next x
    '''                          End Sub)
    ''' *****************************************************************
    ''' </remarks>
    ''' <summary>
    ''' Executes an encapsulated method on the thread that owns the specified control.
    ''' </summary>
    ''' <typeparam name="T"></typeparam>
    ''' <param name="ctrl">The control to invoke.</param>
    ''' <param name="method">The encapsulated method to be called.</param>
    Public Sub ControlInvoker(Of T As Control)(ByVal ctrl As T, ByVal method As Action(Of T))
 
        If ctrl.InvokeRequired Then
            ctrl.Invoke(New Action(Of T, Action(Of T))(AddressOf ControlInvoker), ctrl, method)
 
        Else
            method(ctrl)
 
        End If
 
    End Sub

Traducción online a C#:

/// <remarks>
/// *****************************************************************
/// Snippet Title: Control Invoker
/// Code's Author: Elektro
/// Date Modified: 03-April-2015
/// Usage Example: 
/// ControlInvoker(TextBox1, Sub(tb) tb.Text = "Hello World!")
/// 
/// ControlInvoker(TextBox1, Sub(tb As TextBox)
///                              For x As Integer = 0 To 5
///                                  tb.AppendText(CStr(x))
///                              Next x
///                          End Sub)
/// *****************************************************************
/// </remarks>
/// <summary>
/// Executes an encapsulated method on the thread that owns the specified control.
/// </summary>
/// <typeparam name="T"></typeparam>
/// <param name="ctrl">The control to invoke.</param>
/// <param name="method">The encapsulated method to be called.</param>
 
public void ControlInvoker<T>(T ctrl, Action<T> method) where T : Control
{
	if (ctrl.InvokeRequired) {
		ctrl.Invoke(new Action<T, Action<T>>(ControlInvoker), ctrl, method);
 
	} else {
		method(ctrl);
 
	}
 
}

Ejemplos de uso en VB.Net

ControlInvoker(TextBox1, Sub(tb) tb.Text = "Hello World!")

ControlInvoker(TextBox1, Sub(tb As TextBox)
                          For x As Integer = 0 To 5
                              tb.AppendText(CStr(x))
                          Next x
                      End Sub)

Traducción online a C#:

ControlInvoker(TextBox1, tb => tb.Text == "Hello World!");

ControlInvoker(TextBox1, (TextBox tb) =>
{
	for (int x = 0; x <= 5; x++) {
		tb.AppendText(Convert.ToString(x));
	}
})

Saludos.

Lo más curioso es lo de que algunos lo llaman "Zion", ¿así es cómo se llamaba la ciudad de Matrix, no?, imagino que va por ahí el tema,
es decir, que si entras al nivel "Zion" sales con revelaciones abrumadoras del gobierno y la humanidad, cómo las ""revelaciones"" de Karen Hudes,
mujer que se adentró en las profundidades de la economía a trabajar en uno de los bancos más grandes e importantes del mundo y descubrió un secreto que cambió su vida... si quieren conocer el resto, busquen sobre ella.

Ahí lo dejo.

Un CD de música cómo tal no lo vas a encontrar gratis, por que un CD de música es un producto comercial (no hablo de los artistas que se graban sus maquetas en un CD y si eres amigo ya tienes tú CD gratis, ni tonterías que no vengan al caso).

Si solo quieres escuchar (que no adquirir) de forma gratuita un CD comercial, entonces puedes acudir a cualquier servicio de venta online (ej: BeatPort), siempre hay muestras de todas las canciones de los CD's, aunque obviamente eso no es lo que entendemos por GRATIS, eso no existe.

Juegos gratuitos hay muchísimos, la tendencia es desarrollar mini-juegos en Flash y publicarlos gratuitamente, no cuesta nada encontrarlos con una simple búsqueda en Google, ¿cual es el problema?.

Saludos!

¿películas, juegos, y álbumes de música sin derechos de autor y gratuitos?, no le encuentro sentido a la pregunta, precisamente un producto comercial implica imponer un precio por beneficios y por gastos de fabricación, así cómo unos derechos de autor, entre otras cosas.

Ahora, que la compañia quiebre y se pierdan o ignore su copyright es algo muy distinto, en lo referente a juegos (y software en general), a este tipo de productos se les denomina "AbandonWare", puedes encontrar infinidad de páginas con juegos abandonware en Google.

No se si te estás refiriendo eso, o simplemente a software de tipo FreeWare.

Saludos!

¿Te refieres a intentar hallar una cura para que no nazcan más personas con defectos mentales, o me estás llamando retrasado xD?, cómo creo conocerte un poquito pensaré que te refieres a lo primero, y claro que sí, yo opino que se debería intentar hacer lo mismo con todo tipo de enfermedades "extrañas" que parecen no tener solución, pero lo que se hace es achacar que "debe ser cosa de la naturaleza, hay que respetarla y no podemos hacer nada", a mi no me parece cosa de la naturaleza que para empezar no sabemos ni que es la naturaleza, lo que si sabemos o deberiamos saber es que por ejemplo si una mujer fuma y bebe mucho alcohol durante el embarazo, el feto puede nacer con defectos físicos, ¿quien dice que con la homosexualidad o los defectos mental no sucede algo parecido?.


¿En serio crees que simplemente por que podemos ver la misma enfermedad afectando a otros animales y de forma muuuucho menos espandida, eso debe justificar la existencia de dicha enfermedad y nuestra situación?, pues vaya.

Si las personas homosexuales naciesen con organos con capacidad de reproducción propia pues me daría igual y asumiría que forma parte de la evolución y, es más, asumiría que es una evolución superior a nosotros puesto que nosotros necesitamos a una mujer para reproducirnos, cómo en muchos otros casos hay especies "auto-suficientes" que se aparean/incuban sin necesidad de una hembra (no recuerdo el nombre científico de esto),

pero el caso es que no es así, la Homosexualidad es una alteración que no lleva a ningún lugar, A NINGUNO, se basa en una necesidad subjetiva, la necesidad y el placer de estar con un hombre, dime tú, ¿cual es el supuesto objetivo de eso?, ¿en que beneficia esto a la evolución de la especie?, EN NADA, se pueden ver los mismos síntomas y consecuencias que provocan los virus, que hacen lo posible por llevar al huespeed/víctima a su perdición y su eliminación/extinción, LO MISMITO se puede ver solo que a una escala menos comprensible, por que a dia de hoy no comprendemos nada acerca de donde está el causante de generar la Homosexualidad ni mucho menos cómo intentar evitar que se genere.


¿Ves?, a esto me referio precisamente, si una persona manifiesta su opinión en contra de algo perjudicial para la humanidad ya te ponen una etiqueta absurda que la mayoría de hetero y homosexuales utilizan cómo insulto y/o cómo escudo protector:

Homofobia: Rechazo obsesivo hacia las personas homosexuales.

¿Que hay de malo en eso?, yo solamente especulo sobre el posible y nefasto futuro de la humanidad, con una buena base evolutiva y una prueba de ello (la Homosexualidad).

Que raro que no exista (no oficialmente) el término "Heterofobia", ¿verdad?, podría ser debido a que la Heterosexualidad no necesita intentar justificar y escudar dicha orientación sexual al ser la correcta, la única que nos permite reproducirnos.

No tengo más que hablar...

Saludos

Buenas

El codigo funciona bien, lo que ocurre es que al asignar el DataSource se dispara el evento SelectedIndexChanged, y fíjate que tú estás asignando el DataSource antes que las propiedades DisplayMember y ValueMember, por ende el evento SelectedIndexChanged se dispara por primera vez sin tener en cuenta los valores que asignas a dichas propiedades y por ese motivo no te devuelve el valor esperado (TimeZoneInfo.Id).

Lo que debes hacer es muy simple, asignar el DataSource lo último, modifica el orden de los factores de la siguiente manera:

cmbZonaHoraria.ValueMember = "Id";
cmbZonaHoraria.DisplayMember = "DisplayName";
cmbZonaHoraria.DataSource = TimeZoneInfo.GetSystemTimeZones();

Saludos