web-dev-qa-db-ja.com

DataSetは、エクスポートでSystem.Nullable <>をサポートしていません

Excell、PDF、TextFileへのエクスポートを使用してレポートを生成しようとしていました。まあ私はMVCでこれをやっています。 SPBatch（SQLのストアドプロシージャの正確な名前）という名前のクラスがあり、次のものが含まれています。

public string BatchNo { get; set; }
public string ProviderName { get; set; }
public Nullable<System.Int32> NoOfClaims { get; set; }
public Nullable<System.Int32> TotalNoOfClaims { get; set; }
public Nullable<System.Decimal> TotalBilled { get; set; }
public Nullable<System.Decimal> TotalInputtedBill { get; set; }
public Nullable<System.DateTime> DateCreated { get; set; }
public Nullable<System.DateTime> DateSubmitted { get; set; }
public Nullable<System.DateTime> DueDate { get; set; }
public string Status { get; set; }
public string RefNo { get; set; }
public string BatchStatus { get; set; }
public string ClaimType { get; set; }

ご覧のとおり、私の列のいくつかはNullableとして宣言されています。結果をテーブルに検索して表示することからスムーズに進みました。エクスポート用の画像ボタンであるいくつかのボタンがあり、Excelでエクスポートしようとするたびに、常に問題が発生します "DataSetはSystem.Nullable <>"コードのこの部分をサポートしていません：

foreach (MemberInfo mi in miArray)
{
    if (mi.MemberType == MemberTypes.Property)
    {
        PropertyInfo pi = mi as PropertyInfo;
        dt.Columns.Add(pi.Name, pi.PropertyType); //where the error pop's up.

    }
    else if (mi.MemberType == MemberTypes.Field)
    {
        FieldInfo fi = mi as FieldInfo;
        dt.Columns.Add(fi.Name, fi.FieldType);
    }
}

エラーはコメント付きで表示されます。どうすればいいですか？コードにDBNullを追加しようとしましたが、それでも同じエラーが発生します。 SPBatchでNullableを削除しようとしましたが、一部のテーブルをNullableとして宣言する必要があるというエラーが表示されます。

私は何をすべきか？

c#asp.net-mvc-4datasetexport-to-excelnullable
43
Ms. B

で試す

dt.Columns.Add(pi.Name, Nullable.GetUnderlyingType(
            pi.PropertyType) ?? pi.PropertyType);
108
Damith

データテーブルを生成するC＃バージョンといくつかのハッキングのおかげで、この答えをVBシンプルなデータレイヤーを使用しながら、ストアドプロシージャからフィルター処理可能なデータセットを作成します。

注：ユースケースは、BindingSource.Filter = "some query string"を使用する場合です。

Imports System.Reflection

Public Module Extenders
<System.Runtime.CompilerServices.Extension>
Public Function ToDataTable(Of T)(collection As IEnumerable(Of T), tableName As String) As DataTable
    Dim tbl As DataTable = ToDataTable(collection)
    tbl.TableName = tableName
    Return tbl
End Function

<System.Runtime.CompilerServices.Extension>
Public Function ToDataTable(Of T)(collection As IEnumerable(Of T)) As DataTable
    Dim dt As New DataTable()

    Dim tt As Type = GetType(T)
    Dim pia As PropertyInfo() = tt.GetProperties()

    'Create the columns in the DataTable

    For Each pi As PropertyInfo In pia
        Dim a = 
If(Nullable.GetUnderlyingType(pi.PropertyType), pi.PropertyType)
        dt.Columns.Add(pi.Name, If(Nullable.GetUnderlyingType(pi.PropertyType), pi.PropertyType))
    Next

    'Populate the table

    For Each item As T In collection
        Dim dr As DataRow = dt.NewRow()
        dr.BeginEdit()

        For Each pi As PropertyInfo In pia

            dr(pi.Name) = If(Nullable.GetUnderlyingType(pi.PropertyType) Is GetType(DateTime), DBNull.Value, pi.GetValue(item, Nothing))
        Next
        dr.EndEdit()
        dt.Rows.Add(dr)
    Next
    Return dt
End Function

End Module
4
Richard Griffiths

Nullableを検索し、DateTimeとは異なりnullにできる文字列に置き換えます。

foreach (PropertyInfo pi in properties)
{
    if (pi.PropertyType.Name.Contains("Nullable"))
       myDataType = typeof(String);
    else
       myDataType = pi.PropertyType;
}

完全なバージョンは次のとおりです。

private DataTable CreateDataTable(PropertyInfo[] properties)
{
    DataTable dt = new DataTable();
    DataColumn dc = null;
    foreach (PropertyInfo pi in properties)
    {
        dc = new DataColumn();
        dc.ColumnName = pi.Name;

        if (pi.PropertyType.Name.Contains("Nullable"))
            dc.DataType = typeof(String);
        else
            dc.DataType = pi.PropertyType;

        // dc.DataType = pi.PropertyType;
        dt.Columns.Add(dc);
    }
    return dt;
}
1
Ross Bush