我可以知道如何声明viewstate .. 我需要的是sql存在一些数据 所以,我想创建数据表列并填充数据。 我想将它保存在视图状态 但是viewstate我无法声明显示一些错误 看看下面的iamge .. 任何解决方案 正好在viewsate显示消息,如果我把鼠标放在viewate上 它告诉声明是预期的..
Dim dt As New DataTable()
Dim dr As DataRow = Nothing
dt.Columns.Add(New DataColumn("SNO", GetType(String)))
dt.Columns.Add(New DataColumn("Standard Description", GetType(String)))
dt.Columns.Add(New DataColumn("ItemCode", GetType(String)))
dt.Columns.Add(New DataColumn("Regional Name", GetType(String)))
dt.Columns.Add(New DataColumn("UOM", GetType(String)))
For i As Integer = 1 To RS1.RecordCount
dr = dt.NewRow()
dr("SNO") = i
dr("Standard Description") = RS1.Fields.Item("U_ItmDes").Value
dr("ItemCode") = RS1.Fields.Item("U_ItmCde").Value
dr("Regional Name") = RS1.Fields.Item("U_ItmNme").Value
dr("UOM") = RS1.Fields.Item("U_UOM").Value
dt.Rows.Add(dr)
RS1.MoveNext()
Next
ViewState("CurrentTable") = dt
答案 0 :(得分:0)
For i As Integer = 1 To RS1.RecordCount
dr = dt.NewRow()
dr("SNO") = i
dr("Standard Description") = RS1.Fields.Item("U_ItmDes").Value
dr("ItemCode") = RS1.Fields.Item("U_ItmCde").Value
dr("Regional Name") = RS1.Fields.Item("U_ItmNme").Value
dr("UOM") = RS1.Fields.Item("U_UOM").Value
dt.Rows.Add(dr)
RS1.MoveNext()
Next
委托此代码并尝试重新构建。如果仍然出现此错误。如果没有,则此代码中存在问题