---

hejsa

Jeg er rimelig nybegynder og har lavet en lille tekst editor, med en
richtekst box osv. men....

Når jeg har en fil jeg ønsker at dobbeltklikke på for at starte den i mit
program, som det fungerer med en alm tekstfil og notepad.
så åbner den ikke filen. Programmet åbnes men teksten kommer ikke ind i
richtekstboxen.

Er der nogen der kan hjælpe ?

--
mvh.
Jan Damkjær Dahl

---

Hej Jan

Prøv noget lignende dette:

Sub Main
Dim strFileName As String

strFileName = Command()

If strFileName <> vbNullString Then
...Åbn normalt
Else
If Dir(strFileName) <> vbNullstring Then
...Åbn fil
Else
...Åbn normalt
End If
End If
End Sub

/Carsten Suurland

---

aaahhh.... der er en lille bug i den kode jeg lagde på tidligere...

If strFileName <> vbNullString Then

Dette bør være
If strFileName = vbNullString Then

/Carsten Suurland