Mensajes

Creo que lo que el quiere es Hacer un Mod del eMule, pero para acelerar el emule, que yo sepa no se puede, y 2º esta hecho en C, a si esque mejor vete al foro de Programacion en C, el emule no se puede acelerar porque usa un sistema de creditos, se descarga quien tiene creditos y los creditos se almacenan remotamente, pero para acelerar el emule, necesitas que todo el mundo tuviera tu mod, otra posibilidad seria optimizarlo, de todas formas no me hagas mucho caso porque no estoy seguro de lo que digo

jaja, esque para hacer que baje el cursor una linea tiene que ser con codigo, el textBox no te lo va acer solo, debes ordenarselo

Yo me la baje del emule, te abierto es 1Gb, pero trae mucha informacion util sobre los controles y procedimientos, yo me la baje cuando apenas sabia nada del visual y no me sirvio de mucho, pero ahora al saber lo basico de visual, la msdn me es muy util para entender un control o un procedimiento

Pues.. e intentado trabajar con archivos binarios, pero no se como hacerlo, queria intentar pasar archivos con winsock mediante los archivos binarios, pero sigo sin saber manejar lo de los binarios.

buah! eso es to facil ya que esta en tu pc puedes hacerle todo lo que quieras, asi no tendras problema con lso Av y los firewall..

Bueno, como veo que le interesa a la gente como abrir y guardar textos pos yo me ofrezco para ayudaros... tambien veo problemas con el control Text Box.. a si esque ire poniendo cosas sobre este control tambien.. de momento solo lo de Abiri ya ire ampliando.

Necesitas:
1 Formulario (frmMain)
2 TextBox (txtFile, txtRuta)
2 Botones (cmdGuardar, cmdAbrir)

Codigo:
En el codigo del boton cmdAbrir

Código [Seleccionar] Expandir

Private Sub cmdAbrir_Click()
'Abriremos el archivo que se indique en el textbox txtRuta
'Problema! debes poner una variable por linea!!!
Dim arc As String
Open txtRuta.Text For Input As #1
Input #1, arc 'pon aqui tantas variables como lineas alla en el archivo...
txtFile.Text = arc
MsgBox "Archivo " & txtRuta.Text & " Abierto correctamente", vbInformation, "Textos"
End Sub


En el boton cmdGuardar

Código [Seleccionar] Expandir


Private Sub cmdGuardar_Click()
'Guardaremos el texto en el archivo que se indique en txtRuta
'Obtenemos un canal libre que nos dará
'el sistema oparativo para poder operar
Dim canalLibre As Integer
canalLibre = FreeFile
'Abrimos el fichero en el canal dado
Open txtRuta.Text For Output As #canalLibre
'Escribimos el contenido del TextBox al fichero
Print #canalLibre, txtFile.Text
Close #canalLibre
MsgBox "Archivo guardado correctamente en " & txtRuta.Text, vbOKOnly + vbInformation, "Textos"
'Ya esta!
End Sub

El textbox txtFile debeis ponerle la propiedad multiline a True

Código [Seleccionar] Expandir

txtFile.multiline= true
y si quereis dejarlo mas wapo warrear en la propiedad scrolls

Código [Seleccionar] Expandir

txtFile.scrollbars = 1
0 > Ninguno
1 > Vertical
2 > Horizontal
3 > Ambos

Bueno espero que os ayude, acepto sugerencias para mejorarlo, que seguro que tiene muchos bugs, aunque ya lo probe y funciona!
Podeis bajaros en el ejemplo de:
http://www.alwarstudios.buildtolearn.net/web/Descargas/Abrir%20y%20Guardar%20Textos.zip

Tio mirate un pokito el foro que sobre esto hay mazo! yo tambien pregunte hace poco sobre estas cosas

y por eso puede ser el error?
Gracias de todas maneras!

Text box a multiline y pon vbcrlf antes de que escriba abrir puertos

Y otra cosa. si quieres hacer una aplicacion educativa, ¿Por que no haces algo constructivo en vez de un programa destructivo? ¿no es mas facil hacer un chat?

Asi esta internet lleno de *****

si el problema es que no se conecta al ftp