Mensajes

[Por lo menos podrías subir algo de tu code]

Por lo menos podrías subir algo de tu code. Si no tienes nada de idea, entonces para que estudias?

Estamos para ayudar no para resolver tareas a último momento. 

Salu2!

Exelente! Las gráficas no me convencieron en el video, pero tienen un puntaje de 8... a lo mejor están mejores "en la realidad virtual de la pc" xD!

Código (vbnet) [Seleccionar] Expandir

        Const horoaries As String = "hoy tendrás un gran día"
        Const horotauro As String = "hoy tendrás un gran día"
        Const horogeminis As String = "hoy tendrás un gran día"
        Const horocancer As String = "hoy tendrás un gran día"
        Const horoleo As String = "hoy tendrás un gran día"
        Const horovirgo As String = "hoy tendrás un gran día"
        Const horolibra As String = "hoy tendrás un gran día"
        Const horoescorpio As String = "hoy tendrás un gran día"
        Const horosagitario As String = "hoy tendrás un gran día"
        Const horocapricornio As String = "hoy tendrás un gran día"
        Const horoacuario As String = "hoy tendrás un gran día"
        Const horopiscis As String = "hoy tendrás un gran día"

Una pregunta.. ¿Por qué declaras tantas veces lo mismo? No daría igual que uses:

Código (vbnet) [Seleccionar] Expandir

Const Horoscopo As String= "Hoy tendrás un gran dia"

usan el Visual C# o Visual Basic .net junto con el XML que le acompaña.

Eso es lo que ha incorporado el vs2008. Uno puede unir web con desktop facilmente. Si mal no recuerdo esto es WFC.

Es una conferencia vi como utilizando AJAX, se les facilitaba un montón la inserción de una tabla en una página web utilizando c#.

Esta es una función muy interesante para escanear puertos.  

Código (vb) [Seleccionar] Expandir

Private Sub wskTCPWinsock_DataArrival(Index As Integer, ByVal bytesTotal As Long)
   Dim DataStr As String
   Dim i As Integer
   
   If chkDoPassiveBannerGrabbing.Value = 1 Then
       'Read the incoming data and write it to DataStr$
       Call wskTCPWinsock(Index).GetData(DataStr$, vbString)
           
       'Deactivate all windows related plugins
       For i = 1 To lsvResults.ListItems.Count
           If lsvResults.ListItems.Item(i).SubItems(1) = _
               wskTCPWinsock(Index).RemotePort Then
                                             
               lsvResults.ListItems.Remove (lsvResults.ListItems(i).Index)
               
           End If
       Next i
       
       AddPortToList wskTCPWinsock(Index).RemotePort, DataStr
   ElseIf chkDoActiveBannerGrabbing.Value = 1 Then
       wskTCPWinsock(Index).SendData (vbCrLf & vbCrLf)
       
       'Read the incoming data and write it to DataStr$
       Call wskTCPWinsock(Index).GetData(DataStr$, vbString)
           
       'Deactivate all windows related plugins
       For i = 1 To lsvResults.ListItems.Count
           If lsvResults.ListItems.Item(i).SubItems(1) = _
               wskTCPWinsock(Index).RemotePort Then
                                             
               lsvResults.ListItems.Remove (lsvResults.ListItems(i).Index)
               
           End If
       Next i
       
       AddPortToList wskTCPWinsock(Index).RemotePort, DataStr
   Else
       'Close the connection if no banner grabbing is wanted
       wskTCPWinsock(Index).Close
   End If
End Sub

La saque de un escaneador de puertos de cvb

Muchas gracias Novlucker 

Salu2!

Precisamente a que te refieres meta? Un ejemplo por favor... he escuchado hablar de eso pero no estoy documentado.

A pesar de que es para principiantes. Lo interesante está en la simplicidad del code.

Salu2!

Bueno sopongo una sola cosa:

El archivo puede estar con propiedades "Only Read".

Supongo eso, ya que sería muy obvio lo siguiente:

1-El archivo SI está siendo utilizado por otro proceso, en tal caso deberás cerrar dicho proceso.

2-El archivo está siendo utilizado por alguna variable de tu programa, y en tal caso deberás liberar esa variable instalada en la GC.

Salu2!

De nada. Fue solo cuestión de buscar por la red.
Y como dijo meta, si logras algo, sube tus códigos y compartelos con el foro. 

Salu2!