Jumat, 04 Oktober 2013

Pemograman Web Dinamis

SINTAK DAFTAR PENYAKIT

<html>
<body bgcolor="blue">
</body>
<?php
echo "<h2><p align='center'>Tambah Data Penyakit</h2></p>";
echo "<form method='post' action='simpandata.php'>";
echo "<table>

<tr>
 <td width=150>Kode Penyakit </td>
 <td><input type='text' name='kode' size=4></td>
</tr>
<tr>
 <td>Nama Penyakit</td>
 <td><input type='text' name='nama' size=40></td>
</tr>
<tr>
 <td valign='middle'>Definisi Penyakit </td>
 <td><textarea name='definisi' cols=40 rows=6></textarea></td>
</tr>
<tr>
 <td colspan=2 align='center'><input type='submit' value='OK'></td>
</tr>";
echo "</table></form>";
?>
</html>

Hasil Dari Script Di atas :


SINTAK SUKSES PENYIMPAN DATA PENYAKIT

<html>
<body bgcolor="blue">
</body>
<?php
include "koneksi.php";
$kode = $_POST['kode'];
$nama = $_POST['nama'];
$definisi= $_POST['definisi'];

$query = "insert into penyakit (`kode`,`nama`,`definisi`)
values ('$kode','$nama','$definisi')";
$hasil = mysql_query($query) or die(mysql_error());
if($hasil)
{
echo "<h2 align='center'>Pengiriman Data Sukses !</h2>";
} else {
echo "<h2 align='center'>Pengiriman Data Gagal !
<input type=button value=BACK
OnClick=self.history.back();></h2>";
}
?>
</html>

Hasil Dari Script di atas :



SINTAK DAFTAR DATA PENYAKIT

<html>
<body bgcolor="blue">
</body>

<?php
echo "<h1 align='center'>Daftar Data Penyakit</h1>";
?>
<table border="1" width="550" align="center">
<tr>
 <td height=20 align="center" width=50><b>Kode</b></td>
 <td align="center" width=200><b>Nama Penyakit</b></td>
 <td align='center' width=300><b>Definisi</b></td>
</tr>

