Jumat, 23 November 2012

  • Script Poling

    Posted by: on 22.07 in 0

    Tips dan Trik IlmuKomputer.Com
    Copyright © 2003 IlmuKomputer.Com
    1
    Stieven R. Kalengkian
    stieven@kawanuanetworks.com
    http://www.php.wox.org
    Pertama buatlah file dengan nama  pilihan.dat lewat text editor notepad. Dalam file tersebut masukan
    data untuk pilihan polling, contoh :
    AC Milan
    Juventus
    Inter Milan
    AS Roma
    Lazio
    Fiorentina
    Napoli
    Lainnya
    Buat juga satu file dengan nama hasil_polling.dat dan biarkan kosong, file ini untuk menyimpan hasil
    dari polling.
    Kemudian buat satu script php dalam file yang namanya polling.php
    Berikut adalah script dalam polling.php
    <?
    /* ini berfungsi untuk register global variable PHP
    terutama mereka yang menggunakan register_global = off
    bila register_global = on tidak perlu menggunkan script ini
    untuk mengatur register_global periksa pada php.ini
    /*
    extract($_SERVER,"EXTR_PREFIX_SAME");
    extract($HTTP_ENV_VARS,"EXTR_PREFIX_SAME");
    extract($HTTP_GET_VARS,"EXTR_PREFIX_SAME");
    extract($HTTP_POST_VARS,"EXTR_PREFIX_SAME");
    ?>
    <HTML>
    <HEAD>
    <TITLE>Polling</TITLE>
    </HEAD>
    <BODY>
    Lisensi Dokumen:
    Copyright © 2003 IlmuKomputer.Com
    Seluruh dokumen di  IlmuKomputer.Com dapat digunakan, dimodifikasi dan
    disebarkan secara bebas untuk tujuan bukan komersial (nonprofit), dengan syarat
    tidak menghapus atau merubah atribut penulis dan pernyataan copyright yang
    disertakan dalam setiap dokumen. Tidak diperbolehkan melakukan penulisan ulang,
    kecuali mendapatkan ijin terlebih dahulu dari IlmuKomputer.Com. Tips dan Trik IlmuKomputer.Com
    Copyright © 2003 IlmuKomputer.Com
    2
    <?
    //variable file
    $data_pilihan="pilihan.dat";
    $hasil_polling="hasil_polling.dat";
    if (!file_exists($hasil_polling)) {
    $fopen=fopen($hasil_polling,"w+");
     fclose($hasil_polling);
    }
    /* gambar/image untuk hasil polling
    kamu bisa mengganti sesuka kamu dengan syarat ukuran file harus lebar 100x10
    pixel
    */
    $gambar="persen.gif";
    $judul="Peraih scudetto 2000/2001 ?";
    //proses polling
    $file_data=file("pilihan.dat");
    //tampilan form polling jika tombol poling belum di pilih
    if ($go !=1)
    {
    echo "<center><i>$judul</i></center><br>\n";
    echo "<form method=post>";
    for ($i=0; $i<=count($file_data)-1; $i++)
    {
    echo "<input type=radio name=\"vote\" value=\"$i\">
    $file_data[$i]<br>\n";
    }
    echo "<input type=hidden name=go value=1>";
    echo "<p><center><input type=submit value=Polling>";
    echo "</form>";
    echo "<a href='polling.php?result=1&go=1'>Hasil Polling</a></center>";
    }
    else
    {
    //membaca hasil poling sebelumnya
    $file_hasil=fopen($hasil_polling, "r");
    $baris=fgets($file_hasil, 255);
    $pisah=explode("|", $baris);
    fclose($file_hasil);
    if ($result!=1)
    {
    //menambah dan memasukan nilai polling
    $ficdest=fopen($hasil_polling, "w");
    for ($i=0; $i<=count($file_data)-1; $i++)
    {
    if ($i == $vote)
    {
    $pisah[$i]+=1;
    }
    fputs($ficdest, "$pisah[$i]|");
    }
    fclose($ficdest);
    $result=1;  Tips dan Trik IlmuKomputer.Com
    Copyright © 2003 IlmuKomputer.Com
    3
    }
    if ($result==1)
    {
    //menampilkan hasil polling
    echo "<table cellpadding=10>";
    echo "<tr><td align=center><font face=Verdana size=2>";
    echo "<i>Pilihan</i></font>";
    echo "</td><td align=center><font face=Verdana size=2>";
    echo "<i>%</i></font></td>";
    echo "<td align=center><font face=Verdana size=2>";
    echo "<i>Jumlah Pemilih</i></font></td></tr>";
    for ($i=0; $i<=count($file_data)-1; $i++)
    {
    $jumlah_pemilih+=$pisah[$i];
    }
    for ($i=0; $i<=count($file_data)-1; $i++)
    {
    $persen[$i]=$pisah[$i]/$jumlah_pemilih*100;
    echo "<tr><td><li><font face=Verdana size=2>";
    echo "$file_data[$i]</font></td><td align=left><font face=Verdana
    size=2>";
    echo "<img src=\"$gambar\" height=10 width=$persen[$i]
    align=middle>&nbsp;";
    printf("%.1f", "$persen[$i]");
    echo "%</font></td><td align=center><font face=Verdana size=2>";
    echo "$pisah[$i]</font>";
    echo "</td></tr>";
    }
    echo "</table><p>";
    echo "<center>Total: $jumlah_pemilih pemilih</center>";
    }
    }
    ?>
    </BODY>
    </HTML>
    script ini hasil modifikasi dari buku Yudhi Purwanto,  Pemrograman Web dengan PHP,  Elex Media
    Komputindo. 2001 dengan beberapa penyempurnaan berdasarkan penyesuaian keadaan sekarang. Selamat
    Mencoba!
    Download Source : http://www.php.wox.org/ipen_v2/tutor/php/polling.zip
    More Tips & Tutor : http://www.php.wox.org
    Tulisan ini dipersembahkan untuk SMU Binaan Khusus Sulawesi Utara

    • 0 komentar:

    Posting Komentar

    Langganan: Posting Komentar (Atom)

    Copyright @ 2014 Diary Studio | The Best Solution | Jasa Pembuatan Website.

    Designed by Diary | TechTabloids