dan untuk update ubah saja di msql nya
Private Sub cmdSimpan_Click()
Dim msql As String
'Mengisi Record ke Tabel
cnn.BeginTrans
msql = " INSERT INTO tbAnggota(Kode," & _
" Nama,Alamat)" & _
" VALUES('" & txtKode.Text & "'," & _
" '" & txtNama.Text & "'," & _
" '" & txtAlamat.Text & "')"
cnn.Execute (msql)
'Menghapus teks
txtKode.Text = ""
txtNama.Text = ""
txtAlamat.Text = ""
cnn.CommitTrans
End Sub
Private Sub Form_Load()
'Membuat sebuah koneksi
Set cnn = New ADODB.Connection
'Membuka koneksi dengan ODBC Driver Aplikasi
cnn.Open "Aplikasi"
End Sub
----- Original Message -----
From: "Nurdin Sidiq" <[EMAIL PROTECTED]>
To: <[email protected]>
Sent: Monday, May 01, 2006 11:06 AM
Subject: [Programmer-VB] Gmn Koneksi Client-Server
> saya baru belajar VB..
>
> Tolong minta contoh program u/ koneksi client-server
> saya pakai dtbase Acsses
>
> yg penting bisa Simpan & Update
>
> Thanks
>
>
>
>
>
>
> Wahana Programmer Groups Links
>
>
>
>
> Yahoo! Groups Links
>
>
>
>
>
>
Wahana Programmer Groups Links
<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
http://wahanaprogrammer.net
<*> Untuk menghubungi owner milis ini, kirim email ke:
[EMAIL PROTECTED]
<*> Konsultasi pemrogramman bisa chat disini:
Yahoo! Messenger: wahanaprogrammer
SPONSORED LINKS
| Programmer | Indonesia | Basic programming language |
| Computer programming languages | Programming languages | Java programming language |
YAHOO! GROUPS LINKS
- Visit your group "Programmer-VB" on the web.
- To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
- Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
