Penggunaan SQL ANALYZER

Nama              : Zaenur Rohman

NIM                  : SIR200933

Mata Kuliah   : Database Server

Dosen             : Jatmiko Indrianto, S.Kom

Membuat Perintah DML  dengan SQL ANALYZER

   

     Untuk latihan awal kita gunakan query dasar seperti  create, select, insert, update dan delete.

Untuk memunculkan SQL Query Analyzer, kita buka SQL Server Enterprise Manager > Tool> SQL Query Analyzer

Lalu muncullah window untuk mengetikkan query, disinilah kita akan bereksperimen dengan syntax. Sebelum meng-run program klik tanda centang (sebelah run) untuk mengecek apakah syntax yang kita ketikkan eror atau tidak. Jika sukses lalu klik run, di-message akan ada notifikasi perubahan apa yang terjadi. Jika anda ingin men-save query klik save dan hasilnya adalah *.sql . Setiap query disimpan dengan 1 file *.sql.

Berikut beberapa syntax untuk membuat DML :

1.      Membuat Database Baru

CREATE DATABASE dbKonter

2.      Membuat Tabel

CREATE TABLE PERDANA

(Kodebr Numeric (5),

Namabr Varchar (20),

Primary Key (Kodebr))

3.      Menyeleksi tabel

select  * FROM PERDANA

4.      Memasukan data ke dalam tabel

Insert into PERDANA values('01','SIMPATI')

5.      Menghapus tabel

Delete from PERDANA

6.      Meng-update data dalam tabel 
      Update PERDANA Set Namabr ='XL' Where Kodebr ='01'

MEMBUAT DATABASE DENGAN QUERY ANALYZER DAN PENGGUNAAN STORE PROCEDURE

YANG DITERAPKAN DI MICROSOFT VISUAL BASIC 6.0

          Apakah Store Procedure itu? Store Procedure adalah perintah yang kita buat dan kita simpan untuk sewaktu-waktu kita panggil, jadi jika kita sering menggunakan perintah tersebut kita tidak usah berulang kali mengetik syntax kita memanggil prosedur yang kita sudah buat itu hal ini juga memperingan kinerja server dibanding kita menggunakan view. Store Procedure yang kita simpan akan muncul pada Store Procedure database yang bersangkutan. Berikut table dan keterangan penggunaan store procedure :

1.    Membuat database dengan Query analyzer

Bukalah query analyzer pada SQL Server 2000 pada menu Tools pilih SQL Query Analyzer. Kemudian ketikan perintah berikut:

CREATE DATABASE DBTOKO

2.    Membuat Tabel BARANG

Perintah untuk membuat table barang yaitu:

CREATE TABLE BARANG

(KODE_BRG VARCHAR (10),

NAMA_BRG  VARCHAR (20),

PRODUK_BRG VARCHAR (20),

HARGA_BRG VARCHAR (20) 

PRIMARY KEY (KODE_BRG))

3.    Memasukkan Data dengan store procedure dan menjalankannya di sql query analyzer

Untuk membuat store procedure memasukkan data yaitu klik kanan pada Store Procedure kemudian klik New Store Procedure. Ketikkan perintah

CREATE PROCEDURE ENTRY @KODE VARCHAR (10), @NAMA  VARCHAR (20),@PRODUK VARCHAR(20), @HARGA VARCHAR (20) AS

INSERT INTO BARANG (KODE_BRG, NAMA_BRG, PRODUK_BRG, HARGA_BRG) VALUES (@KODE, @NAMA, @PRODUK, @HARGA)

GO

Untuk menjalankan store procedure masukkan perintah berikut ke new SQL Analyzer

EXEC ENTRY 'A001',AS','TELKOMSEL','10000'.

Dimana ENTRY adalah nama Store Procedure.

4.    Menampilkan Data

Buat store procedure TAMPIL dengan perintah seperti di bawah ini:

CREATE PROCEDURE TAMPIL @KODE NVARCHAR (20) AS

SELECT*FROM BARANG WHERE KODE_BRG=@KODE_BRG

GO

Jalankan perintah tersebut di SQL Query Analyzer dengan mengetikkan perintah:

EXEC TAMPIL 'A001'

Dimana TAMPIL adalah nama Store Procedure

MENERAPKAN STORE PROCEDURE DI MICROSOFT VISUAL BASIC 6.0

1.    Sebelum kita membuat form, Klik Project -> Reference -> Microsoft ActiveX Data Objects 2.5 library. Buatlah tampilan form seperti dibawah ini:

Keterangan:

-       TextBox

Text1 untuk kode barang

Text2 untuk nama barang

Text3 untuk produk barang

Text4 untuk harga barang

-       CommandButton

Command1 untuk VIEW

Command2 untuk SAVE

Command3 untuk EXIT

Command4 untuk REPEAT

2.    Setelah membuat form seperti di atas, kita masukkan koding yang ada di bawah ini:

‘Untuk mengkosongkan textbox

Private Sub Command4_Click()

Text1.Text = ""

Text2.Text = ""

Text3.Text = ""

Text4.Text = ""

End Sub

Private Sub Form_Load()

KONEKSI.Open "Provider=MSDASQL.1;Persist Security Info=False;Data Source=ODBC_BRG;Initial Catalog=DBTOKO""

End Sub

‘Untuk menampilkan data

Private Sub Command1_Click()

Dim PARAMETER1 As New ADODB.PARAMETER

  Dim COMAND1 As New ADODB.Command

  Dim RS1 As New ADODB.Recordset

  With COMAND1

    .ActiveConnection = KONEKSI

    .CommandType = adCmdStoredProc

    .CommandText = "TAMPIL"

    Set PARAMETER1 = .CreateParameter("KODE_BRG", adVarChar, adParamInput, 20, Text1.Text)

.Parameters.Append PARAMETER1

Set RS1 = .Execute

  End With

  Text2.Text = RS1.Fields("NAMA_BRG")

  Text3.Text = RS1.Fields("PRODUK_BRG")

  Text4.Text = RS1.Fields("HARGA_BRG")

End Sub

‘Untuk menginputkan/menyimpan data

Private Sub Command2_Click()

 Dim PARAMETER As New ADODB.PARAMETER

  Dim COMAND As New ADODB.Command

  Dim RS As New ADODB.Recordset

  With COMAND

    .ActiveConnection = KONEKSI

    .CommandType = adCmdStoredProc

    .CommandText = "ENTRY"

    Set PARAMETER = .CreateParameter("KODE_BRG", adVarChar, adParamInput, 20, Text1.Text)

.Parameters.Append PARAMETER

KONEKSI.Execute "ENTRY '" & Text1.Text & "','" & Text2.Text & "','" & Text3.Text & "','" & Text4.Text & "'"

X = MsgBox("DATA TELAH TERSIMPAN", vbInformation, "INFORMASI")

  End With

End Sub

Private Sub Command3_Click()

End

End Sub

3.    Setelah selesai, kita coba untuk menjalankannya dengan  memasukkan / menyimpan data, misalkan seperti gambar di bawah ini:

Setelah kita klik tombol “SAVE”, Akan muncul msgbox untuk konfirmasi.

4.    Kita dapat melihat apakah data tersebut sudah tersimpan atau belum dengan membuka database DBTOKO dengan table BARANG diSQL Server.

5.    Menjalankan untuk menampilkan data, misalkan data yang dicari A001. Setelah diketikkan di Kode Barang, kemudian klik tombol “VIEW”. Maka akan terlihat seperti di bawah ini:

Sumber referensi klik di sini

http://xbasicpro.com/training/vb6db/vb6_stored_procedure.aspx