Images Membuat fungsi Count if case berlogika pada MYSQL dan SQLite

kali ini saya akan membuat tutorial bagaimana membuat kondisi dalam fungsi Count pada mysql dan SQLite

Tanpa panjang lebar berikut perbeDedaan dalam penulisan pada MySQL dan SQLite

MYSQL

Select Count(If(UNIT_KERJA like 'SD',UNIT_KERJA,Null)) as JUMLAH from Table

SQLite

Select Count(Case when UNIT_KERJA like 'SD' then 1 else null end) as JUMLAH from Table

Jika Ada dua kondisi dalam logika, berikut penulisan Sintax nya.

MYSQL

 Select Cout(If(UNIT_KERJA like 'SD' and UNIT_KERJA like 'SDN',UNIT_KERJA,Null)) as JUMLAH

SQLite

Select Count(Case when UNIT_KERJA like 'SD' and UNIT_KERJA like 'SDN' then 1 else null end) as JUMLAH

Images membuat fungsi mencari umur pada SQLite

catatan ini saya buat karna untuk mengingat sulitnya menggunakan fungsi-fungsi pada SQLite tidak seperti MySQL yang hampir semua kelebihannya di powerfulkan..

pertanyaan nya kenapa saya menggunakan SQLite, ini terjadi karna beberapa kasus klien saya ingin membuat aplikasi yang portable, SQLite adalah RDBMS yang berdiri sendiri tanpa membutuhkan aplikasi tambahan ( singkat cerita ya begitu ya brow.. malas ngebahas panjang lebar selebihnya cari di google).

menghitung umur di MySQL

(YEAR(CUTDATE())-YEAR(TANGGAL_LAHIR)) as UMUR

menghitung umur di SQLite

(strftime('%Y','now')- strftime('%Y',TANGGAL_LAHIR)) as UMUR

Images Mensinkronkan komponen yang tidak terdapat di Alpha Skin

pada properti sSkinManager pilih ThirdParty lalu muncul window seperti gambar di bawah,

pilih komponen pada bagian kanan yang akan di sesuikan pada alpha skin, kemudian klik add select.

pada bagian kiri adalah komponen2 yang sudah menyesuikan di alpha skin, untuk menghapus, pilih komponen pada bagian kiri kemudian delete.

sekian :p

( sorry untuk posting yang sangat singkat, artikel ini saya buat untuk pribadi :3 ) 

salam.

Images Cara Cetak ulang Tanda bukti Registrasi PUPNS dan Formulir PUPNS 2015

Bagi teman-teman PNS yang kesulitan print atau belum mencetak TANDA BUKTI REGISTRASI PUPNS, berikut ini akan saya jelaskan bagaimana cara mencetak ulang Tanda Bukti Registrasi PUPNS.

• Masuk ke web PUPNS, pupns.bkn.go.id kemudia LOGIN ( ini jika anda sudah registrasi sebelumnya)
• Untuk mencetak ulang Tanda bukti Registrasi yang sebelumnya gagal, di bagian LOGIN klik cetak ulang kode registrasi,

• Kemudian masukan NIP Baru anda, kemudan klik OK (di bagian ini ketika klik ok, mohon bersabar karna akan proses agak lama)

• Jika sudah maka akan muncul pertanyaan, jawab pertanyaan sesuai jawaban ketika anda registrasi PUPNS sebelumnya, kemudian klik OK

• Jika sudah berhasil akan muncul tampilan seperti gambar dibawah, sekarang sudah bisa cetak tanda bukti registrasi pupns dan formulir pupns, INGAT di Tap ini jangan di tutup karna akan selalu error, atau tidak tampil tanda buktinya, jika gagal klik kembali cetak, dan cetak formulir.

• Tanda Bukti Registrasi PUPNS

• Formulir PUPNS, Untuk cara pengisian Formulir PUPNS, sudah di sediakan jika ada data yang salah, centang / beri tanda di kolom perbaikan, lalu isi data yang benar di kolom sebelah kanan atau di bawah dari data yang salah.

#Pendataan Ulang Pengawai Negeri Sipil Tahun 2015 ( PUPNS )

Images MySQL : Tutorial Menghitung selisih tanggal menggunakan fungsi DATEDIFF

Berikut ini akan saya share mengenai menghitung selisi tanggal menggunakan fungsi yang sudah terdapat di sintax SQL, biasanya para programmer membuat logika sendiri dibahasa pemograman yang mereka kuasai untuk menghitung selisi antara dua tanggal, jika mereka menggunkan RDBMS SQL padahal selisih tanggal sudah di sediakan di SQL, okey tanpa basa basi lagi mari kita coba :)

1. Buat terlebih dahulu tabel di database yang kita gunakan untuk menghitung selisih tanggal

mysql> create table data_tanggal (
    ->   id int auto_increment primary key,
    ->   tanggal date
    -> ) ;

2. Masukan data-data yang kita gunakan untuk mengitung selisih di table tersebut.