<?php
include "koneksi.php";
$qdata = mysql_query("select
kode,nama,definisi from penyakit");
while($rdata = mysql_fetch_array($qdata))
{
$kode = $rdata["kode"];
$nama = $rdata["nama"];
$definisi = $rdata["definisi"];
echo "<tr> <td align='center'>$kode</td>
   <td>$nama</td>
   <td>$definisi</td></tr>";}
?>
</table>
</html>

Hasil Dari Script Di atas :



SINTAK EDIT PENYAKIT

<html>

<body bgcolor="blue">

</body>

<?php
include "koneksi.php";
?>

<table border="1" width="550" align="center">
<tr>
 <td height=20 align="center" width=50><b>Kode</b></td>
 <td align="center" width=170><b>Nama Penyakit</b></td>
 <td align='center' width=250><b>Definisi</b></td>
 <td align='center' width=80><b>Fungsi</b></td>
</tr>

<?php
 if(isset($_POST['kirim_edit']))
{
$kode = $_POST['kode'];
$nama = $_POST['nama_penyakit'];
$definisi= $_POST['definisi'];
$query3 = "update penyakit set
kode='$kode',
nama='$nama',
definisi='$definisi'
where kode='$kode'";
mysql_query($query3);
}
$i=0;
$qdata = mysql_query("select kode,nama,definisi from penyakit order by kode");
while($rdata = mysql_fetch_array($qdata))
{
$pkode = $rdata["kode"];
$pnama = $rdata["nama"];
$pdefinisi = $rdata["definisi"];
echo "


<tr>
 <td align='center'>$pkode</td>
 <td>$pnama</td>
 <td>$pdefinisi</td>
 <td align='center'>
 <a href='editpenyakit.php?kode=$pkode&edit=1'>Edit</a></td>
</tr>";
$i++;
} ?>
</table>

<?php
 if(isset($_GET['edit']))
{
$kode = $_GET['kode'];
$qdata2 = mysql_query("select kode, nama, definisi from penyakit where kode='$kode'");
while($rdata2 = mysql_fetch_array($qdata2))
{
$kode2 = $rdata2["kode"];
$nama2 = $rdata2["nama"];
$definisi2 = $rdata2["definisi"];
}
echo "<p align='center'>Ubah Data Penyakit <br><br>";
echo "<form method='post' action='edit_penyakit.php'>
<input type='hidden' name='kode' value='$kode2'>
<input type='hidden' name='kirim_edit' value=1>";
echo "<table border=0 width=500 align='center'>";
echo "<tr>
 <td width=150>Kode Penyakit </td>
 <td><input type='text' name='kode_penyakit' size=4 value='$kode2'></td>
 </tr>
<tr>
 <td>Nama Penyakit</td>
 <td><input type='text' name='nama_penyakit' size=40 value='$nama2'></td>
</tr>
<tr>
 <td valign='middle'>Definisi Penyakit</td>
 <td><textarea name='definisi' cols=40 rows=6>$definisi2</textarea></td>
</tr>
<tr>
 <td colspan=2 align='center'><input type='submit' value='EDIT'></td>
</tr>";
echo "</table></form></p>";
}
?>
</html>

Hasil Dari Script Di atas :



SINTAK HAPUS DATA PENYAKIT

<html>
<body bgcolor="blue">
</body>
<?php
 include "koneksi.php";
?>
<table border="1" width="550" align="center">
<tr>
 <td height=20 align="center" width=50><b>Kode</b></td>
 <td align="center" width=170><b>NamaPenyakit</b></td>
 <td align='center' width=250><b>Definisi</b></td>
 <td align='center' width=80><b>Fungsi</b></td>
</tr>

<?php
$hapus = 0;
if(!empty($_GET['hapus'])){
$hapus = $_GET['hapus'];
$kode = $_GET['kode'];
}
if($hapus==1)
{
$query2 = "delete from penyakit where kode='$kode'";
mysql_query($query2);
}
$qdata = mysql_query("select kode,nama,definisi from penyakit order by kode");
$i =0;
while($rdata = mysql_fetch_array($qdata))
{
$pkode = $rdata["kode"];
$pnama = $rdata["nama"];
$pdefinisi = $rdata["definisi"];
echo "<tr>
 <td align='center'>$pkode</td>
 <td>$pnama</td>
 <td>$pdefinisi</td>
 <td align='center'>
 <a href='hapuspenyakit.php?kode=$pkode &hapus=1'>Hapus</a></td> </tr>";
$i++;
}
?>
</table>
</html>

Hasil Dari Script Di atas : 


KONEKSI KE DATA BASE

<?php
mysql_connect("localhost","root","");
mysql_select_db("datapenyakit");
?>

Rabu, 27 Maret 2013

Resume film pirates of silicon valley


Film Ini menceritakan tentang 2 orang yang memegang perusahaan besar Perusahaan APPLE DAN MICROSOFT, yang selalu kita gunakan saat ini di bidang IT.Mereka merintas dari nol Untuk Membuat OS yang kita gunakan saat ini yang sudah banyak berkembang.  Mereka adalah Steve Jobs dan Bill Gates. Steve jobs yang pertama kali sukses yang membuat computer apple, sedangkan Bill gates baru perusahaan kecil yang masih membangun, Namun produk dasar mereka cukup menarik bagi IBM dan suatu saat bertemulah Bill Gates dengan petinggi IBM. Pada pertemuan tersebut, Bill Gates berhasil meyakinkan IBM bahwa mereka memiliki produk yg dibutuhkan IBM. Dan kawan Bill membeli program XDOS, dan mereka mengganti menjadi Mc dos. Lalu di jual mahal kepada IBM. Dan Microsoft kerja sama dengan IBM, Microsoft semakin bderkembang tapi masih tetap dibawal apple. Dan Bill pun penasaran, dan menemui stave dan steve pun memperlihatkan prototype yang sedang apple kembangkan, dan steve pun memberi Bill prototype 1buah, di karenakan Bill berjanji akan bekerja sama untuk mengembangkannya. Dan berjalannya waktu steve pun sadar, dan dia dengar kabar di Jepang sudah beredar komputer dengan program yang mirip dengan
produk apple. Program tersebut adalah Microsoft Windows.