i have a big problem here when i want to insert 6 data into 6 different row in 1 click.
in field @ form it have name, staff no.,items, quantity and date.
We can select 6 items to insert which i use ComboBox for save the data in form.
In this case, each name can choose 6 items in one time and i want to save it in database just in 1 click. that mean it will put a same name in 6 rows in a table.
the look like this but it not complete...
Dim conn As New OleDbConnection("provider=microsoft.jet.OleDB.4.0;Data Source=" & Application.StartupPath & "\database.mdb") Dim sql As String = String.Empty sql = "insert into Pengurus(name, staff no.,items, quantity, date )" & "values ('" & txtQtt.Text & "', '" & txtDate.Text & "') " Try conn.Open() Dim Command As New OleDbCommand(sql, conn) Command.ExecuteNonQuery() conn.Close() end Try
but it only insert 1 item...
Edited 5 Years Ago by __avd: Added [code]..[/code] tags.