Dim fileReader As System.IO.StreamReader
        fileReader = My.Computer.FileSystem.OpenTextFileReader( _
          "C:\Programme\testfile.my", System.Text.Encoding.ASCII)

Dim path2 As System.IO.StreamWriter
 
        If File.Exists(path) Then My.Computer.FileSystem.DeleteFile(path)
        path2 = My.Computer.FileSystem.OpenTextFileWriter( _
          "C:\Programme\Newfile.plx", True, System.Text.Encoding.ASCII)
        path2.WriteLine("[PLAYLIST]")

Imports System
Imports System.IO
Imports System.Text
Imports System.Web
 
Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles MyBase.Load
.
.
.
msgbox (HttpUtility.pathEncode("test a.jpg"))
End Sub
 
Public NotInheritable Class HttpUtility
 
        Public Shared Function pathEncode( _
            ByVal str As String _
        ) As String
 
        End Function
 
 
    End Class
End Class