ineer在vb.net中加入访问如何更新tow表 [英] ineer join in access in vb.net how to update tow table

问题描述

我正在制作拖曳表，其中ineer连接需要保存并更新我需要更改的程序并更新它这是我的鳕鱼连接

  try  
 cmd.CommandText =   SELECT Employee.Emp_ID ，Employee.Emp_Name，Employee.Emp_Tel，Dep_Name FROM Employee，Departmentee Employee.Dep_id = Department.Dep_id 
 
 DataAdapter1 =  New  OleDbDataAdapter（cmd）
  Dim  builder  As  新 OleDbCommandBuilder（DataAdapter1）
 
 DataSet1 = 新 DataSet（）
 
  将一些数据加载到DGV  
 DataAdapter1.Fill（DataSet1，  DataTable1）
 BindingSource1 = 新 BindingSource（DataSet1，  DataTable1）
 BindingSource2 = 新 BindingSource（DataSet1，  DataTable1）
 
 Label7.DataBindings.Add（ 文本，
 BindingSource1，  Emp_ID， True ， 1 ， < span class =code-string>）
 
 TextBox1.DataBindings.Add（  Text，BindingSource1，  Emp_Name， True ， 1 ， ）
 TextBox2.DataBindings.Add（  Text，BindingSource1，  Emp_Tel， True ， 1 ， < span class =code-string>）
 TextBox3.DataBindings.Add（ 文本，BindingSource1，  Dep_Name， True ， 1 ， ）
 '  TextBox4.DataBindings.Add（Text，BindingSource1，price，True ，1，） 
 '  TextBox5.DataBindings.Add （Text，BindingSource1，total，True，1，） 
 
 DataGridView1.DataSource = BindingSource1 
 ComboBox1.DataSource = BindingSource1 
 ComboBox1。 DisplayMember =   Emp_Name 
 ComboBox1.AutoCompleteMode = AutoCompleteMode.SuggestAppend 
 ComboBox1。 AutoCompleteSource = AutoCompleteSource.ListItems 
 
 DataGridView1.Columns（ 0 ）。宽度=  40  
 DataGridView1.Columns（ 1 ）。宽度=  100  
 DataGridView1.Columns （ 2 ）。宽度=  70  
 DataGridView1.Columns（ 3 ）。宽度=  70  
 '  DataGridView1.Columns（4）.Width = 70  
 '  DataGridView1.Columns（5）.Width = 100  
 
 DataGridView1.Columns（ 0 ）。HeaderText =   ????? 
 DataGridView1.Columns（ 1 ）。HeaderText =  ？ ???? 
 DataGridView1.Columns（ 2 ）。HeaderText =   ?????? 
 DataGridView1.Columns（ 3 ）。HeaderText = < span class =code-string>  ?????? 
 '   DataGridView1.Columns（4）.HeaderText =????? 
 '  DataGridView1.Columns（5）.HeaderText =???????? 
 
 DataGridView1.Columns（ 2 ）。AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill 
 DataGridView1.Columns（ 0 ）。 ReadOnly  =  True  
 DataGridView1.ColumnHeadersDefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter 
 DataGridView1.DefaultCellStyle.Alignment = DataGridViewContentAlignment .MiddleCenter 
 DataGridView1.Sort（DataGridView1.Columns（ 1 ），System.ComponentModel.ListSortDirection.Ascending）
 count（）
  Catch  ex  As 异常
 MessageBox.Show（ex.Message，  ?????，MessageBoxButtons.OK，MessageBoxIcon。错误）
 结束 尝试 

和这段代码使得更新吃拖鞋



buton _click

 如果 BindingSource1.Count =  0  然后 Beep（）：退出  Sub  
 BindingSource1.EndEdit（）
 DataAdapter1.Update（DataSet1，   DataTable1）
 count（）

解决方案

< blockquote> DataAdapter1.Update（DataSet1，DataTable1）

以上语句错误。 DataTable1中有一个空格。你不必调用表格部分。

你可以说Adapter.Update（DataSet）。



其他原因可以找到只有你已经发布了你提供更新查询的方式。

monem



prpplem是stil错误而且不保存任何任何人都可以帮我解决这个问题

im making tow table where ineer join connect awanted to save and update an iwanted to change in my program and update it this is my cod to connect

try
    cmd.CommandText = "SELECT Employee.Emp_ID ,Employee.Emp_Name ,Employee.Emp_Tel , Dep_Name FROM Employee , Department where Employee.Dep_id = Department.Dep_id "

    DataAdapter1 = New OleDbDataAdapter(cmd)
    Dim builder As New OleDbCommandBuilder(DataAdapter1)

    DataSet1 = New DataSet()

    'Load some data into the DGV
    DataAdapter1.Fill(DataSet1, "DataTable1")
    BindingSource1 = New BindingSource(DataSet1, "DataTable1")
    BindingSource2 = New BindingSource(DataSet1, "DataTable1")

    Label7.DataBindings.Add("Text",
    BindingSource1, "Emp_ID", True, 1, "")

    TextBox1.DataBindings.Add("Text", BindingSource1, "Emp_Name", True, 1, "")
    TextBox2.DataBindings.Add("Text", BindingSource1, "Emp_Tel", True, 1, "")
    TextBox3.DataBindings.Add("Text", BindingSource1, "Dep_Name", True, 1, "")
    ' TextBox4.DataBindings.Add("Text", BindingSource1, "price", True, 1, "")
    ' TextBox5.DataBindings.Add("Text", BindingSource1, "total", True, 1, "")

    DataGridView1.DataSource = BindingSource1
    ComboBox1.DataSource = BindingSource1
    ComboBox1.DisplayMember = "Emp_Name"
    ComboBox1.AutoCompleteMode = AutoCompleteMode.SuggestAppend
    ComboBox1.AutoCompleteSource = AutoCompleteSource.ListItems

    DataGridView1.Columns(0).Width = 40
    DataGridView1.Columns(1).Width = 100
    DataGridView1.Columns(2).Width = 70
    DataGridView1.Columns(3).Width = 70
    ' DataGridView1.Columns(4).Width = 70
    ' DataGridView1.Columns(5).Width = 100

    DataGridView1.Columns(0).HeaderText = "?????"
    DataGridView1.Columns(1).HeaderText = "?????"
    DataGridView1.Columns(2).HeaderText = "??????"
    DataGridView1.Columns(3).HeaderText = "??????"
    ' DataGridView1.Columns(4).HeaderText = "?????"
    ' DataGridView1.Columns(5).HeaderText = "????????"

    DataGridView1.Columns(2).AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill
    DataGridView1.Columns(0).ReadOnly = True
    DataGridView1.ColumnHeadersDefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter
    DataGridView1.DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter
    DataGridView1.Sort(DataGridView1.Columns(1), System.ComponentModel.ListSortDirection.Ascending)
    count()
Catch ex As Exception
    MessageBox.Show(ex.Message, "?????", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try

and this code make proplem to update tow taple

buton _click

If BindingSource1.Count = 0 Then Beep() : Exit Sub
    BindingSource1.EndEdit()
    DataAdapter1.Update(DataSet1, "DataTable1 ")
    count()

解决方案

DataAdapter1.Update(DataSet1, "DataTable1 ")
The above statement is wrong. DataTable1 has a space in it. You dont have to call the table part.
You can just say Adapter.Update(DataSet).

Other reasons can be found out only if you have posted how you have provided your updation queries.

monem

the prpplem was stil error and dont save any thing plese any one to help me to solve this proplem

这篇关于ineer在vb.net中加入访问如何更新tow表的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！