Menambah Baris Data Baru

insertSudah lama saya tidak menulis artikel tentang dasar-dasar penggunaan SQL programming dalam Visual Basic. Setelah penggunaan syntax SELECT untuk membuka data, kali ini saya akan menulis bagaimana menyimpan data baru di database MySQL kita. Saya akan menulis 2 cara untuk metode penyimpanan, yang pertama adalah melalui obyek recordset dan yang kedua melalui syntax SQL.

Dalam kasus ini misalnya saya mempunyai sebuah tabel dengan isi field: no_urut, nama_karyawan, usia.

Yang Pertama, melalui obyek recordset.

  1. Buat obyek recordset dahulu melalui variable. Tentu rekan-rekan sudah mengetahui hal ini, yaitu Dim rs As New ADODB.Recordset
  2. Untuk menyimpan sebaris data kedalam tabel tersebut adalah sebagai berikut:
    rs.Open "select * from tbl_karyawan", Conn, adOpenDynamic, adLockOptimistic
    rs.AddNew
    rs.Fields("nama_karyawan") = "Udin"
    rs.Fields("usia") = 16
    If MsgBox("Data akan disimpan?", vbYesNo) = vbYes Then
         rs.Update
    Else
         rs.CancelUpdate
    End If
    rs.Close
  3. Data anda sudah tersimpan.

Yang Kedua, melalui syntax SQL

  1. Kita akan memakai obyek koneksi anda ke database, artikel lengkap tentang obyek koneksi ke database dapat anda baca di artikel ini. Misalnya obyek koneksi kita namai dengan Conn.
  2. Scriptnya secara garis besar seperti ini:
    Dim strUpdate As String
    strInsert = "INSERT INTO tbl_karyawan(nama_karyawan, usia) VALUES ('Udin', 16)"
    Conn.Execute strInsert
  3. Data anda sudah tersimpan.

Tentu kedua metode di atas mempunyai kelemahan dan kelebihannya sendiri. Kalau saya pribadi suka memakai cara yang kedua. Tapi semua keputusan di tangan anda. Selamat mencoba.

Artikel-artikel Yang Berhubungan Dengan Artikel Ini

13 Komentar

tika  on June 19th, 2009

mat kenal admin,info yg bagus dan ini jg ad info yg menarik sebelum
ketinggalan ikutan manatau beruntung ikutan yuk…!

Willy -KL  on June 19th, 2009

wah..
mas jago VB toh?
Kebetulan VB + SQL g agak kurang.
Seterusnya keqnya g bakal nongkrong terus di Room SQL Anda..
hehhehe..

thanks

Bart. Edi  on June 22nd, 2009

@Willy-KL: Hehhehe, ya jadi programmer kecil-kecil an lah…

Web Tukang Contek » Memperbarui Data Yang Sudah Ada  on July 15th, 2009

[…] artikel tentang perintah memasukan baris data baru di Visual Basic, kali saya ingin menulis tentang memperbaharui data yang sudah ada (update data). […]

koko  on August 7th, 2009

salam kenal mas..
mas mohon bantuan. Saya ingin mengeksekusi script sql dibawah, tapi clausa where ’08/08/09 %’ pengin saya ganti dengan inputan tanggal dari form1 ‘form1.label1.caption’ supaya lebih fleksibel.. tapi saya bingung caranya memasukkannya ke script sql nya.. gimana mas, cara yang terbaik? mohon bantuannya mas

Public Sub replace()
Set rsmhs = New ADODB.Recordset
rsmhs.Open “REPLACE INTO todaytrx (`WAKTU`,`DOWNLINE`,`DOWNLINEHP`,`NOHPISI`,`KODEPRODUK`,`PENJUALAN`,`STATUS`,`SALDOAWAL`,`SALDOAKHIR`,`ID`) SELECT `WAKTU`,`DOWNLINE`,`DOWNLINEHP`,`NOHPISI`,`KODEPRODUK`,`PENJUALAN`,`STATUS`,`SALDOAWAL`,`SALDOAKHIR`,`ID` from tbstatus where waktu like ’08/08/09 %'”, con, adOpenDynamic, adLockOptimistic
End Sub

Bart. Edi  on August 7th, 2009

@koko: anda bisa menggunakan cara seperti ini: bla..blaa... FROM waktu ='" & label1.caption & "', con, bla.....

Memperbarui Data Yang Sudah Ada | Edi Susanto dot Com  on December 18th, 2009

[…] artikel tentang perintah memasukan baris data baru di Visual Basic, kali saya ingin menulis tentang memperbaharui data yang sudah ada (update data). […]

iwan  on January 19th, 2010

ms ap perbedaan antara kode penambahan bris baru untk data di vb dengan bhsa vb yaitu recordset addnew atau dengan bhsa sql insert into. untk proyek yang agak besr yang mana baik digunakan. kalo saya kebiasan make recordset. tnks ms

pojokkambing  on October 5th, 2010

tanya kang, kalo mau nampilin beberapa data ke dalam label ato text box gmana yah caranya…
trims…

ben  on December 6th, 2011

refresh datagrid nya bagaimana?

designer furniture  on May 1st, 2012

This is the first time I am visiting your blog and happy to read this post. I found this post is really useful one. I love reading this kind of stuff. Your blog is one of a kind, i love the way you organize the topics.

Andriansyah Ashari  on June 16th, 2012

wah saya sering mengalami kendala yang sama. coba dulu cara diatas, barangkali bisa…

devid  on May 20th, 2015

mas mau tanya q lg bikin program,, vb.net pke Mysql database
q pengen klo tombol combo box q gk cma bsa d klik trus rool k bawah mncul isinya,,
q pengen klo ketik datanya d combo bok otomatis jg rool kbwah
intinya combo box gk cuma d klik tp jga bisa d ketik
terima kasih sebelumya

Berikan opini anda tentang artikel ini

CommentLuv badge