Tuesday, June 30, 2020

Download Source Code Pengelolaan Dana Desa CodeIgniter

Halo sobat codinger,, kali ini saya akan membagikan Aplikasi Pengelolaan Dana Desa yang saya buat dengan Framework CodeIgniter. Aplikasi ini memiliki fitur untuk mengelola Pemasukan dan Pengeluaran Dana dan menu pengajuan dana bagi masyarakat yang ingin mengajukan dana kepada desa untuk keperulan kemasyarakatan maupun yg lain, berikut sekilas tampilan aplikasi:


Dashboard


Tampilan Laporan

Begitulah sekilas tampilan aplikasinya,, kali ini akan saya bagikan semoga dapat membantu bagi yang ingin belajar php atau pun CodeIgniter,, dan silahkan aplikasi ini di kembangkan lagi.

Login :
bag. keuangan
Username : keuangan
Password : keuangan

kepaladesa
Username : kepaladesa
password : kepaladesa

pemohon dana :
Username : pelaksana
Password : pelaksana

Link Download :















Monday, March 18, 2019

MEMBUAT DATABASE SQL SERVER 2008

Assalamualaikum.. kali ini saya akan memberikan tutorial cara membuat database di sql server 2008 langkah pertama tentu anda hrus mempunyai software sql server jika belum punya anda bisa download di google banyak wkwk.

oke jika sudah menginstal sql servernya agan jalankan softwarnya maka tampilan awalnya adalah sebagai berikut:




Jika sudah anda tinggan klik connect saja.
Untuk membuat database, agan bisa membuatnya dengan query artinya agan harus menulis script sqlnya ataupun bisa langsung menggunakan wizard atau manual dan saya sarankan lebih baik menggunakan query saja supaya lebih pro wkwkwk.
Oke saya akan menjelaskan cara wizarnya terlebih dahulu.
Pertama Klik kanan pada bagian Database di sebelah kiri.


Kemudian pilih menu New Database

Kemudian isi nama database disini saya contohkan dengan nama cobacoba.
dan pilih dimana filedata basenya akan disimpan karna nantinya setelah database di buat akan terdapat dua file yaitu file mdf dan ldf, dan kedua file tersebut disarankan disimpan di folder yang sama, setelah selesai mengisi nama database dan memilih dimana folder untuk menyimpan file kemudian klik OK.
Lalu cek di bagian databasenya apakah suda ada database yang telah di buat




jika sudah ada kita tinggal membuat tabelnya caranya sama seperti membuat database tinggal klik kanan di bagian folder tabelnya, lalu isi nama colum seperti kode_barang, nama dst.
dan untuk menyimpan tinggal klik ctrl+s dan ini nama tablenya.
kemudian untuk insert data tinggal klik kanan pada tabel yang akan diisi lalu pilih menu Edit Top 200 Row lalu isi datanya.






Oke sekian tutorial kali ini yang saya buat mohon maaf jika kurang dimengerti
dan untuk tutuorial menggunakan query sqlnya akan menyusul.

Friday, March 1, 2019

DOWNLOAD Aplikasi Akademik VB.Net visual studio 2015

Oke Langsung saja broh kali ini saya akan membagikan contoh aplikasi dekstop saya, kali ini aplikasi akademik untuk kampus berbasis vb.net dengan database sql server 2008

Aplikasi ini memiliki menu sebagai berikut: input mahasiswa, input dosen, input mata kuliah dll.


Dan tampilannya sebagai berikut:





dan masih banyak lagi, ok untuk download aplikasinya biasa lewat link dibawah ini:


untuk login : 
username : admin1
password : admin1



Monday, January 7, 2019

Cara Membuat Kode Otomatis di VB.NET

Assalamualaikum Wr.Wb Ok kali ini saya akan memberikan ontoh bagaimana cara membuat kode tomatis di vb.net, langsung saja tanpa banyak cingcong. wkwk

  • pertama buat dahulu modul koneksinya disini saya menggunakan database sql server , dan untuk contoh modul koneksi bisa di lihat disini
  • kemudian anda buat sub baru terserah namanya apa disini saya memakai nama nomor2, berikut contoh kodingannya:

