DichTextBox para cargar documentos
Publicado por Miguel (281 intervenciones) el 05/01/2022 20:40:48
Tengo hecho un DichTextBox pero para meter un número de líneas controladas no hay problema, pero yo lo que pretendo cargar son documentos que nunca voy a saber de antemano el número de líneas y hay es donde no encuentro la forma de terminarlo a parte que no tiene sentido meter un documento y tener que dar el número de filas que lo compone.
Esto es lo que he hecho.
Private Sub btCrear_Click(sender As Object, e As EventArgs) Handles btCrear.Click
Try
Dim obj As New Object
obj = CreateObject("Scripting.FileSystemObject")
archivo = obj.CreateTextFile(ruta, True)
archivo.WriteLine("midocu") 'documento realizado pero no funciona
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
Me pueden decir cual es la forma de introducirlo pues me da permiso denegado.
Esto es lo que he hecho.
Private Sub btCrear_Click(sender As Object, e As EventArgs) Handles btCrear.Click
Try
Dim obj As New Object
obj = CreateObject("Scripting.FileSystemObject")
archivo = obj.CreateTextFile(ruta, True)
archivo.WriteLine("midocu") 'documento realizado pero no funciona
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
Me pueden decir cual es la forma de introducirlo pues me da permiso denegado.
Valora esta pregunta
0