Dim ProgDataPath As String : ProgDataPath = File.DirInternal
Dim ProgDataPath As String : ProgDataPath = File.DirRootExternal
If FileName.SubString2(FileName.Length - 4, FileName.Length) =ProgFileFilter Then
Dim ProgDataPath As String : ProgDataPath = File.DirRootExternal & "Vokabeln"
Dim ProgDataPath AsString : ProgDataPath=File.DirRootExternal[COLOR=red]&"/[/COLOR]Vokabeln"
If FileName.SubString2(FileName.Length-4,FileName.Length)=ProgFileFilter Then
' reads first line to check the file format UTF-8 or ISO-8859-1 (ANSI)
' txtReader.Initialize2(File.OpenInput(FilePath,FileName),"ISO-8859-1")
' Line=txtReader.ReadLine
' txtReader.Close
'checks if the file is UTF-8
' If Line.SubString2(0,2)="ï»" Then
' txtReader.Initialize(File.OpenInput(FilePath,FileName))
' FileFormatUTF8=True
' Else
' txtReader.Initialize2(File.OpenInput(FilePath,FileName),"ISO-8859-1")
' FileFormatUTF8=False
' End If
' Words=txtReader.ReadList
' txtReader.Close
Habe das Programm heute runtergeladen und hatte selbe Fehlermeldung wie Uli. Habe dann den Dateinamen Default.csv überall auf Kleinschreibung geändert und dann hats funktioniert.
Ich werde versuchen mit Hilfe dieses Programms meine bescheidenen Englischkenntnisse zu verbessern damit ich in Zukunft alles im Forum verstehe und mich besser verständigen kann.
Besten Dank Klaus!
Im Designer musst Du eine der Layoutdateien laden den es gibt drei davon.
Im Menu unter File/Open
Beste Grüsse.
Was funktioniert nicht ?Nun habe ich aber ein S4 active und es läuft nicht mehr.
We use cookies and similar technologies for the following purposes:
Do you accept cookies and these technologies?
We use cookies and similar technologies for the following purposes:
Do you accept cookies and these technologies?