• Cukup ubah diri kamu sendiri dengan kreatifitasmu, dengan sendirinya hal itu akan mengubah orang disekitarmu.
  • "Kekayaan terbesar sebuah bangsa adalah manusianya, bukan sumber daya alamnya” - Anies Baswedan.
  • "Masa depan itu milik orang yang percaya akan mimpinya dan bekerja sepenuh hati untuk mewujudkannya" - Wishnutama.
  • "Keberhasilan adalah kemampuan untuk melewati dan mengatasi dari satu kegagalan ke kegagalan berikutnya tanpa kehilangan semangat" - Winston Chuchill.
  • "Hidup adalah lelucon yang baru saja dimulai" - W.S. Gilbert.

Kamis, 25 Juni 2015

Pengolahan Data Mahasiswa (c++ newbie)

#include "iostream.h"
#include "conio.h"
#include "stdio.h"
#include "string.h"

void main()
{
   int nilaiakhir[20],i,totnil,maks,min,rata,temp2,j;
   char nim[20][20], nama[20][20],temp[20],temp1[20];

   for(i=0;i<=2;i++)
   {
   cout<<"masukkan nama : "; gets(nama[i]);
   cout<<"masukkan nim : "; gets(nim[i]);
   cout<<"masukkan nilai akhir : "; cin>>nilaiakhir[i];
   }
   clrscr();
   totnil = 0;
   maks = nilaiakhir[0];
   min =  nilaiakhir[0];
   for (i=0;i<=2;i++)
   {
    totnil += nilaiakhir[i];
      if (nilaiakhir[i] > maks)
      {
        maks = nilaiakhir[i];
      }
      if (nilaiakhir[i] < min)
      {
        min = nilaiakhir[i];
      }
      rata = totnil / 3;

   }

   getch();
   clrscr();

   cout<<"nilai tertinggi \t:"<<maks;
   cout<<endl;
   cout<<"nilai terendah  \t:"<<min;
   cout<<endl;
   cout<<"nilai rata-rata \t:"<<rata;
   cout<<endl;

   for(i=0;i<2;i++)
   {
    for(j=i+1;j<=2;j++)
      {
        if(nilaiakhir[i] > nilaiakhir[j])
         {
            temp2 = nilaiakhir[i];
            nilaiakhir[i] = nilaiakhir[j];
            nilaiakhir[j] = temp2;
            strcpy(temp,nim[i]);
            strcpy(nim[i],nim[j]);
            strcpy(nim[j],temp);
            strcpy(temp1,nama[i]);
            strcpy(nama[i],nama[j]);
            strcpy(nama[j],temp1);
         }
      }
    }
   getch();
   clrscr();


   cout<<" daftar mahasiswa \n";
   cout<<"====================================================\n";
   cout<<"nama \t\t|  nim  \t|   nilai akhir\n";
   cout<<"====================================================\n";
   for(i=0;i<=2;i++)
   {
gotoxy(1,5+i); cout<<nama[i]<<"\t\t|"<<nim[i]<<"\t\t|"<<nilaiakhir[i];
   }
   cout<<endl;
   cout<<"=====================================================\n";

   getch();
}







Selasa, 23 Juni 2015

tips membuat database dalam sebuah web master

terkhusus buat para awam di dunia seni ber coding kalian perlu tau
betapa pentingnya membuat sebuah database yang tablenya saling terelasi antara satu sama lain
ini berguna untuk memudahkan programer dalam membuat sebuah sistem yang saling terkoodinasi
dengan baik,

berikut ada contoh database yang sudah saya buat di xammp server yang sudah saling terelasi

-- phpMyAdmin SQL Dump
-- version 3.5.2.2
-- http://www.phpmyadmin.net
--
-- Inang: 127.0.0.1
-- Waktu pembuatan: 23 Jun 2015 pada 23.45
-- Versi Server: 5.5.27
-- Versi PHP: 5.4.7

SET SQL_MODE="NO_AUTO_VALUE_ON_ZERO";
SET time_zone = "+00:00";


/*!40101 SET @OLD_CHARACTER_SET_CLIENT=@@CHARACTER_SET_CLIENT */;
/*!40101 SET @OLD_CHARACTER_SET_RESULTS=@@CHARACTER_SET_RESULTS */;
/*!40101 SET @OLD_COLLATION_CONNECTION=@@COLLATION_CONNECTION */;
/*!40101 SET NAMES utf8 */;

--
-- Basis data: `sikelas`
--

