RESPONDER UNA PREGUNTA

Si para responder la pregunta, crees necesario enviar un archivo adjunto, puedes hacerlo a traves del correo [email protected]

    Pregunta:  52444 - SOBREESCRIBIR UN ARCHIVO
Autor:  Dario Reyes
HOla, tengo el siguiente problema, necesito modificar un archivo de texto de manera tal que se sobreescriban los datos ya existentes.
tengo la siguiente funcion que me agrega la info al final sin problemas pero lo que yo necesito es eliminar la informacion anterior y luego anexar esta, intente creando el archivo en blanco con file.WriteAllLines y .writealltext pero no me permite ya que el archivo se encuentra en uso... agredezco cualquier cooperacion.
Gracias.!

Public Function cambia_Ini(ByVal id_user As String, ByVal id_server As String, ByVal id_pswd As String) As String

'Abre un archivo para escritura.
Dim objEscritor As StreamWriter
Dim nuevos_datos
Dim ruta As String = Server.MapPath("cfg.ini")
objEscritor = File.AppendText(Server.MapPath("cfg.ini"))

'Escribe en el archivo
objEscritor.WriteLine("")
objEscritor.WriteLine("server=" & id_server)
objEscritor.WriteLine("user=" & id_user)
objEscritor.WriteLine("senia=" & id_pswd)

'Cierra el archivo.
objEscritor.Close()

End Function


Nombre
Apellidos
Correo
Comentarios