Minggu, 28 Mei 2017

Kode Program Membuat Aplikasi Database Satu Tabel Dengan Bahasa Pemrograman PHP-GTK

Kode Program Membuat Aplikasi Database Satu Tabel Dengan Bahasa Pemrograman PHP-GTK

PHP-GTK


Antarmukanya :






Berikut listing/ kodenya untuk Form barang (database) dengan php-gtk 2.0 :


<?php
/*
 * Called when the window is being destroyed. Simply quit the main loop.
 */
function destroy()
{
                Gtk::main_quit();
}
/*
 * Called when button is clicked. Print the message and destroy the window.
 */
function nextn()
{
global $label,$labeln,$entry1,$entry2,$entry3,$entry4,$entry6,$entry7,$img,$table;
$koneksi=mysql_connect("localhost","root","awsm");
$sql="select * from brgptun ";
$qry=mysql_db_query("pttm",$sql,$koneksi);
$num_rows = mysql_num_rows($qry);

echo "$num_rows Rows\n";

$label->set_text($label->get_text()+1);
$n=$label->get_text()-1;

$koneksi=mysql_connect("localhost","root","awsm");
$sql="select * from brgptun limit $n,1 ";
$qry=mysql_db_query("pttm",$sql,$koneksi);

if($n>$num_rows-1){


$dialog = &new GtkMessageDialog
($data, Gtk::DIALOG_MODAL, Gtk::
MESSAGE_INFO, Gtk::BUTTONS_OK, "Sudah di akhir data ") ;
$dialog ->set_size_request(200,100);
$dialog -> set_title ("Perhatian");
$dialog -> run ();
$dialog -> destroy();
if ($data=Gtk::BUTTONS_OK){
$label->set_text ($num_rows) ;
}
}

while  ($row=mysql_fetch_row($qry))
{
 
$g1=$row[0];
$g2=$row[1];
$g3=$row[2];
$g4=$row[3];
$g6=$row[5];
$g7=$row[6];

 $entry1->set_text ($g1) ;
 $entry2->set_text ($g2) ;
 $entry3->set_text ($g3) ;
 $entry4->set_text ($g4) ;
 $entry6->set_text ($g6) ;
 $entry7->set_text ($g7) ;

 $img->set_from_file($g4);

}
$labeln->set_text ($num_rows) ;
}


function prevn()
{
global $label,$labeln,$entry1,$entry2,$entry3,$entry4,$entry6,$entry7,$img;

$koneksi=mysql_connect("localhost","root","awsm");
$sql="select * from brgptun ";
$qry=mysql_db_query("pttm",$sql,$koneksi);
$num_rows = mysql_num_rows($qry);

echo "$num_rows Rows\n";


$label->set_text($label->get_text()-1);

$nn=$label->get_text()-1;

$koneksi=mysql_connect("localhost","root","awsm");
$sql="select * from brgptun limit $nn,1 ";
$qry=mysql_db_query("pttm",$sql,$koneksi);

if($nn<0){

$dialog = &new GtkMessageDialog
($data, Gtk::DIALOG_MODAL, Gtk::
MESSAGE_INFO, Gtk::BUTTONS_OK, "Sudah di awal data ") ;
$dialog ->set_size_request(200,100);
$dialog -> set_title ("Perhatian");
$dialog -> run ();
$dialog -> destroy();
if ($data=Gtk::BUTTONS_OK){
$label->set_text ('1') ;
}
}
while ($row=mysql_fetch_row($qry))
{
 
$g1=$row[0];
$g2=$row[1];
$g3=$row[2];
$g4=$row[3];
$g6=$row[5];
$g7=$row[6];

 $entry1->set_text ($g1) ;
 $entry2->set_text ($g2) ;
 $entry3->set_text ($g3) ;
 $entry4->set_text ($g4) ;
 $entry6->set_text ($g6) ;
 $entry7->set_text ($g7) ;

 $img->set_from_file($g4);
}

$labeln->set_text ($num_rows) ;
}


function firstn()
{
global $label,$labeln,$entry1,$entry2,$entry3,$entry4,$entry6,$entry7,$img;

$koneksi=mysql_connect("localhost","root","awsm");
$sql="select * from brgptun limit 0,1 ";
$qry=mysql_db_query("pttm",$sql,$koneksi);

while ($row=mysql_fetch_row($qry))
{
 
$g1=$row[0];
$g2=$row[1];
$g3=$row[2];
$g4=$row[3];
$g6=$row[5];
$g7=$row[6];

 $entry1->set_text ($g1) ;
 $entry2->set_text ($g2) ;
 $entry3->set_text ($g3) ;
 $entry4->set_text ($g4) ;
 $entry6->set_text ($g6) ;
 $entry7->set_text ($g7) ;

 $img->set_from_file($g4);
}
$label->set_text ('1') ;
$labeln->set_text ($num_rows) ;
}



