Mensajes

Flaming 

Pues un sistema "chapucero" seria reproducir el video a pantalla completa y hacerle un screen. Si no busca un convertor a avi, que suele haber mas programas de ese estilo para el formato .avi.
Suerte! 

Gracias, me encanta este juego! 

Ya esta solucionado usando if. Muchas gracias por la ayuda! 

Código (vbnet) [Seleccionar] Expandir

        Text1.Select(ze, 1)
        ze = ze + 1
        cont = (Text1.SelectedText)
        If cont = "h" Then
            Text1.Select(ze, 1)
            ze = ze + 1
            cont = (Text1.SelectedText)
            If cont = "t" Then
                Text1.Select(ze, 1)
                ze = ze + 1
                cont = (Text1.SelectedText)
                If cont = "t" Then
                    Text1.Select(ze, 1)
                    ze = ze + 1
                    cont = (Text1.SelectedText)
                    If cont = "p" Then
                        Text1.Select(ze, 1)
                        ze = ze + 1
                        cont = (Text1.SelectedText)
                        If cont = ":" Then
                            Text1.Select(ze, 1)
                            ze = ze + 1
                            cont = (Text1.SelectedText)
                            If cont = "/" Then
                                Text1.Select(ze, 1)
                                ze = ze + 1
                                cont = (Text1.SelectedText)
                                If cont = "/" Then
                                    For i = 0 To 53
                                        Text1.Select(ze, 1)
                                        ze = ze + 1
                                        temp = (Text1.SelectedText)
                                        dir = dir + temp
                                        If i = 53 Then
                                            fox.Navigate(dir)
                                            dir = ""
                                            Timer1.Enabled = False
                                            Timer3.Enabled = True


                                        End If
                                    Next



                                End If
                            End If
                        End If
                    End If
                End If
            End If
        End If

Muchas gracias por las respuestas, a ver si lo consigo 

[Texto inicial:]

Hay un rich textbox con texto, y dispersas por el texto hay URLs, lo que quiero hacer es sacar esas URLs u guardarlas en un txt.

Texto inicial:

(PTP)payingcash-bosman

http://et-mails.com/scripts/runner.php?EA=200801259879518636


(PTP)xray-cash-netpig

http://et-mails.com/scripts/runner.php?EA=200365251339518636


(PTP)aceptr-ivymails

http://et-mails.com/scripts/runner.php?EA=208801251789518636


(PTP)xray-cashs-redrose

http://et-mails.com/scripts/runner.php?EA=200801259845518636


(PTP)xray-cash-bosman

http://et-mails.com/scripts/runner.php?EA=200133978980125636


(PTP)cosplaymails-cccfl

http://et-mails.com/scripts/runner.php?EA=208703395125118636

Txt final

http://et-mails.com/scripts/runner.php?EA=200801259879518636
http://et-mails.com/scripts/runner.php?EA=200365251339518636
http://et-mails.com/scripts/runner.php?EA=208801251789518636
http://et-mails.com/scripts/runner.php?EA=200801259845518636
http://et-mails.com/scripts/runner.php?EA=200133978980125636
http://et-mails.com/scripts/runner.php?EA=208703395125118636

Estoy haciendo un bot y necesitaria saber como puedo sacar las URLs de un Richtextbox y guardarlas en un txt, en distintas lineas.
Gracias! 

Mira a ver si esto te resulta util: http://www.elguruprogramador.com.ar/articulos/conectando-a-un-servidor-mysql-desde-visual-basic.htm

Ya pero se escapan unos cuaantos, no se quizas afinando el sistema de borrado automatico, por ejemplo ,no creao que ninguno vaya a hablar de pussy, palbra que podria provocar el borrado del mensaje, etc

Ultimamente se esta viendo demasiado spam por el foro, vendría bien que se añadieran dificultades de registro a los bots.
Gracias!