Visual Basic - Abrir archivos desde visual

Life is soft - evento anual de software empresarial
 
Vista:

Abrir archivos desde visual

Publicado por Xi0N (64 intervenciones) el 20/07/2006 17:27:33
Tengo una aplicacionq ue genera un txt, y quisiera que al terminar, automaticamente abriera dicho archivo paar que el usuario lo leyera. ¿Cómo haria esto?

Gracias por la ayuda
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Abrir archivos desde visual

Publicado por Jamec (231 intervenciones) el 20/07/2006 19:59:45
Usas esto:

Private Sub LeerArchivo1(Ruta As String )
'Para leer un archivo qie tienen varias lineas, el textbox se le definen las propiedades
' MultiLine = True; ScrollBars = 1 ó 2 ó 3
Dim F, A
Set F = CreateObject("Scripting.FileSystemObject")
Set A = F.OpenTextFile(Ruta , 1)
Text1.Text = A.ReadAll 'La primera leerlo de un solo.
A.Close
Set F = Nothing 'Destruye los objetos
Set A = Nothing 'Destruye los objetos
End Sub

Suerte
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar