VISUAL BASIC 6.0 DAN SQL SERVER

Dalam keseharian kita mengenal visual basic sebagai saran pemrograman, tetapi visual basic juga bisa digunakan dalam database SQL Server. Dimana dalam Peranti Visual Database VB 6.0 banyak membantu programer dalam kelancaran penulisan penulisan program melalui PC Client/Workstation, seperti misalnya mengkode sebuah Stored Procedure karena tidak mungkin melakukan hal tersebut pada komputer server dimana SQL dijalankan. Walaupun peranti ini bermanfaat, tetapi hanya aktivitas yang berhubungan dengan penulisan program saja yang dapat dilakukannya. Sedangkan untuk pembuatan database, membuat user baru, memberi hak akses dan hal lainnya tetap harus dilakukan pada PC dimana SQL Server dijalankan.
Ada beberapa cara mengakses database, diantaranya adalah : model ADO (ActiveX Data Objek), DAO (Data Access Object), atau melalui VB 6.0, yaitu DED (Data Environment Designer) dan ADODC (ADO Data Connection).
Mengakses Database Dengan Menggunakan Script pada Visual Basic
Kita juga dapat untuk mengakses database melalui kode program pada Visual Basic. Proses ini dapat dilakukan dengan membuat variabel Global yang mewakili ADODB Connection. Setelah itu dilanjutkan dengan membuat setting ADODB Connection dan membuat setting ADODC Source. Setelah tahap – tahap tersebut selesai, tinggal membuat script utama program yang berisikan perintah untuk melakukan pemanggilan terhadap tabel yang ingin di tampilkan dari Enterprise Manager dan untuk menghindari adanya terjadi konflik dan melakukan pembebasan terhadap memori yang digunakan maka perlu dibuat juga sebuah script untuk menghindarinya. Berikut ini salah satu contoh langkah kerja dalam VB:
> Menambah data dalam tabel melalui script VB
Ketikkan baris program berikut dalam button yang telah di buat pada VB.
Contoh:
ADOCon As New ADODB.Conection // Objek yang menciptakan koneksi dengan database
Private Sub Command1_Click()
Dim SQLText As String
SetConn
SQLText = "Insert Into AlbumList values ('" & Text1.Text & "' , '" & Text2.Text & "' , '" & Text3.Text & "' , " & Text4.Text & " , " & Text5.Text & " , " & Text6.Text & ")"
ADOCon.Execute SQLText
With Adodc1
.RecordSource = "select * from AlbumList"
.Refresh
End With
ADOCon.Close
End Sub
> Meng-update data dalam tabel melalui script VB
Ketikkan baris program berikut dalam button yang telah di buat pada VB.
Private Sub Command2_Click()
Dim SQLText As String
SetConn
SQLText = "Update AlbumList set [Album_Title] ='" & Text2.Text & "', [Album_Singer] ='" & Text3.Text & "', [Album_Unit] ='" & Text4.Text & "', [Album_Price] =" & Text5.Text & ", [Album_Stock_Qty] ='" & Text6.Text & "' where [Album_ID] = '" & Text1.Text & "'"
ADOCon.Execute SQLText
With Adodc1
.RecordSource = "Select * from AlbumList"
.Refresh
End With
ADOCon.Close
End Sub
> Menghapus data dalam tabel melalui script VB
Ketikkan baris program berikut dalam button yang telah di buat pada VB.
Private Sub Command3_Click()
Dim SQLText As String
SetConn
SQLText = "delete from AlbumList where Album_ID=" & Text7.Text & ""
Text7.Text = ""
ADOCon.Execute SQLText
With Adodc1
.RecordSource = "select * from AlbumList"
.Refresh
End With
ADOCon.Close
End Sub

baca selengkapnya

por dunia ku ~ Rabu, 17 Juni 2009 1 komentar

KELAKUAN USIL MAHASISWA

PENGALAMAN USIL...... inilah yang diperbuat masiswa klo teman nya tertidur dengan nyenyaknya he..... untung bukan saya jadi tumbal dalam photo ini he.......
kejadian yang sangat memprihatinkan ini terjadi tepatnya selagi teman ku lagih ngerjain tugas.......
ini lah sebab nya klo teman ku udah kecapean bergadang pastinya ada dari salah satu teman saya tidur...... dan dari sekian banyak temn yang masih melek ngerjain kelakuan aneh-aneh terhadap temn yang sedang tdr..... he...... seperti photo ini lah salah satu contoh kelakuan mahasiswa yang iseng...... he......

baca selengkapnya

por dunia ku ~ Senin, 15 Juni 2009 1 komentar

BELAJAR CARA BUAT MOTION SHAPE

baca selengkapnya

por dunia ku ~ 0 komentar

Cerita Seram

Pernahkah anda berpikir kita hidup sebagai manusia memiliki dua alam yaitu alam mausia dan yang satu nya alam gaib....
Disamping adalah gambar dari sebuah hantu dimana dia juga dulu nya manusia etah kenapa dia sudah jadi hantu....
Tapi hidup itu adalah rancangan dari tuhan kita tidak mengetahui apa yang sebenarnya terjadi apabila kita mati nantinya...
Dua alam yang berbeda ini merupakan keajaiban dunia kenapa saya bila begitu.... Karna manusia ditakdirkan mati.... Etah dia mati secara wajar atau pun tidak wajar.... Kebanyakan dijaman modern ini banyak tidak percaya akan hal mistik dimana manusia hanya mementingkan dirinya saja dan mementingkan kesenangan pribadi....

manusia tidak bisa melihat hal-hal yang aneh seperti hantu.... Tapi hantu bisa melihat kita apa yang diperbuat kita baik atau pun buruk.... Asalkan selama manusia tidak mengganggu alam dia aja apabila manusia mengganggu alam nya dia akan marah kepada manusia yang mengganggunya aja....ada pula jenis setan yang mengganggu dia biasa nya datang disaat manusia lemah iman, contohnya saja disaat kita melamun....... Dia datang dengan memasuki tubuh manusia.... Untuk menghindar supaya kita melamun dengan kita berdoa atau pun mencoba menghibur diri kita dengan bernyanyi....
Manusia jug bisa melihat hantu di karenakan dia memiliki bakat dari keturunan atau pun pemberian disaat dia lahir......
Jadi jangan lah buat hantu marah apabila anda tidak ingin diganggunya..... Dan jangan melamun apa bila tidak ingin tubuhnya dikendalikan oleh setan....!!!

baca selengkapnya

por dunia ku ~ Kamis, 30 April 2009 13 komentar

Pengaruh Pemakai Handphone Pada Pendengaran Anak

Handphone atau biasa disebut juga dengan panggilan hp, bukan merupakan barang asing bagi semua masyarakat diindonesia. Handphone sudah sudah banyak memiliki, termasuk anak-anak sekalipun. Hanya saja bagi orang tua harus hati-hati untuk membekali handphone pada anak-anak. Meski pun handphone mungkin ada manfaat positifnya tetapi ada juga dampak negatifnya. Apabila pengguna tidak terkontrol dan terarah, disamping menyebabkan pemborosan pulsa bisa juga dikhawatirkan disalah gunakan untuk mengakses situs porno dari internet.
Pengaruh pengguna telepon selular pada anak-anak bisa bermacam-macam, tergantung lama pembicaran dan tinggi rendahnya nadanya. Jika frekuensi paparan bunyi hanya sebentar, si anak-anak tidak mengalami gangguan pendengaran. Tetapi jika dia menggunakan terlalu lama telepon selular terlalu lama untuk berbicara, pendengaran si anak bisa terganggu.
Pada anak-anak, gejala yang pertama kali terlihat adalah telinga terdengung. Lama-kelamaan, ia akan mengalami penurunan frekuensi pada nada tingginya. Artinya begitu frekuensi anda tinggi, telinganya langsung terdengung…….!!!!
Disaran bagi semua dan anak-anak untuk tidak menggunakan satu telinga saja untuk menelepon. Sebaiknya bergantian antara telinga kiri dan kanan agar tidak terjadi pengaruh buruk bagi telinga....!!!!

baca selengkapnya

por dunia ku ~ 0 komentar

CERITA-CERITA HUMOR

Tau kah ada pada jaman sekarang ini jaman modern, dimana pada jaman yang serba canggih ini, ada beberapa jenis penyakit (virus) berbahaya yang menyerang manusia, diantaranya:

1. penyakit Malas
Penyakit yang disebabkan oleh virus SSG (Suka Suka Gue) ini gampang menyerang pada anak-anak remaja, tetapi kalau tidak hati-hati orang tua pun bisa kena.
Gejala-gejalanya :
• biasanya nafsu makan tinggi, badan cepat besar, bongsor, gemuk dan bawaannya pingin happy-happy, senang-senang melulu, dan ogah menderita.
• malas, lesu dan badan mudah capek dalam bekerja atau belajar, maka biasanya pasien menjadi lebih suka menonton dari pada membaca dan bermain daripada belajar atau bekerja.
• Sebagai akibatnya daya tahan tubuh turun, mudah ngantuk, mudah lupa dan akan menaikkan kadar kolestrol.
Penyakit ini susah disembuhkan. Sampai sekarang ini belum ada obat yang manjur untuk mengatasinya. Ini sangat merepotkan keluarga, guru, bahkan Tuhan pun pusing! (pasangan hidup pusing!) Ha……

2. Penyakit Gila Harta
Penyakit ini disebabkan oleh virus HUU (Hidup Untuk Uang). Biasanya menyerang kaum dewasa yang sudah bekerja, alias tahu duit. Lebih ganas daripada Anjing Gila atau Sapi Gila.
Gejala-gejalanya :
Mata menjadi hijau (alias mata duitan !)
Tenggorokan kering dan terasa haus terus (haus uang, haus barang, haus sukses dll.)
Susah tidur, otak berputar-putar terus!
Pasien ini hanya bisa tidur 3-4 jam saja sehari.
Kalau sudah parah, penyakit ini akan membuat pasiennya hilang ingatan. Maka perlu cepat-cepat dilarikan ke Gereja atau tempat-tempat Jiarah. Jika perlu, setelah konsultasi dengan dokter, boleh juga diminta opname di rumah HA…...

3. Penyakit Shopping.
Penyakit ini biasa menyerang kaum wanita, terutama umur 18-55 tahun.
Gejala-gejalanya:
• Kalau melihat baju dan sepatu baru, mata susah berkedip, wajah berbinar-binar, tangan gemetaran dan mulut ngiler.
• Kaki tak bisa diam, tak betah di rumah, dan pingin keluyuran melulu ke mall dan supermarket. Kalau sudah parah, penyakit ini tidak tanggung-tanggung serangannya. Stadium 2 : dompet sendiri. Stadium 3 : dompet teman alias ngutang. Stadium 4 : dompet suami bisa amblas HA…….
Sekian berbagi-bagi cerita dari saya mohon dikasih komentarnya ya….. ha……^_^

baca selengkapnya

por dunia ku ~ Selasa, 21 April 2009 0 komentar