KONEK DATABASE
- sqlpuls/nolog
- conn sys/oracle@orcl as sysdba;
- create user audy identified by audy;
- grant connect to audy;
- conn audy/audy@orcl
- conn sys/oracle@orcl as sysdba;
- grant all privileges to audy identified by audy;
- conn audy/audy@orcl
- create table mhw (npm char(10), nama varchar2(50), alamat varchar2(50));
- insert into mhw (npm, nama, alamat) values (1635010004, 'erica', 'lmg');
- select * from mhw;
- commit;
VB CONNECTED
- new project
- add reference --> sys data oracle client
- tools --> connect to db
- toolbox --> listview --> properties --> coloumn (collection) yg ... klik
add --> text diganti nama kolom npm
add --> text diganti nama kolom nama
add --> text diganti nama kolom alamat
kalau tidak muncul, properties --> view diganti details - import sys
- inisialisasi Dim
Dim xconn
Dim xcomm
Dim dr
Dim npm, nama, alamat As String - buat sub konek --> pakai:
conn close()
conn open()
Ditaruh diatas form load - manggil konek
- new project
- add reference --> sys data oracle client
- tools --> connect to db
- toolbox --> DataGridView
- klik2x utk koding
- import sys
- Dim, dkk
- sub koneksi --> end sub
- server explore --> properties
- private sub
- ganti 32 ke 64 + password
- klik toolbox buat textbox + button
- buat label, dll
- insert into '" & .......... dll







0 komentar:
Posting Komentar