텍스트 문서 Outlook 2007의

Question

MSDN FSO Object

웨이에서 Outlook에서 VBA 텍스트 파일에서 관심

Answer 1

Private Sub Command1_Click() 
    'Declare variables. 
    Dim fso As New FileSystemObject 
    Dim ts As TextStream 
    'Open file. 
    Set ts = fso.OpenTextFile(Environ("windir") & "\system.ini") 
    'Loop while not at the end of the file. 
    Do While Not ts.AtEndOfStream 
     Debug.Print ts.ReadLine 
    Loop 
    'Close the file. 
    ts.Close 
    End Sub 

에 대한 2007 년

감사 정보를 읽을 수있는 방법이 있는지 궁금 해서요 더 편안하고 Open sPath, #FileNo. MSDN에서 설명한 것처럼 도구 -> 참조로 프로젝트에 FSO를 추가해야합니다.