List数据生成CSV文件
来源:互联网 发布:apache 安装 编辑:程序博客网 时间:2024/04/27 10:00
dataOutPut = New List(Of Categories)()
Dim search1 As String = "Beverages"
Dim search2 As String = "Cheeses"
' 空のコレクションを用意
Dim queryList As IEnumerable(Of Categories) = New List(Of Categories)()
If search1 <> "" Then
queryList = queryList.Union(db.Categories.Where(Function(v) v.CategoryName.Contains(search1)).ToList())
End If
If search2 <> "" Then
queryList = queryList.Union(db.Categories.Where(Function(c) c.Description.Contains(search2)).ToList())
End If
Dim all = queryList.ToList()
'リストデータをCSVファイルに出力
ConvertListTDataToCSVFile(all, "C:\testdata\bb.csv")'本画面で、操作した後、本画面を表示する
Return View()
End Function
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー
''' <summary>
''' TDataデータをCSVファイルに出力する
''' </summary>
''' <param name="sourceListData"></param>
''' <param name="csvPath"></param>
Public Shared Sub ConvertListTDataToCSVFile(ByVal sourceListData As IEnumerable(OfCategories), ByVal csvPath As String)
Dim enc As System.Text.Encoding = System.Text.Encoding.GetEncoding("Shift_JIS")
'書き込むファイルを開く
Dim writer As New System.IO.StreamWriter(csvPath, False, enc)
For Each item In sourceListData
Dim lineData As String
lineData = item.CategoryID & "," & item.CategoryName & "," & item.Description
writer.WriteLine(lineData)
writer.Flush()
Next
'閉じる
writer.Close()
End Sub
- List数据生成CSV文件
- jsp 生成csv文件
- PrintWriter 生成 csv 文件
- PHP生成CSV文件
- 生成.csv文件
- CSV文件的生成
- GridView生成.csv文件
- .NET生成CSV文件
- php 生成 csv文件
- CSV文件 生成
- Java生成CSV文件
- Java生成CSV文件
- php生成CSV文件
- java 生成 .csv 文件
- iOS生成csv文件
- Java生成CSV文件
- PHP生成csv文件
- php生成csv文件
- oracle 启动监听提示 :The listener supports no services
- 重建二叉树
- 简单了解字符与字符集
- 测试
- 导入c标签等,以及${pageContext.request.contextPath}的作用
- List数据生成CSV文件
- leetcode():Permutations
- git 的初级使用
- android开发艺术探索(二)
- iTunes无法验证服务器"s.mzstatic.com"的身份 如何解决
- 安卓点击键盘外侧不会获取焦点
- 0-1背包
- redis使用(linux环境)
- 动态规划之装配线调度理解