VB.NET DATAGRIDVIEW写入数据库

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

Dim sqlStr As String = "insert into tb values("

Dim i As Integer

For i = 0 To DataGridView1.Columns.Count - 1

sqlStr &= "'" &DataGridView1.Rows(DataGridView1.Rows.Count - 1).Cells(i) &"'"

If i <DataGridView1.Columns.Count - 1 Then sqlStr &= ","

Next

sqlStr &= ")"

Dim con As New SqlConnection(connectionString) '这个自己写去

con.Open()

Dim cmd As New SqlCommand(sqlStr, con)

Try

Dim result As Integer = cmd.ExecuteNonQuery()

If result >0 Then

MsgBox "添加数据成功"

Else

MsgBox "添加数据失败"

End If

Catch (ex As Exception)

MsgBox "添加数据过程发生异常,原因:" &ex.Message

End Try

End Sub

你这是向sql后台数据库写数据吗?

sqldataadapter1.update 改须指定有效的updatecommand,我一直没有看到

给你个例子你看吧:

'首先指定有效的UpdateCommand

sqlstr = "insert into Playlist(PlayName,PlayPath)values('" &TextBox4.Text.Trim &"','" &TextBox5.Text.Trim &"')"

Module1.Mycommand.CommandText = sqlstr

'增加新一行(此行必须,要不不能与后台同步,并且后面调用update会出错)

Module1.MyDataSet.Tables("Music").Rows.Add()

Module1.MyDataAdaPter.InsertCommand = Module1.Mycommand

Module1.MyDataAdaPter.Update(Module1.MyDataSet, "Music")

MsgBox("增加数据成功！！")

如果楼主熟悉VB6，可以直接在项目中添加ADODB的Com引用，这样你就可以像VB6那样 *** 作数据库了！

另外

.NET

Framework中连接数据库要用到ADO.NET。如果要 *** 作Access数据库，要用到System.Data.OleDb命名空间下的许多类。

比如按楼主所说，“我想在textbox1中显示表一中【一些数据】字段下的第一个内容”：

'首先导入命名空间

Imports

System.Data

Imports

System.Data.OleDb

'然后在某一个事件处理程序中写：

Dim

conn

As

New

OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0Data

Source=数据库.accdbJet

OLEDB:Database

Password=MyDbPassword")

Dim

command

As

New

OleDbCommand("Select

*

From

数据表",

conn)

conn.Open()

'打开数据库连接

Dim

reader

As

OleDbDataReader

=

command.ExecuteReader()

'执行SQL语句，返回OleDbDataReader

对象

Do

While

reader.Read()

'读取一条数据

textbox1.Text

+=

reader("一些数据")

&

VbCrLf

Loop

reader.Close()

'关闭OleDbDataReader

conn.Close()

'关闭连接

---