mysql> insert into data_tanggal (tanggal)
    -> values ('2013-01-01'), ('2013-02-01'), ('2013-03-01'), ('2013-04-01'), ('2013-07-01'), ('2013-08-01') ;

3. Nah sekarang kita tampilkan isi table
mysql> select * from data_tanggal ;

+----+------------+
| id |    tanggal        |
+----+------------+
|  1 | 2013-01-01 |
|  2 | 2013-02-01 |
|  3 | 2013-03-01 |
|  4 | 2013-04-01 |
|  5 | 2013-07-01 |
|  6 | 2013-08-01 |
+----+------------+
6 rows in set (0.00 sec)

4. untuk menggukan fungsi menghitung selisih di SQL gunakan DateDiff contohnya :

mysql> select id, tanggal
    -> , current_date() as tgl_sekarang
    -> , datediff(current_date(), tanggal) as selisih
    -> from data_tanggal ;
+----+------------+--------------+---------+
| id | tanggal            | tgl_sekarang | selisih      |
+----+------------+--------------+---------+
|  1 | 2013-01-01 | 2013-07-01   |     181     |
|  2 | 2013-02-01 | 2013-07-01   |     150     |
|  3 | 2013-03-01 | 2013-07-01   |     122     |
|  4 | 2013-04-01 | 2013-07-01   |      91      |
|  5 | 2013-07-01 | 2013-07-01   |       0       |
|  6 | 2013-08-01 | 2013-07-01   |     -31      |
+----+------------+--------------+---------+
6 rows in set (0.00 sec)

currentdate kita gunakan untuk menggambil tanggal sekarang, dan sintax datediff(current_date(), tanggal) maksudnya datediff(tanggalsekarang,tanggaldestinasi) menghitung selisih dari tanggal sekarang ke tanggaldestinasi.

5. Sekarang kita balik, bandingkan tanggal yang ada di dalam database dengan tanggal hari ini

mysql> select id, tanggal
-> , current_date() as tgl_sekarang
-> , datediff(tanggal, current_date()) as selisih
-> from data_tanggal ;
+----+------------+--------------+---------+
| id | tanggal    | tgl_sekarang | selisih |
+----+------------+--------------+---------+
|  1 | 2013-01-01 | 2013-07-01   |    -181 |
|  2 | 2013-02-01 | 2013-07-01   |    -150 |
|  3 | 2013-03-01 | 2013-07-01   |    -122 |
|  4 | 2013-04-01 | 2013-07-01   |     -91 |
|  5 | 2013-07-01 | 2013-07-01   |       0 |
|  6 | 2013-08-01 | 2013-07-01   |      31 |
+----+------------+--------------+---------+
6 rows in set (0.00 sec)

6, sekarang kita coba jika tanggal sekarangnya kita ubah sesuai kita inginkan misalnya tanggal 2013-5-20

mysql> select id, tanggal
-> , '2013-05-20' as tgl_sekarang
-> , datediff('2013-5-20', tanggal) as selisih
-> from data_tanggal ;
+----+------------+--------------+---------+
| id | tanggal    | tgl_sekarang | selisih |
+----+------------+--------------+---------+
|  1 | 2013-01-01 | 2013-05-20   |     139 |
|  2 | 2013-02-01 | 2013-05-20   |     108 |
|  3 | 2013-03-01 | 2013-05-20   |      80 |
|  4 | 2013-04-01 | 2013-05-20   |      49 |
|  5 | 2013-07-01 | 2013-05-20   |     -42 |
|  6 | 2013-08-01 | 2013-05-20   |     -73 |
+----+------------+--------------+---------+
6 rows in set (0.00 sec)

7, sekarang kita balik tanggaldestinasinya yang kita ubah sesuai kita inginkan 2013-05-20

mysql> select id, tanggal
-> , '2013-05-20' as tgl_sekarang
-> , datediff(tanggal, '2013-5-20') as selisih
-> from data_tanggal ;
+----+------------+--------------+---------+
| id | tanggal    | tgl_sekarang | selisih |
+----+------------+--------------+---------+
|  1 | 2013-01-01 | 2013-05-20   |    -139 |
|  2 | 2013-02-01 | 2013-05-20   |    -108 |
|  3 | 2013-03-01 | 2013-05-20   |     -80 |
|  4 | 2013-04-01 | 2013-05-20   |     -49 |
|  5 | 2013-07-01 | 2013-05-20   |      42 |
|  6 | 2013-08-01 | 2013-05-20   |      73 |
+----+------------+--------------+---------+
6 rows in set (0.00 sec)

Sekian tutorial dari saya, semoga apa yang saya bagikan dapat dimengerti ^_^ dan jadi ilmu yang bermanfaat untuk teman-teman Programmer. Salam...

Images Delphi : Tutorial menyimpan gambar kedalam database SQL

Berikut ini akan saya share cara menyimpan gambar kedalam database RDBMS yg support SQL, ingat tutorial ini menyimpan langsung kedalam database bukan direktori gambar.

Oke untuk menyikap waktu kita siapkan terlebih dahulu table serta field-fieldnya di database yang kita gunakan untuk menyimpan gambar.

