HEJ!!!

kan Ni se vad är det för felet i den här koden. Jag vill öppna och spara en fil med hjälp av RichTextBox. Filen heter "Jag"....

Jag får ett meddelande när jag trycker både knapparna: " Run-time error '76' Path not found"

Jag vill inte använda CommonDialog utan textruta som jag skriver filnamnet...


Private Sub cmdSpara_Click()
Dim filnamn As String

filnamn = Text1.Text
ChDir ("Jag")

RichTextBox1.SaveFile ("J" + filnamn + ".txt")
ChDir ("..")
RichTextBox1.Text = ""
End Sub

Private Sub cmdÖppna_Click()
Dim filnamn As String

filnamn = Text1.Text
ChDir ("Jag")
RichTextBox1.LoadFile ("J" + filnamn + ".txt")
ChDir ("..")
End Sub

testa att ändra
ChDir ("Jag")
till tex. ChDir ("c:\Jag")

Kan man inte bara ha ChrDir("Jag") eftersom jag vill att användaren ska använda filens namn med vilken datorn som helst när man installera t.ex. ett program som finns med Jag-filen.
Jag menar att "Jag-filen" ska vara med aplikationen som en användaren ska installera exempelvis,,,

testa
ChrDir(App.Path & "\Jag")

Tack för hjälpen, det funkar bra

MVH
/Anders