problemas con FileSystemObject Resulta que en un archivo de texto guardo la ruta de la BD. Cuando quiero cambiar la ruta y cojer la ruta de la BD del Servidor, es cuando me da problemas, al querer escribir en el archivo de texto la nueva ruta. Dice que no encuentra el archivo de texto.
El archivo de texto está en la misma carpeta que la aplicación.
Pongo el código :
Cita:
No sé que puede ser, porque cuando cojo rutas de archivos de mi máquina me deja escribir en el TXT, pero cuando cojo archivos del servidor, es cuando peta. Dim contenido As String
FSO = New FileSystemObject
contenido = Me.txtRuta.Text
If FSO.FileExists("configBD.txt") Then
TST = FSO.OpenTextFile("configBD.dat", IOMode.ForWriting)
Else
MsgBox("No se encuentra archivo", MsgBoxStyle.Critical, "Falta archivo")
Exit Sub
End If
'escribimos en el archivo
TST.WriteLine(contenido)
'cerramos el archivo
TST.Close()
'tanca form
Me.Close()
FSO = New FileSystemObject
contenido = Me.txtRuta.Text
If FSO.FileExists("configBD.txt") Then
TST = FSO.OpenTextFile("configBD.dat", IOMode.ForWriting)
Else
MsgBox("No se encuentra archivo", MsgBoxStyle.Critical, "Falta archivo")
Exit Sub
End If
'escribimos en el archivo
TST.WriteLine(contenido)
'cerramos el archivo
TST.Close()
'tanca form
Me.Close()
A ver si alguien me echa una manita
saludos!
