undefined
undefined

Jalankan MP3 dengan VB 6.0 (bag.2)

Jalankan MP3 tanpa OCX (bag.2)Pada artilkel sebelumnya, kita telah mendeklarasikan hal-hal yang diperlukan. sekarang ini, masuklah kita kepada menulis fugnsi-fungsi yang diperlukan dan mencegat beberapa event.Fungsi yang diperlukan adalah:Public Function MP3Play(wndHandle As Long,sFileName As String)Dim cmdToDo As String * 255Dim dwReturn As LongDim ret As String * 128Dim tmp As String * 255Dim lenShort As LongDim ShortPathAndFie As String, glo_HWND As LongIf Dir(sFileName) = "" ThenmmOpen = "Error...
Read more

undefined
undefined

Jalankan MP3 dengan VB 6.0 (bag.1)

Jalankan MP3 tanpa OCX dengan VB 6.0Tip kali ini adalah membuat sebuah player sederhana MP3 dengan menggunakan VB. Tidak seperti program-program lain yang menggunakan control atau komponen OCX, aplikasi inihanya menggunakan pemanggilan fungsi API.Fungsi API yang penting dalam membuat aplikasi ini adalah fungsi mciSendString. Fungsi mciSendString berguna untuk mengirimkan perintahke device MCI. Jika sukses maka return value atau nilai yang dikembalikan...
Read more

undefined
undefined

Menggerakkan Image dengan Java Script

Window pop-up adalah suatu window yang muncul ketika kita membuka sebuah halaman baru. Biasanya, window pop-up menampilkan iklan yang berhubungan dengan situs yang dibuka. Karena mengganggu, maka biasanya window pop-up diblok agar tidak muncul.Tip kali ini adalah membuat sebuah window pop-up yang "sopan". Window pop-up hanya muncul sekali dalam satu hari. Jika window pop-up ini sudah muncul hari ini, maka data kemunculan tersebut akan disimpan di cookie untuk mencegah kemunculan yang kedua kali...
Read more

undefined
undefined

Database dengan Visual Basic 6.0 (part 2)

Pada artikel sebelumnya, kita telah membuat database access, form1 pada Visual Basic Proyek.Nah, sekarang kita akan mengisikan form 1 dengan listing program. Klik kanan form tersebut, lalu pilih "view code:'Pada Form ( Untuk Koneksi Data1 ke database access versi 97 )Private Sub Form_Load()Data1.DatabaseName = App.Path + "\dataku.mdb"Data1.RecordSource = "Mhs"End Sub'Pada Text1 ( Ingat eventnya Keypress bukan change ) :Private Sub Text1_KeyPress(KeyAscii...
Read more

undefined
undefined

Database dengan Visual Basic 6.0 (part 1)

A. Koneksi Database.Sebagai Latihan awal, buatlah database di Ms.Access Simpan diD:\nama_nim\data1.mdb. Buatlah table dengan nama MHS sebagai berikut :Kemudian jika perlu, isi field-filed pada NIM, Nama dan Alamat sebagai contoh.Save, kemudian, lihat versi office anda, jika bukan versi 1997 ( office 2000 atau XP ),maka konversikan ke 1997 format, caranya :Klik Tools, Database utilities, Convert database, to Access 97 format. Simpan di folder yang...
Read more

undefined
undefined

Kelebihan dan Kekurangan Java Sript

Setiap bahasa pemrograman pasti mempunyai kelebihan dan kekurangannya. begitupun dengan JavaSript. Adapun kelebihan JavaScript antara lain yaitu :Cepat, karena diletakkan di halaman HTML, dan dapat langsung dicoba di browser.Mudah, karena memiliki sediit sintaks.Terbuka, (Platform Independent).Ukurannya sangat kecil dibandingkan dengan pemrograman Java.Sedangkan kekurangan dari bahasa pemrograman JavaScript antara lain yaitu :Tidak dapat membuat program aplikasi secara tersendiri (mandiri tanpa...
Read more

undefined
undefined

Komputer

Jaman sekarang komputer bukan lagi benda yang langkah dan dan sulit untuk mempelajarinya. Saat ini semua bidang pekerjaan menggunakan komputer, oleh karena itu setiap orang jaman sekarang harus mengetahui komputer. Di sini saya akan perkenalkan panduan mengenai komputerMerakit Komputer : Bagi anda yang ingin memiliki komputer yang sesuai dengan keiinginan anda dan juga seuai dengan kemampuan biaya yang anda miliki bisa download cara merakit komputer...
Read more

undefined
undefined

Aplikasi Login VB Tanpa Database

Private Sub Form_Activate()Text1. MaxLength = 8Text2. MaxLength = 8Text1. SetFocusEnd SubPrivate Sub Form_Load()‘Mendisable-kan menu utama dan submenunya.MainMenu.mnData = FalseMainMenu.mnLaporan = FalseMainMenu.smLogin = FalseMain Menu.sm Logout = FalsePrivate Sub Text1_KeyPress (keyascii As Integer)If keyascii = 13 ThenText2.SetFocusEnd IfEnd SubPrivate Sub Text2_KeyPress (keyascii As Integer)If keyascii = 13 ThenCommand1_ClickEnd IfEnd SubPrivate Sub Command1_Click()If Text1.Text = ‘Admin’ and...
Read more

Pages

Diberdayakan oleh Blogger.
Web hosting for webmasters