Open a file in the current directory

[kanejone]

Hi guys
I'm just wondering can anyone tell me how to open a file in a current directory,
eg,
code/
[Open "Current Directory\text.txt for Append as #1. ]

I'm creating a file and I want it to be created in the same directory that as the application is run from. I heard something about "cardir", but I'm not to sure, Can anyone help???



[Edited by kanejone on 08-25-2000 at 10:18 AM]

[kurtsimons]

app.path+"\filename.txt"

[Yonatan]

That's not CarDir, it's CurDir.
First:

Function AddSlash(ByVal sPath As String) As String
    AddSlash = sPath & IIf(Right(sPath, 1) = "\", vbNullString, "\")
End Function

Then:

' If you want to open the file from the CURRENT directory:
Open AddSlash(CurDir) & "text.txt" For Append As #1
' If you want to open the file from the APPLICATION'S directory:
Open AddSlash(App.Path) & "text.txt" For Append As #1

[kanejone]

Thanks a lot
That was exactly what I needed,
Take care
JK