大家看看，这段代码出错了，要怎么改，谢谢，，在线等，当天结贴！！！！！！

Question

Private Sub addnewitem()
        Dim nowTable As DataTable = New DataTable("nowCartTable")
        nowTable = Session("myCartTable")
        Dim data As DataSet
        With New BusinessRule.Ecom            data = .GetPro(ID.Text)        End With        Dim newDR As DataRow        newDR = nowTable.NewRow
        newDR.Item(0) = ID.Text
        newDR.Item(1) = data.Tables(0).Rows(0).Item(2)
        newDR.Item(2) = data.Tables(0).Rows(0).Item(5)
        newDR.Item(3) = 1
        newDR.Item(4) = newDR.Item(2)
        nowTable.Rows.Add(newDR)        Session("myCartTable") = nowTable    End Sub
-----------------------------
Object reference not set to an instance of an object. 
Description: An unhandled exception occurred during the execution of the current web request. Please review the stack trace for more information about the error and where it originated in the code. Exception Details: System.NullReferenceException: Object reference not set to an instance of an object.Source Error: 
Line 147:        Dim newDR As DataRow
Line 148:
Line 149:        newDR = nowTable.NewRow
Line 150:
Line 151:Private Sub addnewitem()
        Dim nowTable As DataTable = New DataTable("nowCartTable")
        nowTable = Session("myCartTable")
        Dim data As DataSet
        With New BusinessRule.Ecom            data = .GetPro(ID.Text)        End With        Dim newDR As DataRow        newDR = nowTable.NewRow
        newDR.Item(0) = ID.Text
        newDR.Item(1) = data.Tables(0).Rows(0).Item(2)
        newDR.Item(2) = data.Tables(0).Rows(0).Item(5)
        newDR.Item(3) = 1
        newDR.Item(4) = newDR.Item(2)
        nowTable.Rows.Add(newDR)        Session("myCartTable") = nowTable    End Sub
-----------------------------
Object reference not set to an instance of an object. 
Description: An unhandled exception occurred during the execution of the current web request. Please review the stack trace for more information about the error and where it originated in the code. Exception Details: System.NullReferenceException: Object reference not set to an instance of an object.Source Error: 
Line 147:        Dim newDR As DataRow
Line 148:
Line 149:        newDR = nowTable.NewRow
Line 150:---------------------------------------------------------------说是没有实例化遍历，，，
为什么阿

Answer 1

Dim newDR As DataRow
->
Dim newDR As New DataRow
??

Answer 2

nowTable = Session("myCartTable")
==>可能是session中没有值

Answer 3

nowTable = Session("myCartTable")为空，你遍历就没有东西了，
注意检查session看看，先打印出来看有没有

Answer 4

nowTable = Session("myCartTable")
这句
你在哪定义Session("myCartTable")的?

Answer 5

为什么要把Table放到session里?会很慢