Mensajes

No tiene por que ser un programa/bot, hoy en día existen una infinidad de servicios online donde puedes intercambiar y/o comprar la cantidad que quieras de visualizaciones, likes, comentarios, suscriptores y etc., de personas reales como tú (aun así, a Google/Youtube no le gusta que compres 'falsa audiencia', en teoría ellos pueden detectar ese tipo de movimiento en tu canal... no son tontos, y en teoría también te podrían sancionar por ello). Un ejemplo para Youtube:

• https://www.ytmonster.net/

marca error en la linea de agregar a la bd.

Código (vbnet) [Seleccionar] Expandir

Me.DATOSTableAdapter.Insert(Label7.Text, Label1.Text, Label3.Text, Label4.Text, Label5.Text) 'INSERTAR NUEVO DATOS

No somos adivinos, ¿cual es el tipo de la excepción, y el mensaje exacto del error?.

Saludos.

no se por que tiene que decirle nada y molestar a una persona por hacer la gracia o un video, y soltarle a la cara lo que ha hecho, el ya lo sabe...

Pues yo lo entiendo y me parece lo más normal del mundo, es lo que a toda España le gustaría hacer, recordarle lo hijo de p**a y mal nacido que es ese señor, bueno, el tio este se ha quedao muy corto ya que solo le ha bacilado un poquito y se ha ido... mientras que el resto de España probablemente no se habría quedado satisfecho hasta haberle soltao dos hostias al Puigdemont, y con razón.

Saludos.

Buenas, primero de todo gracias de antemano por leer mi post, os comento, me gustaría hacer un sencillo script que al ejecutarlo busque los archivos con extensión .PDF dentro de un pendrive y que esos archivos los envie a un correo electrónico o los copie a otra unidad, ya sea USB o local.

Sería en .bat o .ps1 en su defecto

¿Quieres un masaje en los pies tambien?, en el foro no se piden tareas... es muy descarado esto. Muestra tu progreso y formula una duda específica...

De todas formas, puedes mirar esto:

• [BATCH] [APORTE] USB MON (Roba USB)

Batch no soporta (de forma natural) la asignación de strings multilinea en variables, ni tampoco tiene soporte para el uso de Arrays.

Solución: usa cualquier otro lenguaje... un lenguaje de verdad.

Saludos.

[ElektroKit]

Deberías comprobar la disponibilidad de tu adaptador, no la disponibilidad de un host (ya sea Google o cual sea)...

Esto lo he sacado de mi framework comercial ElektroKit:

Código (vbnet) [Seleccionar] Expandir

Imports System.Net.NetworkInformation

Namespace ElektroKit.Core.NET.Tools

   ''' ----------------------------------------------------------------------------------------------------
   ''' <summary>
   ''' Contains networking related utilities.
   ''' </summary>
   ''' ----------------------------------------------------------------------------------------------------
   Public NotInheritable Class NetworkUtil

       ''' ----------------------------------------------------------------------------------------------------
       ''' <summary>
       ''' Prevents a default instance of the <see cref="NetworkUtil"/> class from being created.
       ''' </summary>
       ''' ----------------------------------------------------------------------------------------------------
       <DebuggerNonUserCode>
       Private Sub New()
       End Sub

       ''' ----------------------------------------------------------------------------------------------------
       ''' <summary>
       ''' Gets a value indicating whether at least one of the current network adapters is capable of connecting to Internet.
       ''' </summary>
       ''' ----------------------------------------------------------------------------------------------------
       ''' <value>
       ''' <see langword="True"/> if at least one of the current network adapters is capable of connecting to Internet;
       ''' otherwise, <see langword="False"/>.
       ''' </value>
       ''' ----------------------------------------------------------------------------------------------------
       Public Shared ReadOnly Property IsNetworkAvailable As Boolean
           <DebuggerStepThrough>
           Get
               Return NetworkUtil.GetNetworkAvailable()
           End Get
       End Property

       ''' ----------------------------------------------------------------------------------------------------
       ''' <summary>
       ''' Evaluate the online network adapters to determine if at least one of them is capable of connecting to Internet.
       ''' </summary>
       ''' ----------------------------------------------------------------------------------------------------
       ''' <returns>
       ''' <see langword="True"/> if at least one of the current network adapters is capable of connecting to Internet;
       ''' otherwise, <see langword="False"/>.
       ''' </returns>
       ''' ----------------------------------------------------------------------------------------------------
       <DebuggerStepThrough>
       Private Shared Function GetNetworkAvailable() As Boolean

           ' Only recognizes changes related to Internet adapters.
           If NetworkInterface.GetIsNetworkAvailable() Then

               ' However, this will include all adapters.
               Dim interfaces As NetworkInterface() = NetworkInterface.GetAllNetworkInterfaces()

               For Each ni As NetworkInterface In interfaces

                   ' Filter so we see only Internet adapters.
                   If ni.OperationalStatus = OperationalStatus.Up Then

                       If (ni.NetworkInterfaceType <> NetworkInterfaceType.Tunnel) AndAlso
                          (ni.NetworkInterfaceType <> NetworkInterfaceType.Loopback) Then

                           Dim statistics As IPv4InterfaceStatistics = ni.GetIPv4Statistics()

                           ' All testing seems to prove that once an interface comes online
                           ' it has already accrued statistics for both received and sent...
                           If (statistics.BytesReceived > 0) AndAlso (statistics.BytesSent > 0) Then
                               Return True
                           End If

                       End If

                   End If

               Next ni

           End If

           Return False

       End Function

   End Class