function lastn()
{
global $label,$labeln,$entry1,$entry2,$entry3,$entry4,$entry6,$entry7,$img;

$koneksi=mysql_connect("localhost","root","awsm");
$sql="select * from brgptun ";
$qry=mysql_db_query("pttm",$sql,$koneksi);
$num_rows = mysql_num_rows($qry);

echo "$num_rows Rows\n";

$dd=$num_rows-1;

$koneksi=mysql_connect("localhost","root","awsm");
$sql="select * from brgptun limit $dd,1 ";
$qry=mysql_db_query("pttm",$sql,$koneksi);

while ($row=mysql_fetch_row($qry))
{
 
$g1=$row[0];
$g2=$row[1];
$g3=$row[2];
$g4=$row[3];
$g6=$row[5];
$g7=$row[6];

 $entry1->set_text ($g1) ;
 $entry2->set_text ($g2) ;
 $entry3->set_text ($g3) ;
 $entry4->set_text ($g4) ;
 $entry6->set_text ($g6) ;
 $entry7->set_text ($g7) ;

$img->set_from_file($g4);
}
$label->set_text ($num_rows) ;
$labeln->set_text ($num_rows) ;
}


function add()
{
global $label,$labeln,$entry1,$entry2,$entry3,$entry4,$entry6,$entry7;

$koneksi=mysql_connect("localhost","root","awsm");
$sql="select * from brgptun ";
$qry=mysql_db_query("pttm",$sql,$koneksi);
$num_rows = mysql_num_rows($qry);

echo "$num_rows Rows\n";

$label->set_text ('0') ;
$labeln->set_text ($num_rows) ;

$entry1->set_text ("") ;
 $entry2->set_text ("") ;
 $entry3->set_text ("") ;
 $entry4->set_text ("") ;
 $entry6->set_text ("") ;
 $entry7->set_text ("") ;
 }


function save()
{
global $labeln,$entry1,$entry2,$entry3,$entry4,$entry6,$entry7;

$gg1= $data1 = $entry1->get_text () ;
$gg2= $data2 = $entry2->get_text () ;
$gg3= $data3 = $entry3->get_text () ;
$gg4= $data4 = $entry4->get_text () ;
$gg6= $data6 = $entry6->get_text () ;
$gg7= $data7 = $entry7->get_text () ;

$image = file_get_contents($gg4);
$content=addslashes($image);

               
$koneksi=mysql_connect("localhost","root","awsm");
$sql="insert into brgptun(kbrgptun,nmbrgptun,typebrgptun,pictfilebrgptun,pictbrgptun,vabrgptun,pictfilewebbrgptun)values('$gg1','$gg2','$gg3','$gg4','$content','$gg6','$gg7') ";
$qry=mysql_db_query("pttm",$sql,$koneksi);
if ($qry)
{
print"Sukses";
add();
}
else
{
print"Gagal";
add();
}
$koneksi=mysql_connect("localhost","root","awsm");
$sql="select * from brgptun ";
$qry=mysql_db_query("pttm",$sql,$koneksi);
$num_rows = mysql_num_rows($qry);

$labeln->set_text ($num_rows) ;
}


function edit()
{
global $labeln,$entry1,$entry2,$entry3,$entry4,$entry6,$entry7,$entrya;

$gg1= $data1 = $entry1->get_text () ;
$gg2= $data2 = $entry2->get_text () ;
$gg3= $data3 = $entry3->get_text () ;
$gg4= $data4 = $entry4->get_text () ;
$gg6= $data6 = $entry6->get_text () ;
$gg7= $data7 = $entry7->get_text () ;

$gga= $dataa = $entrya->get_text () ;

$image = file_get_contents($gg4);
$content=addslashes($image);
               
$koneksi=mysql_connect("localhost","root","awsm");
$sql="update brgptun set kbrgptun='$gg1',nmbrgptun='$gg2',typebrgptun='$gg3',pictfilebrgptun='$gg4',pictbrgptun='$content',vabrgptun='$gg6',pictfilewebbrgptun='$gg7' where kbrgptun='$gga'";
$qry=mysql_db_query("pttm",$sql,$koneksi);
if ($qry)
{
print"Sukses editing... !";
}
else
{
print"Gagal editing... !";
add();
}

$koneksi=mysql_connect("localhost","root","awsm");
$sql="select * from brgptun ";
$qry=mysql_db_query("pttm",$sql,$koneksi);
$num_rows = mysql_num_rows($qry);

$labeln->set_text ($num_rows) ;
}


