vb.net информация в DataGridView1 не сохраняется

Язык Visual Basic на платформе .NET.

Модераторы: Ramzes, Sebas

vitebskstar
Начинающий
Начинающий
 
Сообщения: 2
Зарегистрирован: 03.11.2008 (Пн) 20:58

vb.net информация в DataGridView1 не сохраняется

Сообщение vitebskstar » 26.06.2009 (Пт) 8:00

создал DataGridView1, привязал к ней таблицу из акцесса, изменяю данные в таблице а она в итоге после закрытия не изменяется. тут есть специалисты которые могут помочь? у меня VS 2008 Спасибо

Viper
Артефакт VBStreets
Артефакт VBStreets
Аватара пользователя
 
Сообщения: 4394
Зарегистрирован: 12.04.2005 (Вт) 17:50
Откуда: Н.Новгород

Re: vb.net информация в DataGridView1 не сохраняется

Сообщение Viper » 26.06.2009 (Пт) 10:58

Специалисты есть, а вот телепатов нет - показывай как и что делал.
Весь мир матрица, а мы в нем потоки байтов!

Williams
Гуру
Гуру
Аватара пользователя
 
Сообщения: 1280
Зарегистрирован: 06.05.2008 (Вт) 18:35
Откуда: System.Reflection.Williams (увидел себя в зеркале :))

Re: vb.net информация в DataGridView1 не сохраняется

Сообщение Williams » 26.06.2009 (Пт) 11:50

Обычно это так:
DataAdapter.Update(DataSet)
И вы думаете, что вас оставят в живых после прочтения этого поста?

vitebskstar
Начинающий
Начинающий
 
Сообщения: 2
Зарегистрирован: 03.11.2008 (Пн) 20:58

Re: vb.net информация в DataGridView1 не сохраняется

Сообщение vitebskstar » 26.06.2009 (Пт) 13:01

пробовал с помощью конструктора, потом добавлял это для сохранения:
ULTableAdapter.Update(Me.BasaDataSet)
ULTableAdapter.Update(BasaDataSet)
ULTableAdapter.Update(DirectCast(DataGridView1.DataSource, basaDataSet))
эти три не работают.

эсть и такой варинат, тока как теперь данные из DataGridView1 опять в базу поместить и сохранить?

Imports System.Data.OleDb

Public Class Form1



Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Using conn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=C:\Termofol\Заказ материала\basa.mdb")

conn.Open()
Dim cmd As New OleDbCommand("SELECT * FROM UL", conn)
Dim DR As OleDbDataReader = cmd.ExecuteReader()
DataGridView1.DataSource = cmd.ExecuteReader
Do While DR.Read()
If DataGridView1.Columns.Count <= 0 Then
'добавляем колонки
For i As Integer = 1 To DR.FieldCount
Dim c As New DataGridViewTextBoxColumn()
c.HeaderText = "Колонка " & i.ToString()
DataGridView1.Columns.Add(c)
Next
End If
Dim r As New DataGridViewRow()
For i As Integer = 0 To DR.FieldCount - 1
Dim cel As New DataGridViewTextBoxCell()
cel.Value = DR(i)
r.Cells.Add(cel)
Next
DataGridView1.Rows.Add(r)
Application.DoEvents() 'чтоб не зависнуть
Loop
End Using

End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Using conn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=C:\Termofol\Заказ материала\basa.mdb")
'Сохранить
Dim SelectText1
Dim adapter
SelectText1 = "SELECT * FROM UL"
adapter = New OleDbDataAdapter(SelectText1, conn)

Dim ds As New DataSet()
adapter.Fill(ds)
conn.Open()
adapter.Update(ds)
conn.Close()

End Using



Williams писал(а):Обычно это так:
DataAdapter.Update(DataSet)


Вернуться в Visual Basic .NET

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 87

    TopList