Är ett felmeddelande som spottas på mig när jag försöker köra följande kod:

<code>
Dim Directory As New DirectoryInfo("C:\Tempfiler")
For Each File As FileSystemInfo In Directory.GetFileSystemInfos("*.*")

Dim SRw As New FileStream("C:\Tempfiler\" & File.FullName & "f-.txt", FileMode.Create, FileAccess.Write)
Dim SR As New StreamReader(File.FullName)


Me.StatusBox.Text = sText & vbCrLf & " - Läser råfil: " & File.FullName

Dim RawContent As String = SR.ReadToEnd()

Dim sFContent As String
sFContent = Replace(RawContent, "'", vbCrLf)

Me.StatusBox.Text = sText & vbCrLf & " - Skriver formaterad fil: " & File.FullName & "-f.edi"

Dim sRwriter As New StreamWriter(SRw)
sRwriter.BaseStream.Seek(0, SeekOrigin.End)

sRwriter.Write(sFContent)

sRwriter.Close()
SR.Close()

Next

Catch ex As Exception
Me.StatusBox.Text = sText & vbCrLf & " - " & (ex.Message)
End Try
</code>

Målbilden är följande:

- Leta efter filer i katalogen c:\tempfiler
- Hittar man en fil så ska innehållet läsas in, vid varje ' så ska det ersättas med en crlf istället.
- Skriv en ny fil med filnamnet och ändelsen -f.txt.


Vad är detta. Jag har bara böcker på engelska om VB.NET men jag kan inte hitta ett jota om detta felet
i dem.

M V H
Johannes

Vet inte vad det är för fel du får, men jag reagerade lite på följande rad:
<code>
Dim SRw As New FileStream("C:\Tempfiler\" & File.FullName & "f-.txt", FileMode.Create, FileAccess.Write)
</code>

När du skriver File.Fullname så får du HELA sökvägen: (C:\Tempfiler\filnamn.txt)

Din kod borde då ange sökvägen "C:\Tempfiler\C:\Tempfiler\filnamn.txtf-.txt"
Kan det vara det?

Jag böjer mig i tacksamhet. :-)

Hade inte en tanke på det.