Dim Cookies As String = Environment.GetFolderPath( _
  Environment.SpecialFolder.Cookies)
        Dim rom As Char()
        Dim user As String
 
' Den Variablen werde hier natürlich noch werte zugewiesen.
 
 MsgBox(Cookies & "\" & user & "@" & System.Text.Encoding.ASCII.GetString( _
   System.Text.Encoding.ASCII.GetBytes(rom)) & "_[1].txt")