Mensajes

[Bueno me retiro del post]

HaxFox, pero no has dicho nada con respecto a las cosas que vienes comentando hace rato

Saludos

Bueno me retiro del post, ya puse lo que tenía que poner e hice lo que debía hacer.

Saludos Nov.

Lo único sensato que has dicho...

DoEvents!

http://freemegavideo.net/

DoEvents!

A mi esto al menos me va bien... 

DoEvents!

Y luego les darán forraje de comer

JAJAJJAJAJAJAJAJJAJAA

DoEvents!

JAJAJAJAJAJAJAJA
Como a los caballos:


DoEvents!

[youtube=425,350]http://www.youtube.com/watch?v=MsnAKr5RqBU[/youtube]
[youtube=425,350]http://www.youtube.com/watch?v=62Ku_UTBkPY[/youtube]
[youtube=425,350]http://www.youtube.com/watch?v=mU6UkIa8MM0&feature=related[/youtube]
Jajajajajaja
Lo malo es que es veridico...

DoEvents!

...
Joder tio otra vez tu, siempre tú.
...
Y respecto al "ranas" este...no cumples tu palabra, ya dejabas de desear..ahora además no eres "hombre" de palabra. 

No se quien eres ni de que estas hablando... Me parece que eso esta fuera de lugar, pero bueno...

yo queria python... creo q lo queria por linux... pero no me gustan los corchetes XD

Alguien me podria decir donde son necesarios los corchetes en  python?

DoEvents!

.
Me llevo 30 seg encontrar algo...
http://www.vb6.us/tutorials/visual-basic-tutorial-pdf

DoEvents!

Si te fijas, el code de mi anterior post funciona no?
Pues ahora te queda la intrincada y temible tarea de adaptarlo a tus necesidades!
WooooW
Seras capaz?
Yo ya no te digo más...

DoEvents!

[RegExp]

A ver, de entrada, no has puesto la RegExp que te puse antes...

Prueba a ponerlo en minusculas, si funciona pon el IgnoreCase en true(para ignorar mayusculas)
Seria asi:

Código (vb) [Seleccionar] Expandir

sPatern = "\<div align\=""justify""\>(.+)\<\/div\>"
Es sentido comun, tampoco creo que te costara mucho cuando se te dio un ejemplo casi igual post atras...

DoEvents!

Ademas, tienes un ejemplo practicamente igual post atras...
No me gusta tu forma de hacerlo, prefiero una funcion y saltarme tener que añadir las referencias...
Algo asi: (Solo he cambiado un par de cosas)

Código (vb) [Seleccionar] Expandir

Option Explicit

Public Function Get_Text(ByVal sText As String, ByVal sPatern As String) As Collection
Dim cTemp                       As New Collection
Dim oRegExp                     As Object
Dim oMatch                      As Object
Dim oMatches                    As Object
Dim Q                           As Long

    Set oRegExp = CreateObject("VBScript.RegExp") 'Evitamos la referencia

    With oRegExp
        .Pattern = sPatern
        .Global = True
        .IgnoreCase = True
    End With

    Set oMatches = oRegExp.Execute(sText)

    For Q = 0 To oMatches.Count - 1
        Set oMatch = oMatches(Q)
        cTemp.Add oMatch.SubMatches(0)
    Next Q

    Set Get_Text = cTemp
End Function

Private Sub Form_Load()
Dim vItem                   As Variant
Dim S                       As String
    S = "<div align=""justify"">¡¡Que vivan</div>" & vbNewLine & _
        "<div align=""justify"">las</div>" & vbNewLine & _
        "<div align=""justify"">Ranas! :D</div>"

    'La RegExp bien hecha
    For Each vItem In Get_Text(S, "\<div align\=""justify""\>(.+)\<\/div\>")
        MsgBox vItem
    Next vItem
End Sub
Te lo repito de nuevo, lee manuales, ya no te digo tanto de RegExp sino de vB.

DoEvents!