Oleh: admin | 14/01/2013

Selamat Datang

Jika tujuan Anda untuk Belajar Bahasa Pemrograman Visual,

maka Anda tidak salah alamat …………….

Di Blog ini tersedia Source Code Bahasa Pemrograman Visual

yang mudah dipelajari

untuk Anda programmer pemulah dan Tingkat Lanjut. Jadi ingat,  hanya 

Khusus Programmer Pemula dan Tingkat Lanjut

Untuk menjalankan Source Code Yang ada di Blog ini, Di Komputer Anda harus terinstal Software Visual Basic 6, Visual Foxpro 9 dan Visual Delphi 7 serta didukung Software Lain yaitu CrystalReport 8.5, Active Report dan Component DLL (VB6)

NONTON TV ONLINE
Order Source Code SMS ke : 085756231035
download yuk

Web bisnis online dengan sistim terbaru, KOMISI 100% untuk ANDA

KLIK DISINI UNTUK BACA LEBIH DETAIL AGAR PAHAM


2 (dua) bulan gak posting lagi, lagi lagi karena agenda padat :) :). Posting kali ini menjawab pertanyaan teman yang menanyakan “cara menampilkan fhoto/gambar dari database pada crystal report 8.5

gambar di crystal report

Yuk download video caranya dari pakar VB6 langsung, KLIK DISINI.

source code sms gatewayTak terasa berjalannya waktu, 8 (delapan) bulan lamanya saya tidak lagi memposting artikel di blog ini. Agenda yang padat itulah penyebabnya.

Ok, kali ini saya memposting artikel source code sistem informasi nilai sekolah berbasis SMS Gateway.  Source code ini bukan buatan saya. Beberapa fasilitas yang ada didalamnya yaitu:

1.  Login. user: 123 pasword: 123

2.  Data Siswa

3. Data Nilai

4. Kirim SMS per kelas, mata pelajaran dan jenis ulangan.

5. Pengaturan User

6. Laporan pesan masuk, pesan terkirim, dan nilai.

7. Setting SMS Gateway (ON/OFF)

Sisfo ini sangat menarik. Dapat anda gunakan sebagai referensi pembelajaran untuk Tugas Akhir atau Project anda yang lain. Disini saya hanya membagikan informasinya tuk anda. Link downloadnya, KLIK DISINI

Oleh: admin | 25/02/2014

menjawab pertanyaan member [koneksi]

Sudah lama kayanya saya tidak posting lagi. Hari ini saya posting seputar pertanyaan member sourcecode dan jawabannya. Ini salah satunya:

pertanyaanKarena kesibukkan saya, maka baru kemarin saya menjawabnya. Jawaban ini sesuai file project yang dikirimkan ke saya.

1.  Buat modul koneksi. Berikut sourcenya:


Public Koneksi As New ADODB.Connection
Public Rssiswa As New ADODB.Recordset
Public Rslogin As New ADODB.Recordset
Public Rstampil As New ADODB.Recordset
Public pathh As String

Sub BukaDatabase()

On Error GoTo PesanError

Set Koneksi = New Connection

pathh = frmDb.txtPath.Text

With Koneksi
.ConnectionTimeout = 30
.CursorLocation = adUseClient
.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & pathh & ";Persist Security Info=False"
.Open
End With

Rssiswa.Open "[siswa]", Koneksi, adOpenDynamic, adLockOptimistic
Rslogin.Open "[login]", Koneksi, adOpenDynamic, adLockOptimistic

PesanError:
Select Case Err.Number
Case -2147467259
MsgBox "File database sudah tidak ada pada folder instalasi", vbInformation, "Peringatan"
End
'Exit Sub
End Select
End Sub

2.  Source pengaturan menu utama


Private Sub DATASISWA_Click()
Frminput.Show
End Sub

Private Sub MDIForm_Load()
INPUTD.Enabled = False
MLOGOUT.Enabled = False
End Sub

Private Sub MKONEKSI_Click()
frmDb.Show
End Sub