-- --------------------------------------------------------

--
-- Struktur dari tabel `tdosen`
--

CREATE TABLE IF NOT EXISTS `tdosen` (
  `IdDosen` int(13) NOT NULL AUTO_INCREMENT,
  `KdDosen` varchar(10) NOT NULL,
  `NamaDosen` varchar(100) NOT NULL,
  `Alamat` text NOT NULL,
  `Agama` varchar(100) NOT NULL,
  `Email` varchar(100) NOT NULL,
  `JK` char(1) NOT NULL,
  `Telp` varchar(20) NOT NULL,
  `IdPendidikanTerakhir` varchar(11) NOT NULL,
  `Aktif` char(1) NOT NULL,
  PRIMARY KEY (`IdDosen`)
) ENGINE=InnoDB DEFAULT CHARSET=latin1 AUTO_INCREMENT=1 ;

-- --------------------------------------------------------

--
-- Struktur dari tabel `tjadwal`
--

CREATE TABLE IF NOT EXISTS `tjadwal` (
  `IdJadwal` int(13) NOT NULL AUTO_INCREMENT,
  `IdMatkul` int(13) NOT NULL,
  `KategoriJadwal` int(3) NOT NULL,
  `Ruang` varchar(20) NOT NULL,
  `IdKelas` int(13) NOT NULL,
  `Hari` varchar(10) NOT NULL,
  `JamMulai` varchar(8) NOT NULL,
  `JamSelesai` varchar(8) NOT NULL,
  `IdDosen` int(13) NOT NULL,
  PRIMARY KEY (`IdJadwal`)
) ENGINE=InnoDB DEFAULT CHARSET=latin1 AUTO_INCREMENT=1 ;

-- --------------------------------------------------------

--
-- Struktur dari tabel `tkelas`
--

CREATE TABLE IF NOT EXISTS `tkelas` (
  `IdKelas` int(13) NOT NULL AUTO_INCREMENT,
  `NamaKelas` varchar(100) NOT NULL,
  `Aktif` char(1) NOT NULL,
  PRIMARY KEY (`IdKelas`)
) ENGINE=InnoDB DEFAULT CHARSET=latin1 AUTO_INCREMENT=1 ;

-- --------------------------------------------------------

--
-- Struktur dari tabel `tmahasiswa`
--

CREATE TABLE IF NOT EXISTS `tmahasiswa` (
  `IdMahasiswa` int(13) NOT NULL AUTO_INCREMENT,
  `NIM` varchar(14) NOT NULL,
  `NamaMahasiswa` varchar(100) NOT NULL,
  `Alamat` text NOT NULL,
  `JK` char(1) NOT NULL,
  `Telp` varchar(20) NOT NULL,
  `Agama` varchar(20) NOT NULL,
  `Email` varchar(100) NOT NULL,
  `TempatLahir` varchar(100) NOT NULL,
  `TanggalLahir` date NOT NULL,
  `IdKelas` int(13) NOT NULL,
  `KategoriKelas` varchar(3) NOT NULL,
  `Foto` varchar(100) NOT NULL,
  `Aktif` char(1) NOT NULL,
  PRIMARY KEY (`IdMahasiswa`)
) ENGINE=InnoDB DEFAULT CHARSET=latin1 AUTO_INCREMENT=1 ;

-- --------------------------------------------------------

--
-- Struktur dari tabel `tmatkul`
--

CREATE TABLE IF NOT EXISTS `tmatkul` (
  `IdMatkul` int(13) NOT NULL AUTO_INCREMENT,
  `IdDosen` int(13) NOT NULL,
  `KdMatkul` varchar(13) NOT NULL,
  `NamaMatkul` varchar(100) NOT NULL,
  `Semester` char(1) NOT NULL,
  `SKS` int(13) NOT NULL,
  PRIMARY KEY (`IdMatkul`)
) ENGINE=InnoDB DEFAULT CHARSET=latin1 AUTO_INCREMENT=1 ;

-- --------------------------------------------------------

--
-- Struktur dari tabel `tnilai`
--

CREATE TABLE IF NOT EXISTS `tnilai` (
  `IdNilai` int(13) NOT NULL AUTO_INCREMENT,
  `NIM` varchar(14) NOT NULL,
  `IdMatkul` int(13) NOT NULL,
  `MID` float NOT NULL,
  `Final` float NOT NULL,
  `Kehadiran` float NOT NULL,
  `NIlai` float NOT NULL,
  `SKS` int(13) NOT NULL,
  PRIMARY KEY (`IdNilai`)
) ENGINE=InnoDB DEFAULT CHARSET=latin1 AUTO_INCREMENT=1 ;

