Создание .bat (Batch) файлов

[R3G]

Код: Выделить всё

Dim str As String = "ping www.google.com"
        My.Computer.FileSystem.WriteAllText("1.bat", str, True)
        System.Diagnostics.Process.Start("1.bat")

Результат следующий:



Как избавиться от этих иероглифов впереди команды "ping http://www.google.com", чтобы батник нормально выполнил свою работу? В блокноте этих иероглифов нет! (Возможно проблема с кодировкой, как испправить незнаю). Помогите!

[Williams]

Попробуй поюзать

Код: Выделить всё

using sw as new streamwriter(batFilePath)
sw.writeline("ping http://www.google.com")
end using

Можно также выставить кодировку в UTF-8 вручную

[vIRisium]

Сколько всегда программировал, но лучше всего выставлять кодировку Defult. Она подо все подстраивается.

[R3G]

(Возможно проблема с кодировкой, как испправить незнаю)

По побдробнее как поменять кодировку можно? По умолчанию всегда стоит UTF8

Williams, спасибо, работает!

[Nord777]

По побдробнее как поменять кодировку можно?

Передавай параметром в конструктор стрима.

[vIRisium]

Код: Выделить всё


       IO.File.WriteAllText("path", "TEXT", System.Text.Encoding.Default)


Вот