Hur kan jag göra denna 'filkontroll'?

Öppna "minfil.txt"
If filen existerar Then
Läs innehållet
Else
Skapa filen med innehållet
på rad 1
och på rad 2
End If

Du behöver inte göra den.

Om inte jag missminner mig så öppnas filen om den finns och skapas om den inte finns - kontrollen är inbyggd

/E

Förvisso sant att det kommer öppnas en fil i vilket fall som helst, men var det inte så att det i fallet filen finns skulle denna läsas, om filen inte finns skall den skapas och det skall läggas in någon rad (som alltså inte ska läggas till i fall 1)?
Filen finns löses enklast på nåt sånt här sätt:

Function ExistFile (ByVal strFileName As String) As Boolean
FileLen(strFileName)
ExistFile = (Err = 0)
End Function

Må väl.
/EE

If Dir("minfil") <> "" Then
MsgBox "Finns!"
Else
MsgBox "Finns ej!"
End If

//Ibbe