Vb.net 下载.txt文件时如何保持换行?

Vb.net 下载.txt文件时如何保持换行?,vb.net,download,Vb.net,Download,我正试图从我的服务器下载一个简单的.txt文件。文件内容如下: .jpg .txt .js .css .png .gif .xml .cgi .ico .php /wp内容/ /评论/ wp登录 /feed/ wp login.php? /类别/ /示例页 ?replytocom /页面/ /标签 /作者/ /trackback/ 评论页“ 让线断开,因为这对我的程序是必要的 从服务器下载文件时,由于某种原因,所有换行符都会被剥离,内容显示在一行中,如下所示: .jpg.txt.js.css.p

我正试图从我的服务器下载一个简单的.txt文件。文件内容如下:

.jpg
.txt
.js
.css
.png
.gif
.xml
.cgi
.ico
.php
/wp内容/
/评论/
wp登录
/feed/
wp login.php?
/类别/
/示例页
?replytocom
/页面/
/标签
/作者/
/trackback/
评论页“

让线断开,因为这对我的程序是必要的

从服务器下载文件时,由于某种原因,所有换行符都会被剥离,内容显示在一行中,如下所示:

.jpg.txt.js.css.png.gif.xml.cgi.ico.php/wp content//comments/wp login/feed/wplogin.php?/category//sample page?replytocom/page//tag author//trackback/comment page

我的代码非常简单:

Dim folderpath As String = Directory.GetCurrentDirectory + "/Blacklists/"
Dim folderpath2 As String = Directory.GetCurrentDirectory + "/Blacklists/UrlBlacklist.txt"
If (Not System.IO.Directory.Exists(folderpath)) Then
    System.IO.Directory.CreateDirectory(folderpath)
End If

My.Computer.Network.DownloadFile("http://mywebsite.com/blacklists/UrlBlacklist.txt",folderpath2, False, 500)

我可以做些什么来保持换行符?

我怀疑是否发生了任何剥离。当您使用需要Windows/DOS换行符(回车换行符)的编辑器(我猜是记事本)时,该文件可能有Unix换行符(仅换行符)。您可以尝试手动加载和转换该文件:

 Dim fileData as String = System.IO.File.ReadAllText(folderPath2)
 fileData = fileData.Replace(vbLf, vbCrLf)
 System.IO.File.WriteAllText(folderPath2, fileData)

我怀疑正在进行剥离。当您使用需要Windows/DOS行尾(回车换行)的编辑器(我猜是记事本)时,该文件可能有Unix行尾(仅换行)。您可以尝试手动加载和转换该文件:

 Dim fileData as String = System.IO.File.ReadAllText(folderPath2)
 fileData = fileData.Replace(vbLf, vbCrLf)
 System.IO.File.WriteAllText(folderPath2, fileData)

我怀疑正在进行剥离。当您使用需要Windows/DOS行尾(回车换行)的编辑器(我猜是记事本)时,该文件可能有Unix行尾(仅换行)。您可以尝试手动加载和转换该文件:

 Dim fileData as String = System.IO.File.ReadAllText(folderPath2)
 fileData = fileData.Replace(vbLf, vbCrLf)
 System.IO.File.WriteAllText(folderPath2, fileData)

我怀疑正在进行剥离。当您使用需要Windows/DOS行尾(回车换行)的编辑器(我猜是记事本)时,该文件可能有Unix行尾(仅换行)。您可以尝试手动加载和转换该文件:

 Dim fileData as String = System.IO.File.ReadAllText(folderPath2)
 fileData = fileData.Replace(vbLf, vbCrLf)
 System.IO.File.WriteAllText(folderPath2, fileData)