DOBON.NETプログラミング道掲示板

HOME HELP 新規作成 新着記事 ツリー表示 スレッド表示 トピック表示 発言ランク ファイル一覧 検索 過去ログ

■35170 / 1階層) 　Urlにアクセスするとダウンロードされるファイルを捕まえる
□投稿者/ 魔界の仮面弁士 大御所(1455回)-(2022/10/17(Mon) 22:20:54)
  • アイコン■No35169に返信(Wanさんの記事)
    > 一旦Excelファイルに取り込んで、処理しているのですが、
    > 直接csvファイルを扱う方法を教えて頂けないでしょうか？

    えぇと……これはまた、なかなかに変則的な CSV データですね…?
    先頭 4 行が無ければ、 5 列構成の一般的な CSV と言えるのですが。


    ・文字コード：UTF-8 (BOM 無)
    ・改行種別：すべてのレコード末尾に LF 付与
    ・列数：行によって可変……珍しい
    ・空行：あり……0列とみなすべきか1列とみなすべきかが悩みどころ
    ・データ囲み引用符：「"」、ただし無いこともあるのでデータの一部として扱方が良さそう
    ・データ内改行：なし
    ・データ内カンマ：なし


    > System.Console.Write("{0} ", list)
    VSTO の場合、 Console が使えるとは限らないのでは…?


    > 直接csvファイルを扱う方法を教えて頂けないでしょうか？
    Tips ページのこのあたりで出来ませんでしたか?
    https://dobon.net/vb/dotnet/internet/webclientopenread.html
    https://dobon.net/vb/dotnet/internet/webrequest.html


    (案1) WebClient.DownloadString を使う

    Dim wc As New System.Net.WebClient()
    Dim rawData As String = wc.DownloadString("https://f.irbank.net/files/1944/qq-net-sales.csv")
    Dim csv()() As String = rawData.Split(ControlChars.Lf).Select(Function(line) line.Split(","c)).ToArray()


    (案2) My.Computer.Network.DownloadFile を使う

    Dim tmp = My.Computer.FileSystem.GetTempFileName()
    My.Computer.FileSystem.DeleteFile(tmp)
    My.Computer.Network.DownloadFile("https://f.irbank.net/files/1944/qq-net-sales.csv", tmp)
    Dim csv()() As String = File.ReadLines(tmp).Select(Function(line) line.Split(","c)).ToArray()
    My.Computer.FileSystem.DeleteFile(tmp)
違反を報告
削除キー/

前の記事(元になった記事) 次の記事(この記事の返信)
←Urlにアクセスするとダウンロードされるファイルを捕まえる /Wan →Re[2]: Urlにアクセスするとダウンロードされるファイルを捕まえる /Wan
　
上記関連ツリー

Nomalアイコン Urlにアクセスするとダウンロードされるファイルを捕まえる / Wan (22/10/17(Mon) 17:03) #35169
└Nomalアイコン Urlにアクセスするとダウンロードされるファイルを捕まえる / 魔界の仮面弁士 (22/10/17(Mon) 22:20) #35170 ←Now
  └Nomalアイコン Re[2]: Urlにアクセスするとダウンロードされるファイルを捕まえる / Wan (22/10/25(Tue) 17:05) #35199 解決済み!

All 上記ツリーを一括表示 / 上記ツリーをトピック表示
　
上記の記事へ返信
Mode/　 Pass/

HOME HELP 新規作成 新着記事 ツリー表示 スレッド表示 トピック表示 発言ランク ファイル一覧 検索 過去ログ

- Child Tree -