Public Sub updata()
Dim dt As DataTable = New DataTable()
Dim dr As DataRow
dt.Columns.Add(New DataColumn("name"))
Dim j As Integer
For j = 1 To 10
dr = dt.NewRow()
dr(0) = "name" + j.ToString()
dt.Rows.Add(dr)
Next
DataGrid2.DataSource = dt
DataGrid2.DataBind()
Dim conn As OleDb.OleDbConnection = New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\UserLog.mdb")
conn.Open()
Dim myAdapter As OleDb.OleDbDataAdapter = New OleDb.OleDbDataAdapter()
Dim cmd As OleDb.OleDbCommand = New OleDb.OleDbCommand("UPDATE Log SET power=@name", conn)
cmd.Parameters.Add("@name", "name")
cmd.Parameters.Item("@name").SourceColumn = dt.Columns("name").ColumnName
myAdapter.InsertCommand = cmd
myAdapter.Update(dt)
conn.Close()
End Sub
Dim dt As DataTable = New DataTable()
Dim dr As DataRow
dt.Columns.Add(New DataColumn("name"))
Dim j As Integer
For j = 1 To 10
dr = dt.NewRow()
dr(0) = "name" + j.ToString()
dt.Rows.Add(dr)
Next
DataGrid2.DataSource = dt
DataGrid2.DataBind()
Dim conn As OleDb.OleDbConnection = New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\UserLog.mdb")
conn.Open()
Dim myAdapter As OleDb.OleDbDataAdapter = New OleDb.OleDbDataAdapter()
Dim cmd As OleDb.OleDbCommand = New OleDb.OleDbCommand("UPDATE Log SET power=@name", conn)
cmd.Parameters.Add("@name", "name")
cmd.Parameters.Item("@name").SourceColumn = dt.Columns("name").ColumnName
myAdapter.InsertCommand = cmd
myAdapter.Update(dt)
conn.Close()
End Sub
解决方案 »
- 无法从其“Multiple”属性的字符串表示形式“multiple”创建“System.Boolean”类型的对象
- 购物网站侧栏导航鼠标移动到上面 右边就弹出来一个框显示子节点(在线等)
- 报了这个错
- VSS2005 使用问题
- Web入门问题,但不弄清后患无穷
- 哪位高手能给我个asp.net生成静态页面的程序或是方法?
- 请高手来讨论一下.(关于Page.Server.GetLastError()的使用)
- 我想通过硬盘序列号来注册,但有些问题~~~~
- 如何产生一个随机数,并保证每次加载页面这个数的值都不同???在线等待--------------
- asp.net 如何实现视频
- 如何在asp.net用C#实现向在一个框架转换网页???
- 程序全局静态变量提高程序效率?各位高手请看!
这样能不能直接更新 那样不是太麻烦了吗?