0

RETLogModelというテーブルとはまったく異なる接続文字列からプルするモデルで実行されるビューがありますRecordsTaskViewsRecordsTaskViewsモデルによって収集された情報に基づいて情報を渡す必要があります。現在、私の関数は次のようになっています。

Function RETLog(model As RETModels.RETLogModel) As ActionResult
    Dim id As Integer = model.ActivityIDReturn
    Dim id2 As Integer
    Dim PS As RecordsTaskView = GlobalVar.db.PS.RecordsTaskViews.Find(id)
    If model.ActivityIDReturn > 0 Then
        id2 = model.ActivityIDReturn
    Else : id2 = PS.RefActionID
    End If
    If model.ActivityIDError > 0 Then
        ViewData("ActivityIDErrorValue") = model.ActivityIDError
    Else : ViewData("ActivityIDErrorValue") = PS.RefActionID
    End If
    Dim PS2 As RecordsTaskView = GlobalVar.db.PS.RecordsTaskViews.Find(id2)
    If model.ActivityIDReturn > 0 Then
        If PS IsNot Nothing Then
            ViewData("QRefActionID") = PS.RefActionID
            ViewData("QQutDesc") = PS.QutDesc
            ViewData("QTaskDesc") = PS.TaskDesc
            ViewData("QClientCode") = PS.CltCode
            ViewData("QClientName") = PS.CltDesc
            ViewData("QMemberID") = PS.BenIDin
            ViewData("QMemberName") = PS.BenNameLast & ", " & PS BenNameFirst
            ViewData("QDateStart") = CDate(PS.DateStart).ToString("MM/dd/yyyy")
            ViewData("QDateRes") = CDate(PS.DateResolution).ToString("MM/dd/yyyy")
            ViewData("QCreateUser") = PS.UserIDCreation
            ViewData("QLastChangeUser") = PS.UserIDLastChanged
            ViewData("QDateReport") = CDate(PS.DateReport).ToString("MM/dd/yyyy")
        Else
            ViewData("QQutDesc") = ""
            ViewData("QTaskDesc") = ""
            ViewData("QClientCode") = ""
            ViewData("QClientName") = ""
            ViewData("QMemberID") = ""
            ViewData("QMemberName") = ""
            ViewData("QDateStart") = ""
            ViewData("QDateRes") = ""
            ViewData("QCreateUser") = ""
            ViewData("QLastChangeUser") = ""
            ViewData("QDateReport") = ""
        End If
        If PS2 IsNot Nothing Then
            ViewData("ORefActionID") = PS2.RefActionID
            ViewData("OQutDesc") = PS2.QutDesc
            ViewData("OTaskDesc") = PS2.TaskDesc
            ViewData("OClientCode") = PS2.CltCode
            ViewData("OClientName") = PS2.CltDesc
            ViewData("OMemberID") = PS2.BenIDin
            ViewData("OMemberName") = PS2.BenNameLast & ", " & PS.BenNameFirst
            ViewData("ODateStart") = CDate(PS2.DateStart).ToString("MM/dd/yyyy")
            ViewData("ODateRes") = CDate(PS2.DateResolution).ToString("MM/dd/yyyy")
            ViewData("OCreateUser") = PS2.UserIDCreation
            ViewData("OLastChangeUser") = PS2.UserIDLastChanged
            ViewData("ODateReport") = CDate(PS2.DateReport).ToString("MM/dd/yyyy")
        Else
            ViewData("ORefActionID") = ""
            ViewData("OQutDesc") = ""
            ViewData("OTaskDesc") = ""
            ViewData("OClientCode") = ""
            ViewData("OClientName") = ""
            ViewData("OMemberID") = ""
            ViewData("OMemberName") = ""
            ViewData("ODateStart") = ""
            ViewData("ODateRes") = ""
            ViewData("OCreateUser") = ""
            ViewData("OLastChangeUser") = ""
            ViewData("ODateReport") = ""
        End If
    End If
    If ModelState.IsValid Then
    End If
    Return View(model)
End Function

私の問題は、これが明らかに大量のViewData要素であることです。ビュー自体で既に@ModelType RETModels.RETLogModel指定したように、データをビューに渡すより効率的な方法はありますか?

4

1 に答える 1

2

データをビューに渡すより効率的な方法はありますか?

はい、関連する(結合された)すべてのフィールドを含むViewModelを使用し、それをViewにバインドします。

また、 AutoMapperなどの自動化されたオブジェクト マッパーを使用して、ビジネス モデルから ViewModel にデータをコピーします。

于 2013-10-14T16:14:27.317 に答える