End Namespace

Saludos.

Ese video es de mediados del año pasado o incluso más antiguo, yo ya lo había visto en muchos sitios, y evidentemente o es el viento o es un FAKE... facil tirando con un hilo para dar golpes, ¿o que se supone que va a ser sino, el espíritú-demonio de un niño muy travieso al que le gusta molestar a los seguratas?.

Saludos.

Y es fiable?

Al menos podrías haber analizado un mínimo la página principal de bit2me.com, si bajas verás los premios de visa, caixa bank, european comission, y las menciones en la prensa como El Pais, El Mundo, NBC, Cuatro, etcétera, todo eso lo tienes bien visible en la página principal de bit2me....

O también podrías haber buscado opiniones de estafa en Google para salir de dudas, y probablemente habrías sido capaz de encontrar una interesante entrevista como esta al CEO de bit2me:

• Entrevista a Leif Ferreira (Bit2Me) - Bitcoin en Español - elBitcoin.org

De lo que no te deberías fiar ni un pelo es donde no te pidan ningún tipo de identificación legal...

Saludos.

[Notepad++]

ó en el peor de los casos soy yo que no los escribo bien

Sin duda es eso.

Lo único que necesitas es construir correctamente los grupos de captura en una expresión regular. Como software te sirve cualquier editor de texto o pseudo-IDE que soporte RegEx... como el Notepad++.



En el editor Sublime Text, tomando el ejemplo que has dado al principio, podrías hacerlo por ejemplo así:

Código [Seleccionar] Expandir

(Un barco)\n(Un mono)\n(Tecnología)

Y la cadena de reemplazamiento sería esta:

Código [Seleccionar] Expandir

Navegación\n$2\nComputadoras



saludos

[escribir.Close()]

El problema es que cuando llamas al método 'escribir.Close()', el stream subyacente también se cierra, es decir, internamente 'escribir.Close()' llama a 'condiciones.Close()', y por eso al intentar acceder al stream 'condiciones' por segunda vez no puedes hacer nada ya que el stream lo cerraste.

En general la forma en la que estás haciendo las cosas es poco o nada conveniente, declarar una variable e inicializarla en la misma sentencia creando una instancia, en este caso de la clase FileSream, hacer eso a nivel de clase es un mal hábito de programación, es algo que puede pasar factura en general. Al constructor le estás pasando el argumento FileMode.Open, así que la primera vez que se inicie tu aplicación dará un error al intentar inicializar el Form... a menos que exista el archivo.

Por si no queda claro lo que estoy intentando explicar, a esto le sobra todo lo que está a la derecha del símbolo "=":

Código (csharp) [Seleccionar] Expandir

FileStream condiciones = new FileStream("C:\\Users\\Constructora\\Desktop\\ANOTACIONES.txt", FileMode.Open, FileAccess.Write);

Entonces, quedaría así:

Código (csharp) [Seleccionar] Expandir

FileStream condiciones;
...y la inicializarías más tarde con una instancia de la clase FileStream.

De todas formas no necesitas declarar ninguna variable/objeto, basta con que hagas esto en el controlador de evento de tu botón:

Código (csharp) [Seleccionar] Expandir

using (FileStream fs = new FileStream(@".\ANOTACIONES.txt", FileMode.Append, FileAccess.Write, FileShare.Read)) {
   using (StreamWriter sw = new StreamWriter(fs)) {
       sw.WriteLine(label1.Text);
   }
}

...pero tampoco necesitas en absoluto hacerlo así, para lo poco que quieres hacer te basta y te sobra con realizar una simple llamada al método System.IO.File.AppendAllText()

Código (csharp) [Seleccionar] Expandir

File.AppendAllText(@".\ANOTACIONES.txt", label1.Text, Encoding.Default);

Saludos.