Sub nomor2()
        Try
            Call koneksi()
            cmd = New SqlCommand("select * from tbl_barang order by id_barang desc", con)
            rd = cmd.ExecuteReader
            rd.Read()
            If Not rd.HasRows Then
                TextBox1.Text = "BR0001"
            Else
                TextBox1.Text = Val(Microsoft.VisualBasic.Right(rd("id_barang").ToString, 4)) + 1
                If Len(TextBox1.Text) = 1 Then
                    TextBox1.Text = "BR000" & TextBox1.Text & ""
                ElseIf Len(TextBox1.Text) = 2 Then
                    TextBox1.Text = "BR00" & TextBox1.Text & ""
                ElseIf Len(TextBox1.Text) = 3 Then
                    TextBox1.Text = "BR0" & TextBox1.Text & ""
                ElseIf Len(TextBox1.Text) = 4 Then
                    TextBox1.Text = "BR" & TextBox1.Text & ""
                ElseIf Len(TextBox1.Text) = 5 Then
                    TextBox1.Text = "B" & TextBox1.Text & ""
                End If
            End If

        Catch ex As Exception
            MessageBox.Show("Terjadi kesalahan bro :" & ex.Message, "Warning", MessageBoxButtons.OK, MessageBoxIcon.Warning)

        End Try
    End Sub


nah begitulah contoh kodingannya silahkan dipahami :) , sekian dan teimakaih...

Saturday, December 1, 2018

Contoh Kodingan Koneksi VB.NET ke SQL SERVER

Contoh Kodingan Koneksi VB.NET ke SQL SERVER
Oke langsung saja kali ini saya akan mebagikan contoh kodingan koneksi pada vb.net ke database sql serverVisual Studio 2015. dan disini saya menggunakan
  • Pertama buat sebuah modul dan masukan script dibawah ini :
Imports System.Data.SqlClient
Imports System.Data.Sql
Module Module1
    Public con As SqlConnection
    Public cmd As SqlCommand
    Public ds As DataSet
    Public da As SqlDataAdapter
    Public rd As SqlDataReader
    Public db As String
    Public Sub koneksi()
        db = "Integrated Security=SSPI; Persist Security Info=True;Initial Catalog=db_coba; Data Source=USER-PC\SQLEXPRESS"
        con = New SqlConnection(db)

        Try
            If con.State = ConnectionState.Closed Then
                con.Open()
                MsgBox("Koneksi Ke Database Berhasil", MsgBoxStyle.Information, "Informasi")
            End If
        Catch ex As Exception
            MsgBox(Err.Description, MsgBoxStyle.Critical, "Error")
        End Try
    End Sub
    Public Function SQLTable(ByVal Source As String) As DataTable
        Try
            Dim adp As New SqlClient.SqlDataAdapter(Source, con)
            Dim DT As New DataTable
            adp.Fill(DT)
            SQLTable = DT
        Catch ex As SqlClient.SqlException
            MsgBox(ex.Message)

            SQLTable = Nothing

        End Try
    End Function
End Module
Oke sekian dan selamat mencoba terimaksih..

Wednesday, March 7, 2018

Firewall

Firewall

Apa itu Firewall
         Ibaratnya kalau untuk bumi seperti atmosfer.
System yang melindungi komputer dari serangan diluar komputer, komputer yang firewall nya aktif biasanya tidak bisa di ping. Jika incoming connection di checklis.
  •   Cara setting firewall di windows :
  1.    Masuk ke control panel
  2.  View by pilih category
  3.    Pilih windows defener firewall
  4.   Turn windows defender firewall on or off
  5.   Turn off windows firewall (di off apabila akan digunakan untuk sharing file/hardware)
  • Cara sharing file :
  • ·         Buat folder untuk sharing file
  • ·         Klik kanan pada folder yang akan di share
  • ·         Pilih properties
  • ·         Masuk tab sharing
  • ·         Pilih network and sharing center
  • ·         Off kan network discovery
  • ·         Pilih turn on sharing
  • ·         Pilih use 128 bit
  • ·         Off-kan password protected sharing
  • ·         Klik done
  • ·         Pilih share
  • ·         Ganti permission level read/write(tergantung keperluan)
  • ·         Klis sharu