dalam kasus ini saya menggunakan RDBMS MySql, Buat terlebih dahulu databasenya
Database name : db_Gallery
Table name : Gallery
Field name : Nama, tipe : Varchar,  Length : 15
Filed name : Foto, tipe : Long Blob, Null ( Bisa juga pakai blob saja, dan ingat pakai null jika dikasus lain foto tidak diwajibkan di isi)

dalam Tutorial ini saya menggunakan Komponen koneksi menggunakan zeos untuk menghubungkan ke database,

1. kita buat button untuk mengload file gambar, kita menggukan 1 button, 1 komponen Image dan 1 opendialog
atur properti opendialog terlebih dahulu jadi defaultext : Jpg, Filter : Jpg|*.jpg ( ini untuk mengfilter file gambar jpg saja yg akan di tampilkan)

2. Code untuk mencari gambar dengan memanfaatkan opendialog

procedure TForm1.Button1Click(Sender: TObject);

begin

if opendialog1.Execute then

begin

image1.Picture.LoadFromFile(opendialog1.FileName);

end;

end;

3. Sebelum lanjut ke coding Simpan, tambahkan terlebih dahulu var stream : tmemorystream; dibawah procedure button simpan, berikut koding untuk menyimpan

procedure TForm1.Button2Click(Sender: TObject);

var stream : tmemorystream;

begin

stream := tmemorystream.Create;

image1.Picture.Graphic.SaveToStream(stream);

stream.Position := 0;

ZQuery1.Append;

ZQuery1.FieldByName('nama').AsString := edit1.text;

tblobfield(ZQuery1.fieldbyname('foto')).LoadFromStream(stream);

stream.Free;

ZQuery1.Post;

end;

4. untuk menampilkan gambar yang disimpan, kita manfaatkan komponen dbgrid, sebelumnya tambahkan uses Jpeg, dan var stream : tmemorystream; dan Jpg: TJpegImage; di procedure dbgrid cell click

procedure TForm1.DBGrid1CellClick(Column: TColumn);

var stream : tmemorystream;

Jpg: TJpegImage;

begin

Jpg := TJpegImage.Create;

stream := tmemorystream.Create;

tblobfield(ZQuery1.FieldByName('foto')).SaveToStream(stream);

stream.position := 0;

Jpg.LoadFromStream(stream);

image1.Picture.Graphic := Jpg;

Edit1.Text := ZQuery1.FieldByName('nama').AsString;

end;

Sekian tutorial dari saya mengenai menyimpan gambar kedalam database SQL
Source code, Exe dan Sql nya bisa download disini : Download

Images Installer PPTP VPN On CentOS 6_x86/64 bit

1. Pastikan PPP sudah enabled

cat /dev/ppp

jika muncul pesan seperti dibawah ini artinya PPP sudah enabled

cat: /dev/ppp: No such device or address

2. Download Auto installnya

wget http://www.rockia.com/dl/pptpd6.sh

chmod +x pptpd6.sh

./pptpd6.sh

3. Jika Sudah muncul pesan seperti ini

VPN service is installed, your VPN username is vpn, VPN password is ${pass}

Artinya proses install telah selesai

4. Untuk menambah/mengedit user & pass

nano /etc/ppp/chap-secrets

5. Jika muncul Pesan eror sepertin ini saat proses instalasi

iptables: Saving firewall rules to /etc/sysconfig/iptables: /etc/init.d/iptables: line 274: restorecon: command not found 

 masukan perintah ini

yum install policycoreutils

 Kalau ngak bisa browsing tinggal set ip tablenya
nano /etc/sysconfig/iptables-config

set configure iptables :
iptables -t nat -A POSTROUTING -j SNAT --to-source <IP VPS>
buat NAT rule untuk iptables to configure firewall :
iptables -A INPUT -i eth0 -p tcp –dport 1723 -j ACCEPT
iptables -A INPUT -i eth0 -p gre -j ACCEPT
iptables -A INPUT -m state –state ESTABLISHED,RELATED -j ACCEPT
iptables -A FORWARD -i ppp+ -o eth0 -j ACCEPT
iptables -A FORWARD -i eth0 -o ppp+ -j ACCEPT
#service iptables save
#service iptables restart
#service pptpd start
-------------------------------------------------------------------------------------------
ifconfig cek eth0 apa venet0
eth0 KVM venet0 OPVZ
nano /etc/ppp/options.pptpd
default aja
nano /etc/pptpd.conf
default aja
nano /etc/sysctl.conf
net.ipv4.ip_forward = 1
IPTABLES
iptables -A INPUT -i venet0 -p tcp --dport 1723 -j ACCEPT
iptables -A INPUT -i venet0 -p gre -j ACCEPT
iptables -t nat -A POSTROUTING -j SNAT --to-source IPVPS
iptables -A FORWARD -i ppp0 -o venet0 -j ACCEPT
iptables -A FORWARD -i venet0 -o ppp0 -j ACCEPT
#service iptables save
#service iptables restart