|
分類:[.NET 全般]
今、datagrid縦方向表示できましたが、updateできません。
私のコート：
Dim aatable As New Data.DataTable '新建一个数据表
aatable.Columns.Add("名前")
aatable.Columns.Add("値")
'将行ID表示列()
Dim aarow As Data.DataRow
aarow = aatable.NewRow
aarow.Item(0) = "id"
aarow.Item(1) = test.mydataset.Tables(0).Rows(max).Item("id")
aatable.Rows.Add(aarow)
'将 行VALUE表示列
Dim aarow2 As Data.DataRow
aarow2 = aatable.NewRow
aarow2.Item(0) = "Value"
aarow2.Item(1) = test.mydataset.Tables(0).Rows(max).Item("name")
aatable.Rows.Add(aarow2)
Me.DataGrid2.DataSource = aatable
DataGrid2.Enabled = True
後、datagridの上に、直接に操作して、updateできない。
ボタンのsql: Public Function Uptodabd() As Boolean
Try
Dim sqs As New ArrayList
sqs.Add("delete from testtable")
For i As Integer = 0 To mydataset.Tables(0).Rows.Count - 1
Dim sql As String = ""
sql = sql & "Insert INTO testtable(id,name)values("
sql = sql & "'" & mydataset.Tables(0).Rows(i).Item("id") & "',"
sql = sql & "'" & mydataset.Tables(0).Rows(i).Item("name") & "')"
sqs.Add(sql)
Next
If DBCONs.runsql(sqs) = True Then
Return True
Else
Return False
End If
Catch ex As Exception
Return False
End Try
End Function
どうもありがとうございました。
|