haber si me pueden ayudar a realizar este procedimiento, el procedimiento es el siguiente:
Al pulsar buscar y reemplazar (SI LA IP A BUSCAR esta en el fichero HOSTS) la reemplazara por la nueva, o no mostrando un mensaje.
tengo un formulario en el cual tengo 8 textbox, 1 para cada grupo de numeros de la ip y lo que tengo que realizar es lo siguiente:
tengo un fichero el cual tiene varias ip y lo que tiene que hacer es que yo le introduzco una ip en los 4 textbox y si existe esa ip en el fichero la reemplaza por la ip que coloque en los 4 textbox ultimos.
el codigo que yo he realizado es el siguiente:
Const fichero As String = "C:\ejer\Ficheros\windows2\copi_hosts"
' 1. camino o estrean para cargar la informacion
Dim sr As New System.IO.StreamReader(fichero)
' 2. leer el archivo
leer_ip = sr.ReadLine
leer_nombre = sr.ReadLine
leer_comentario = sr.ReadLine
ip_buscar = CStr(txt_B1.Text(Mid(1, 3)) & "." & txt_B2.Text(Mid(5, 7)) & "." & txt_B3.Text(Mid(9, 9)) & "," & txt_B4.Text(Mid(11, 12)))
MessageBox.Show("ip_buscar: " & ip_buscar)
Catch ex As Exception
End Try
aunque creo que seria una mejor forma de realizarlo haciendo lo siguiente:
mirar la estructura del fichero hosts y crear una estructura y una matriz de estructuras que recoja esa información. cuando lo reemplacemos lo cambiaremos en la matriz de estructuras y después enviamos toda la matriz al fichero.
espero haberme explicado bien, si tienen alguna duda preguntenme
Autor
En línea
