Notepad

[Informatic]

Hi
How can I open a notepad File...
For example text.txt with VBA code in Access

 

[LearningSql]

Here ya go --

Public Sub OpenTextFile()
' Found in the helpfile in MSAccess
' In Microsoft Windows:
' Specifying 1 as the second argument opens the application in
' normal size and gives it the focus.

' Must specify Correct path of Notepad.exe
' and pass Path and filename of txt file to open.

Dim RetVal
RetVal = Shell("C:\WINNT\NOTEPAD.EXE D:\Filename.txt", 1) ' Run Text File

End Sub

Hope it helps.

 

[VBslammer]

Don't need the program's path as long as its class is in the registry (which notepad is):

  Dim retVal As Double
  
  retVal = shell("NotePad.exe ""C:\Boot.ini""", vbNormalFocus)

VBSlammer