-- --------------------------------------------------------

--
-- Struktur dari tabel `tpendidikan`
--

CREATE TABLE IF NOT EXISTS `tpendidikan` (
  `IdPendidikanTerakhir` int(13) NOT NULL AUTO_INCREMENT,
  `PendidikanTerakhir` varchar(100) NOT NULL,
  PRIMARY KEY (`IdPendidikanTerakhir`)
) ENGINE=InnoDB DEFAULT CHARSET=latin1 AUTO_INCREMENT=1 ;

-- --------------------------------------------------------

--
-- Struktur dari tabel `tuser`
--

CREATE TABLE IF NOT EXISTS `tuser` (
  `IdUser` int(13) NOT NULL AUTO_INCREMENT,
  `NIP` varchar(13) NOT NULL,
  `NamaLengkap` varchar(100) NOT NULL,
  `Alamat` text NOT NULL,
  `Telp` varchar(100) NOT NULL,
  `Agama` varchar(100) NOT NULL,
  `Email` varchar(20) NOT NULL,
  `Aktif` char(1) NOT NULL,
  `Level` char(1) NOT NULL,
  `Username` varchar(32) NOT NULL,
  `Password` varchar(32) NOT NULL,
  `IdPendidikanTerakhir` int(13) NOT NULL,
  PRIMARY KEY (`IdUser`)
) ENGINE=InnoDB DEFAULT CHARSET=latin1 AUTO_INCREMENT=1 ;

/*!40101 SET CHARACTER_SET_CLIENT=@OLD_CHARACTER_SET_CLIENT */;
/*!40101 SET CHARACTER_SET_RESULTS=@OLD_CHARACTER_SET_RESULTS */;
/*!40101 SET COLLATION_CONNECTION=@OLD_COLLATION_CONNECTION */;



setiap data memiliki satu field yang saling menghubungkan antara satu table dengan table yang lain.




Sabtu, 20 Juni 2015

cara menghitung nilai string di c++

#include <iostream.h>
#include "conio.h"
#include "stdio.h"
#include <string.h>

int main()
{
       char string[70],k2; //deklarasi variabel
       int jum_karakter;

       cout<<"Menghitung panjang string inputan"<<endl;
       cout<<"---------------------------------"<<endl;
       cout<<"Masukkan String : ";
       gets(string);

       cout<<"\nJumlah String"<<endl;

       jum_karakter = 0;
       for(int i = 0; string[i]; i++)
       {
              k2 = string[i];
              printf("%d\n",k2);
              jum_karakter += k2 ;
       }
       clrscr();
       cout<<"> nilai kata  = "<<jum_karakter<<endl;

       cout<<endl;
      getch();
}






Sabtu, 13 Juni 2015

c++ tugas kampus

data karyawan versi sederhana

#include "iostream.h"
#include "conio.h"
#include "stdio.h"


char nama[30][40],lagi;
int i,k,s,gol[40],pen[40],jam[40];
long int tunjab[40], tunpen[40],hn[40],gaji[40],p[40],gator[40],gaber[40];
long int gatol;
void input()
{
 cout<<"masukkan nama karyawan : "; gets(nama[i]);
 cout<<"pilih golongan [1/2/3] : "; cin>>gol[i];
 cout<<"1.SMA \n2.D3 \n3.S1 \nstatus pendidikan : "; cin>>pen[i];
 cout<<"jumlah jam kerja : "; cin>>jam[i];
 clrscr();
}

void output()
{
 switch(gol[i])
 {
  case 1: { tunjab[i] = (700000 * 5 ) / 100; gaji[i] = 700000; break; }
   case 2: { tunjab[i] = (700000 * 10 ) / 100; gaji[i] = 800000; break;}
   case 3: { tunjab[i] = (700000 * 15 ) / 100; gaji[i] = 900000; break; }
 }

 switch(pen[i])
 {
  case 1: { tunpen[i] = (70000 * 25 ) / 100; break; }
   case 2: { tunpen[i] = (70000 * 50 ) / 100; break; }
   case 3: { tunpen[i] = (70000 * 75 ) / 100; break; }
 }

 if (jam[i] >= 8)
 {
   s = jam[i] - 8;
  hn[i] = s * 10000;
 }
 else
 {
  hn[i] = 0;
 }

gator[i] = gaji[i] + hn[i] + tunjab[i] + tunpen[i];

if (gator[i] > 800000)
{
  p[i] = (gator[i] * 2) / 100;
}

gaber[i] = gator[i] - p[i];


 cout<<i<<"   "<<nama[i]<<"      "<<tunjab[i]<<"     "<<tunpen[i]<<"            "<<hn[i]<<"          "<<p[i]<<"       "<<gaber[i];
 gatol += gaber[i];
}



