saeidmobashery
سه شنبه 01 اسفند 1402, 00:12 صبح
سلام و عرض ادب بر اساتید عزیز
دوستان بنده لینک زیر را به دو شیوه دانلود میکنم و به صورت فایل تکست ذخیره میکنم
http://old.tsetmc.com/tsev2/data/MarketWatchPlus.aspx
یکبار با شل به صورت زیر :
Dim Command As String = $"powershell -c ""Invoke-WebRequest -Uri \""{Link}\"" -OutFile \""{Save_Address}\"""
Shell(Command, AppWinStyle.Hide, True)
یکبار توسط وی بی :
Private WithEvents HTTPCLINET As WebClient
HTTPCLINET = New WebClient
Dim Content As String = HTTPCLINET.DownloadString(New Uri(Link))
IO.File.WriteAllText(Save_Address, Content, Encoding.UTF8)
در مرتبه اول اینکدینگ UTF8 با فرمت CRLF است و کاراکترهای فارسی مشکل ندارد و تکست خوانا است
در مرتبه دوم اینکدینگ UTF8 BOM با فرمت CR و کاراکترها خراب است
به نظر دوستان مشکل از کجاست ؟
دوستان بنده لینک زیر را به دو شیوه دانلود میکنم و به صورت فایل تکست ذخیره میکنم
http://old.tsetmc.com/tsev2/data/MarketWatchPlus.aspx
یکبار با شل به صورت زیر :
Dim Command As String = $"powershell -c ""Invoke-WebRequest -Uri \""{Link}\"" -OutFile \""{Save_Address}\"""
Shell(Command, AppWinStyle.Hide, True)
یکبار توسط وی بی :
Private WithEvents HTTPCLINET As WebClient
HTTPCLINET = New WebClient
Dim Content As String = HTTPCLINET.DownloadString(New Uri(Link))
IO.File.WriteAllText(Save_Address, Content, Encoding.UTF8)
در مرتبه اول اینکدینگ UTF8 با فرمت CRLF است و کاراکترهای فارسی مشکل ندارد و تکست خوانا است
در مرتبه دوم اینکدینگ UTF8 BOM با فرمت CR و کاراکترها خراب است
به نظر دوستان مشکل از کجاست ؟