Mensajes

primero que nada, tu maquina tiene la ip privada fija en 192.168.1.1 ?

segundo fijate en el firewall de ponerlo como excepción a ese puerto.
tercero fijate si el router no tiene activado un firewall algunos lo tienen activado por defecto.
cuarto reiniciaste el router ? ya que algunos necesitan guardar los cambios y reiniciarlos para que lo tome.

pone el modelo del router TP-Link, y en interent buscas te sale seguro como abrir el puerto.

saludos.

aca lo tenes:

[SOURCE] Aplicación para ver los usuarios Online en el foro

fijate en la clase donde se conecta a la web ahi esta el cdoigo para obtener el texto de la web.

saludos.

en este post ya se hablo del tema:

coo saber si existe una variante?

  me gustaria ver la calculadora, me imagino no seran las que tienen 4 botones de las operaciones basicas, hay algunos que hacen eso y se piensan que pueden programar, lo demas que citaste para mi no es util y son lammereadas, salvo el server-client que puede ser util segun lo que se haga.

saludos.

[System.Net.WebClient]

si es posible, simplemente podes usar la clase System.Net.WebClient, mira mi post sobre como obtener los usuarios conectados del foro, ahi leo un archivo plano txt de la web en pocas lineas de codigo.

saludos.

aca tenes un ejemplo que es facil adaptarlo.

aclaro que si vos queres permutaciones de 6 y realizados con 10 numeros (del 0 al 9), eso daria un total de 10 mil millones de valores (10 elevado a la 10) si lo haces con valores que pueden repetirse.

pero si los haces con valores sin repeticion la cifra seria factorial de 10! o sea 3628800 de valores.

este ejemplo lo hace de la longitud que quieras pero sin repeticion.

Código (vb) [Seleccionar] Expandir

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Dim inputLine As String = "123"

        Dim rec As New Recursion()
        rec.InputSet = rec.MakeCharArray(inputLine)
        rec.CalcPermutation(0)

        Debug.WriteLine("# of Permutations: " + rec.PermutationCount.ToString)
    End Sub

    Class Recursion
        Private elementLevel As Integer = -1
        Private numberOfElements As Integer
        Private permutationValue As Integer() = New Integer(-1) {}

        Private m_inputSet As Char()
        Public Property InputSet() As Char()
            Get
                Return m_inputSet
            End Get
            Set(ByVal value As Char())
                m_inputSet = value
            End Set
        End Property

        Private m_permutationCount As Integer = 0
        Public Property PermutationCount() As Integer
            Get
                Return m_permutationCount
            End Get
            Set(ByVal value As Integer)
                m_permutationCount = value
            End Set
        End Property

        Public Function MakeCharArray(ByVal InputString As String) As Char()
            Dim charString As Char() = InputString.ToCharArray()
            Array.Resize(permutationValue, charString.Length)
            numberOfElements = charString.Length
            Return charString
        End Function

        Public Sub CalcPermutation(ByVal k As Integer)
            elementLevel += 1
            permutationValue.SetValue(elementLevel, k)

            If elementLevel = numberOfElements Then
                OutputPermutation(permutationValue)
            Else
                For i As Integer = 0 To numberOfElements - 1
                    If permutationValue(i) = 0 Then
                        CalcPermutation(i)
                    End If
                Next
            End If
            elementLevel -= 1
            permutationValue.SetValue(0, k)
        End Sub

        Private Sub OutputPermutation(ByVal value As Integer())
            For Each i As Integer In value
                Debug.Write(m_inputSet.GetValue(i - 1))
            Next
            Debug.WriteLine("")
            PermutationCount += 1
        End Sub
    End Class
End Class


saludos.

HOLA!!!
Podes usr DAO desde codigo tambien xD

si, tambien se puede usar, el tema es que DAO, ya sea por codigo o con el control DATA (que usa DAO), esta totalmente obsoleto, microsoft dijo que ya no se debe usar, por eso se reemplazo todo por ADO.

Cual es la diferencia?

muchas, dejar de depender de un control ocx es una importante y la otra es la manera de manejar los recordset etc..imaginate si tengo 10 formularios, en cada uno queiro usar 10 recodset para cada recordset tengo que meter un objeto de estos adodc y en total tengo 100 controls, se hace pesadisimo y si el proyecto es muy grande olvidate de mantenerlo si tenes que cambiar algo, aparte en performance es mejor.

en cambio con ADO desde codigo, declaras un objeto publico de tipo recordset (que seria lo mismo que poner un control adodc) y lo usas en toda la aplicacion cuando tengas ganas, lo abris y lo cerras y ya queda disponible para usar, por ahi cuando tengas que usar otro recordset lo declaras local en el formulario y lo usas y destruis ahi mismo, pero te olvidas de poner controles, asignarle la cadena de conexion etc.asi estan hechos los sistemas grandes, es lo mejor que te ofrece vb 6. y para los comandos de insert, delete  o update, declaras un objeto publico de tipo command y lo usas cuando tengas ganas, o sea que con pocas variables haces lo que quieras, no usar los metodos .Addnew o Delete..etc..mejor ejecutar la instruccion SQL "INSERT INTO.." o "DELETE FROM..."

saludos.

Serias tan amable de publicar aquí la url a la MSDN no encuentro nada al respecto sobre los símbolos, aun que la información actual de la MSDN ya es mas que nada para .NET y cosas actuales... vb6 ya esta entre la espada y la pared.

convenciones de nomenclatura para Visual Basic

existir existe y lo podes usar, pero es totalmente desaconsejado porque se trata de un control viejo COM y en .NET se deben usar las clases que ya trae el framework.

Código (vbnet) [Seleccionar] Expandir

System.Net.Sockets

Utilizando Sockets en VB .NET

saludos.