function delete()
{
global $labeln,$entrya;

$gga= $dataa = $entrya->get_text () ;
               
$koneksi=mysql_connect("localhost","root","awsm");
$sql="delete from brgptun where kbrgptun='$gga'";
$qry=mysql_db_query("pttm",$sql,$koneksi);
if ($qry)
{
print"Sukses delete...!";
lastn();
}
else
{
print"Gagal delete ...!";
lastn();
}
$koneksi=mysql_connect("localhost","root","awsm");
$sql="select * from brgptun ";
$qry=mysql_db_query("pttm",$sql,$koneksi);
$num_rows = mysql_num_rows($qry);

$labeln->set_text ($num_rows) ;
}


/*
 * Create a new top-level window and connect the signals to the appropriate
 * functions. Note that all constructors must be assigned by reference.
 */

$koneksi=mysql_connect("localhost","root","awsm");
$sql="select * from brgptun ";
$qry=mysql_db_query("pttm",$sql,$koneksi);
$num_rows = mysql_num_rows($qry);


/*

 */


$window =&new GtkWindow();
$window ->set_size_request(600,500);
$window->connect("destroy","destroy");


/*

 */
$label0= &new GtkLabel();
$label0->set_text('Daftar Barang');
$label0->modify_font(new PangoFontDescription("Arial bold 14"));
$label0->modify_fg(Gtk::STATE_NORMAL, GdkColor::parse("#0000ff"));


$label1= &new GtkLabel();
$label1->set_text('Kode barang');
$label2= &new GtkLabel();
$label2->set_text('Nama barang');
$label3= &new GtkLabel();
$label3->set_text('Type barang');
$label4= &new GtkLabel();
$label4->set_text('Picture File ');
$label5= &new GtkLabel();
$label5->set_text('VA barang');
$label6= &new GtkLabel();
$label6->set_text('Picture Web');




$entrya = &new GtkEntry();
$entry1 = &new GtkEntry();
$entry2 = &new GtkEntry();
$entry3 = &new GtkEntry();
$entry4 = &new GtkEntry();
$entry6 = &new GtkEntry();
$entry7 = &new GtkEntry();


$button = &new GtkButton('Next');
$button->connect("clicked","nextn");
$button2 = &new GtkButton('Prev');
$button2->connect("clicked","prevn");
$button3 = &new GtkButton('First');
$button3->connect("clicked","firstn");
$button4 = &new GtkButton('Last');
$button4->connect("clicked","lastn");

$buttonadd = &new GtkButton('Add');
$buttonadd->connect("clicked","add");
$buttonsave = &new GtkButton('Save');
$buttonsave->connect("clicked","save");
$buttonedit = &new GtkButton('Edit');
$buttonedit->connect("clicked","edit");
$buttondelete = &new GtkButton('Delete');
$buttondelete->connect("clicked","delete");
$buttonexit = &new GtkButton('Exit');
$buttonexit->connect("clicked","destroy");


$img = &new GtkImage  ();

$table = new GtkTable();
$label = new GtkLabel('0');
$labeld = new GtkLabel('dari');
$labeln = new GtkLabel($num_rows); 

$fixed = &new GtkFixed();
$fixed -> put ($label, 280,320 ) ;
$fixed -> put ($labeld, 300,320 ) ;
$fixed -> put ($labeln, 320,320 ) ;

$fixed -> put ($label0, 250, 40 ) ;

$fixed -> put ($label1, 50, 120 ) ;
$fixed -> put ($label2, 50, 150 ) ;
$fixed -> put ($label3, 50, 180 ) ;
$fixed -> put ($label4, 50, 210 ) ;
$fixed -> put ($label5, 50, 240 ) ;
$fixed -> put ($label6, 50, 270 ) ;


$fixed -> put ($entrya, 350, 120 ) ;
$fixed -> put ($entry1, 150, 120 ) ;
$fixed -> put ($entry2, 150, 150 ) ;
$fixed -> put ($entry3, 150, 180 ) ;
$fixed -> put ($entry4, 150, 210 ) ;
$fixed -> put ($entry6, 150, 240 ) ;
$fixed -> put ($entry7, 150, 270 ) ;

$fixed -> put ($button, 150, 360 ) ;
$fixed -> put ($button2, 100, 360 ) ;
$fixed -> put ($button3, 50, 360 ) ;
$fixed -> put ($button4, 200, 360 ) ;

$fixed -> put ($buttonadd, 50, 390 ) ;
$fixed -> put ($buttonsave, 100, 390 ) ;
$fixed -> put ($buttonedit, 150, 390 ) ;
$fixed -> put ($buttondelete, 200, 390 ) ;
$fixed -> put ($buttonexit, 300, 390 ) ;

$fixed -> put ($img, 400, 200 ) ;
$fixed -> put ($table, 500, 250 ) ;



$window->add($fixed);
/*
 * Create a new tooltips object and use it to set a tooltip for the button.
 */

/*
 * Show the window and all its child widgets.
 */
$window->show_all();

/* Run the main loop. */
Gtk::main();

?>

Tidak ada komentar:

Posting Komentar