Dim OA As String = e.Cookies("openid") '获取openid
Dim KC As String = e.GetValues("kcid") '获取课程ID
Dim dt As D ataTable
Dim Cols1() As String = {OA,KC,"习题ID","习题类型","习题题目","正确答案","习题解析",1,Date.Now,Date.Now}
Dim Cols2() As String = {"OpenID","课程ID","习题ID","习题类型","习题题目","正确答案","习题解析","练习次数","生成时间","ActiveTime"}
c md.CommandText = "Se lect * fro m XL_T习题明细清单 Wh ere 选择归属= '" & KC & "'"
dt = cm d.ExecuteReader()
For Each dr1 As DataRow In dt.DataRows
Dim dr2 As DataRow = DataTables("TmInfos").AddNew()
For i As Integer = 0 To Cols1.Length -1
dr2(Cols2(i)) = dr1(Cols1(i))
Next
Next
列“oWhWn1Sv3O4m43nBJRrAUpmGiF0A”不属于表 。
在 System.Data.DataRow.GetDataColumn(String columnName)
在 System.Data.DataRow.get_Item(String columnName, DataRowVersion version)
在 Foxtable.DataRow.get_Item(String ColumnName)
在 UserCode.A3xyNgbmSlSoidvSg(Object[] Args)