void kop()
{
 cout<<"------------------------------------------\n";
 cout<<"program hitung honor karyawan kontrak \n";
 cout<<"PT. Sistem Informasi \n";
 cout<<"------------------------------------------\n";
}

void kop2()
{
 cout<<"----------------------------------------------------------------\n";
 cout<<"                  tunjangan \n";
  cout<<"no.   nama     --------------------     honor           pajak         gaji \n";
  cout<<"                jabatan   pendidikan    karyawan   \n";
 cout<<"----------------------------------------------------------------\n";
}

void output2()
{
 cout<<"total yang harus di bayar : "<<gatol;
}

void main()
{
 kop();
 do
 {
 cout<<"masukkan jumlah karyawan : "; cin>>k;
 clrscr();
 for(i=1;i<=k;i++)
 {
   kop();
   cout<<"karyawan ke-"<<i<<" dari "<<k<<endl;
   cout<<"-------------------------------\n";
  input();
 }
 kop2();
 for(i=1;i<=k;i++)
 {
  gotoxy(1,5+i); output();
 }                                                    
 cout<<"\n-------------------------------\n";
 output2();
 cout<<"\nINPUT DATA LAGI Y/T :"; cin>>lagi;
 }
 while((lagi =='Y')||(lagi =='y'));
}






















Jumat, 12 Juni 2015

DELPHI 2010

CARA MEMBUAT LOGIN MULTI USER DI DELPHI DENGAN ADO

sediakan 3 form
pada form login
sediakan 2 edit.text
sediakan 1. ado connection
sediakan 1 ado.query

setting ado connection 
Pada ADO Connection:
 Double klik control ADOConnection1, 
muncul dialog connectionString.
 Klik tombol build…, 
muncul dialog data link properties.
 Jika kita ingin terhubung ke database access,
 pilih Microsoft Jet 4.0 OLE DB Provider. 
Klik Next. Pada tab connection, klik … 
pilih database yang akan digunakan. 
Klik test connection. 
Pastikan kita mendapat pesan Succeded. 
Klik OK. Kemudian klik OK. 
Ubah nilai property 
LoginPrompt menjadi false. 
Cari property connected dan ubah menjadi true.  
Klik control ADOTable1. 
Ubah nilai property connection menjadi ADOConnection1. 
Ubah property tableName dan pilih table yang akan diakses.
 Ubah property active menjadi true. Klik control datasource. 
Beri nilai ADOTable pada property dataset.  
Klik control DBGrid1 dan pilih datasorce1 pada property datasource.
 Lakukan hal yang sama pada DBNavigator. 
Jadi, data pada table akan ditampilkan Jalankan program.

setting ado query
pada Connection hubungkan ke ADOConnection, Pada SQL masukkan sintaks select * from (nama database anda)




unit Unit2;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, DB, ADODB, StdCtrls;

type
  TForm2 = class(TForm)
    Edit1: TEdit;
    Edit2: TEdit;
    Button1: TButton;
    ADOConnection1: TADOConnection;
    ADOQuery1: TADOQuery;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form2: TForm2;

implementation

uses Unit3, Unit1;

{$R *.dfm}

procedure TForm2.Button1Click(Sender: TObject);
begin
with ADOQuery1 do begin
Close;
SQL.Clear;
SQL.Add('select * from login where user='+ QuotedStr(Edit1.Text));
Open;
end;
if ADOQuery1.RecordCount = 0 then
Application.MessageBox('Maaf, username tersebut tidak ada', 'Informasi',  MB_OK or MB_ICONINFORMATION)
else begin
if ADOQuery1.FieldByName ('pass').AsString <> Edit2.Text
then Application.MessageBox('Pastikan username atau password benar', 'Error', MB_OK or MB_ICONERROR)
else begin
if ADOQuery1.FieldByName ('level').AsString = 'admin' then
begin
Form3.Show;
hide;
end
else
  form1.show;
  hide;
end;
end;
end;

end.







form login