Private Sub MLOGOUT_Click()
INPUTD.Enabled = False
MKONEKSI.Enabled = True
MLOGOUT.Enabled = False
Koneksi.Close
End Sub

3.  Buat form masukkan database. Berikut sourcenya:


Private Sub cmdLoad_Click()
BukaDatabase
frmlogin.Show
Unload Me
End Sub
Private Sub cmdbrowse_Click()
On Error Resume Next
dlgPath.Filter = "File database (mdb)|*.mdb"
dlgPath.ShowOpen
txtPath.Text = dlgPath.FileName
cmdLoad.Enabled = True
End Sub

Private Sub Form_Load()
cmdLoad.Enabled = False
End Sub

Lebih lengkap, download PROJECTnya DISINI.

Sebenarnya hal ini sudah banyak dimuat di blog-blog yang lain. Supaya menambah keragaman, maka saya publish source code hasil modifikasi saya untuk anda.
Untuk menggunakan source code ini dikomputer anda harus diinstal aplikasi mysql-connector-odbc-3.51.28-win32. Kemudian buat 1 modul baru untuk menempatkan sourcecode koneksi database mysql dibawah ini

Public koneksi As Connection
Public Konek As String
Public Buka As Boolean
Dim Rssiswa As New ADODB.Recordset
Sub BukaDatabase()
On Error GoTo PesanError
   ' svr, db, us, pass adalah variabel
   ' buat 1 form tuk login dan gunakan variabel tersebut
   ' sebagai media inputan
    svr = "localhost"
    db = "privat"
    us = "root"
    pass = ""

   '---------------------------------------------------
    Konek = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=" & svr & _
            ";PORT=3306;" & _
            "DATABASE=" & db & _
            ";USER=" & us & _
            ";PASSWORD=" & pass & _
            ";OPTION=3;"
    Set koneksi = New Connection
    koneksi.CursorLocation = adUseClient
    koneksi.Open Konek
   '---------------------------------------------------
    Rssiswa.Open "select * from tblsiswa;", koneksi, adOpenDynamic, adLockOptimistic
    '--------------------------------------------------------------------------------
    Buka = False
PesanError:
Select Case Err.Number
Case 0
Exit Sub
Case -2147467259
MsgBox "Koneksi Gagal ! Periksa settingan ODBCnya!", , "Peringatan"
End
Exit Sub
Case Else
MsgBox "Nomor Error : " & Err.Number & Chr(13) & _
"Deskripsi Error : " & Err.Description
Resume Next
Exit Sub
End Select
End Sub

Lebih lengkap silahkan download source codenya disini.

Aplikasi ini saya buat menggunakan Bahasa Pemrograman Visual Basic 6.0 dengan Database Ms. Access 2003 serta laporannya menggunakan CrystalReport 8.5. Source code ini cocok bagi programmer pemula dan tingkat lanjut. Berikut screenshootnya :

Ribbon Office 2007 vb6

Sudah hampir 1 bulan saya gak posting artikel source code. Kali ini saya posting sebuah source code membuat menu utama dengan tampilan ribbon office 2007 dengan visual basic 6 seperti gambar diatas. Source codenya mudah untuk anda pelajari dan kembangkan. Untuk tempat download source codenya KLIK DISINI.

Oleh: admin | 11/11/2013

Source code Aplikasi Pendanaan BOS

aplikasi BOS Karena kesibukan menyelesaikan pekerjaan offline maupun online, jadi gak sempat berbagi source code kepada anda semua.

Hari ini saya berbagi source code yaitu Aplikasi Pendanaan (Penerimaan dan Pengeluaran Dana BOS). Source code ini berasal dari kawan saya sesama pecinta pemrograman visual basic6.

Semoga membantu kawan-kawan yang mungkin sedang membuat program tugas akhir sejenis ini. Dapatkan source codenya DISINI.

Older Posts »

Kategori

Ikuti

Get every new post delivered to your Inbox.