Zitat Zitat von Milchbox
Wenn das so schwer ist kannst du mir auch sicherlich sagen was das hier macht:

Code: 
Private Sub Form_Haha()
Dim p$
'
p$ = App.Path
'
If Right(p$, 1) <> "\" Then
  p$ = p$ + "\"
End If
'
If LoadFileToTB(Text1, p$ + "lol.blubb") = False Then
 MsgBox ":D.", , ":P"
End If
'
End Sub
Hf
Sag mal, solltest du nicht am CMS arbeiten? . Mein Post vorhin war übrigens ernstgemeint. Da geben die Leute für so Kleinigkeiten so viel Geld...