Ilustrasi Kerja WAP WAE Push Framework PUSH PROXY

Ilustrasi Kerja WAP

WAE - Push Framework PUSH PROXY GATEWAY CLIENT PUSH INITIATOR OVER-THE-AIR PUSH ACCESS PROTOCOL PPG SERVICES PUSH MESSAGE

Arsitektur WAP

WAP Application Server

Arsitektur WAP

HTML vs WML

WAE - WML Navigation Variables Input Elements <WML> <CARD> <DO TYPE=“ACCEPT”> <GO URL=“#e. Card”/> </DO Welcome! </CARD> <CARD NAME=“e. Card”> <DO TYPE=“ACCEPT”> <GO URL=“/submit? N=$(N)&S=$(S)”/> </DO> Enter name: <INPUT KEY=“N”/> Choose speed: <SELECT KEY=“S”> <OPTION VALUE=“ 0”>Fast</OPTION> <OPTION VALUE=“ 1”>Slow</OPTION> <SELECT> </CARD> </WML> Card Deck

WAE - WML Script WMLScript is very similar to Java. Script Functions Variables Programming Constructs function currency. Convertor(currency, exch. Rate) { return currency*exchange. Rate; } function my. Day(sun. Shines) { var my. Day; if (sun. Shines) { my. Day = “Good”; } else { my. Day = “Not so good”; }; return my. Day; }

MENYIAPKAN LINGKUNGAN PEMROGRAMAN WAP 10

KOMPONEN WAP SERVER WAP Server Komponen di WAP Server : 1. Web Server, dalam hal ini bisa menggunakan Apache. 2. Database, sebagai penyimpan informasi di WEB, bisa menggunakan My. SQL. 3. PHP, sebagai bahasa script disisi server untuk pengembangan WAP. 4. WML, sebagai interface ke HP sehingga kode-kode PHP bisa terbaca di ponsel yang terbatas kemampuannya.

WML (Wireless Markup Language) n Bahasa berbasis tag: Manajemen Layar (text, image) ¨ Input Data (text, selection lists, dll. ) ¨ Dukungan Hyperlink & navigasi ¨ n n Didasarkan pada XML Berekstensi. wml

WML Structure

Prak-1. wml <? xml version="1. 0"? > <!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1. 1//EN" "http: //www. wapforum. org/DTD/wml_1. 1. xml"> <wml> <card id="no 1" title="Card 1"> <p> Hello world!</p> <card id="no 2" title="Card 2"> <p> Welcome to our WAP Toturial!</p> </card> </wml>

Prak-2. wml <? xml version="1. 0"? > <!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1. 1//EN" "http: //www. wapforum. org/DTD/wml_1. 1. xml"> <wml> <card id="satu" title="Card Satu"> <do type="accept" label="Ke. Dua"> <go href="#dua"/> </do> <p>ini card yang pertama</p> </card> <card id="dua" title="Card Dua"> <do type="accept" label="Ke. Tiga"> <go href="#tiga"/> </do> <p>ini card yang kedua</p> </card> <card id="tiga" title="Card Tiga"> <do type="options" label="Ke. Satu"> <go href="#satu"/> </do> <p>ini card yang ketiga</p> </card> </wml>

Prak-3. wml <? xml version="1. 0"? > <!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1. 1//EN" "http: //www. wapforum. org/DTD/wml_1. 1. xml"> <wml> <p> <big>Help topics : </big> <br/> <a href="satu. wml">Satu</a> <br/> <a href="dua. wml">Dua</a> <br/> <a href="tiga. wml">Tiga</a> <br/> <a href="empat. php">Empat</a> <br/> </p> </card> </wml>

Prak-4. wml <? xml version="1. 0"? > <!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1. 1//EN" "http: //www. wapforum. org/DTD/wml_1. 1. xml"> <wml> <card id="satu" title="Card Satu"> <do type="accept" label="Ke. Dua"> <go href="#dua"/> </do> <p>ini card yang pertama</p> </card> <card id="dua" title="Card Dua"> <do type="accept" label="Ke. Tiga"> <go href="#tiga"/> </do> <p>ini card yang kedua</p> </card> <card id="tiga" title="Card Tiga"> <do type="options" label="Ke. Satu"> <go href="#satu"/> </do> <p>ini card yang ketiga</p> </card> </wml>

Prak-5. wml <? xml version="1. 0"? > <!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1. 1//EN" "http: //www. wapforum. org/DTD/wml_1. 1. xml"> <wml> <card title="Input Data"> <p> <table> <tr><td>Nobp</td><input type=text name="nobp" size="14"/></td></tr> <tr><td>Nama</td><input type=text name="nama" size="20"/></td></tr> <tr><td>Kelas</td><input type=text name="kelas" size="15"/></td></tr> <tr><td>Jurusan</td><input type=text name="jrs" size="20"/></td></tr> <tr><td><input type=submit name="simpan" value="send"></td></tr> </table> </p> </card> </wml>

Prak-6. wml <? xml version="1. 0"? > <!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1. 1//EN" "http: //www. wapforum. org/DTD/wml_1. 1. xml"> <wml> <card id="satu" title="Login" newcontext="true"> <do type="accept" label="Next"> <go href="#dua"/> </do> <p> user name: <input type="text" name="name" /> password: <input type="password" name="pass" /> </p> </card> <card id="dua" title="Echo"> <p> Nama anda : $name password : $pass </p> </card> </wml>

Prak-7. wml <? xml version="1. 0"? > <!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1. 1//EN" "http: //www. wapforum. org/DTD/wml_1. 1. xml"> <wml> <card title="Selected List 1"> <p> <select multiple="true"> <option value="htm">HTM Toturial</option> <option value="xml">XML Toturial</option> <option value="WAP">WAP Toturial</option> <option value="PHP">PHP Toturial</option> </select> </p> </card> </wml>

Prak-8. wml <? xml version="1. 0"? > <!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1. 1//EN" "http: //www. wapforum. org/DTD/wml_1. 1. xml"> <wml> <card title="Selected List 3"> <p> <select> <option value="1" onpick="#About" id="about">About</option> <option value="2" onpick="#Profile" id="profile">Profile UPI -YPTK</option> <option value="3" onpick="#Fakultas" id="fakultas">Fakultas</option> <option value="4" onpick="#Headline" id="headline">Berita Hari Ini</option> </select> </p> </card> <card title="About UPI-YPTK" id="About"> <p>Created by. Soe, Dst. . </p> </card> <card title="Profile UPI-YPTK" id="Profile"> <p>[1]. Berdiri Tahun 1985, Dst. . </p> </card> <card title="Fakultas"" id="Fakultas"> <p>[1]. Fakultas Ilmu Komputer</p> <p>[2]. Fakultas Ekonomi</p> <p>[3]. Fakultas Teknologi Industri</p> <p>[4]. Fakultas Sipil & Perencanaan</p> <p>[5]. Fakultas Psikologi</p> <p>[6]. Fakultas Desain Komunikasi Visual</p> </card> <card title="Headline"" id="Headline"> <p>Wisuda Periode II 24 April 2010, Dst. . </p> </card> </wml>

Prak-9. wml <? xml version="1. 0"? > <!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1. 1//EN" "http: //www. wapforum. org/DTD/wml_1. 1. xml"> <wml> <card title="card 1" title="Torial"> <do type="accept" label="Anwer"> <go href="#card 2"/> </go> </do> <p> <select name="name"> <option value="HTML">HTML Toturial</option> <option value="XML">XML Toturial</option> <option value="WAP">WAP Toturial</option> <option value="PHP">PHP Toturial</option> </select> </p> </card> <card title="About UPI-YPTK" id="card 2"> <p>Yang dipilh adalah : $(name) </p> </card> </wml>

Prak-10. wml <? xml version="1. 0"? > <!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1. 1//EN" "http: //www. wapforum. org/DTD/wml_1. 1. xml"> <wml> <card title="M-Rental"> <p> <select> <option value="[1]" onpick="#About" id="Input">Input User</option> <option value="[2]" onpick="#Profile" id="profile">Tampil Pemakaian</option> <option value="[3]" onpick="#Headline" id="headline">Home</option> </select> </p> </card> <card title="About UPI-YPTK" id="About"> <p>Created by. Soe, Dst. . </p> </card> <card title="Profile UPI-YPTK" id="Profile"> <p>[1]. Berdiri Tahun 1985, Dst. . </p> </card> <card title="Fakultas"" id="Fakultas"> <p>[1]. Fakultas Ilmu Komputer</p> <p>[2]. Fakultas Ekonomi</p> <p>[3]. Fakultas Teknologi Industri</p> <p>[4]. Fakultas Sipil & Perencanaan</p> <p>[5]. Fakultas Psikologi</p> <p>[6]. Fakultas Desain Komunikasi Visual</p> </card> <card title="Headline"" id="Headline"> <p>Wisuda Periode II 24 April 2010, Dst. . </p> </card> </wml>

APLIKASI WAP DENGAN PHP Pengembangan aplikasi WAP dengan PHP memungkinkan membuat aplikasi seperti database, mail server, pengiriman pesan, dll. Supaya script PHP dapat didukung oleh perangkat WAP, script ini harus menghasilkan output header WML kepada client. Karena itu, setiap dokumen WML yang berisi kode PHP harus menyertakan baris-baris berikut yang ditempatkan pada awal deck. <? php header("Content-type: text/vnd. wap. wml"); echo "<? xml version="1. 0"? >"; echo "<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1. 1//EN" "http: //www. wapforum. org/DTD/wml_1. 1. xml">"; ? >

Mengapa PHP digunakan? n n Bahasa mirip C dan Java Mudah Pemakaiannya Kode “ditanamkan” pada HTML/WML/XHTML. ¨ Kode php dimulai dan diakhiri dengan tanda (tag) ¨ <html> <head> <title>Example</title> </head> <body> <? php echo "Hi, I'm a PHP script!"; ? > </body> </html>

Why PHP? n Cross Platform Dapat jalan hampir di semua web server pada beberapa sistem operasi ¨ Web server: Apache, Microsoft IIS, Caudium, Netscape Enterprise Server ¨ Sistem operasi: NIX (HP-UX, Open. BSD, Solaris, Linux), Mac OSX, Windows NT/98/2000/XP/2003 ¨ Database: Adabas D, d. Base, Empress, File. Pro (read-only), Hyperwave, IBM DB 2, Informix, Ingres, Inter. Base, Front. Base, m. SQL, Direct MS-SQL, My. SQL, ODBC, Oracle (OCI 7 and OCI 8), Ovrimos, Postgre. SQL, SQLite, Solid, Sybase, Velocis, Unix dbm ¨ n Keuntungan dalam biaya ¨ PHP is free.

Diagram Posisi Basis Data Web Server Web dinamis Manipulasi data My. SQL (Database) Interpreter PHP Web Browser File PHP Page yg diinginkan

Komunikasi n Komunikasi antara web server dengan perangkat nirkabel WAP-enabled, membutuhkan WAP Gateway

Three Tier Client-Server Architecture

Komponen Web

Mapping URL Sistem Web

Web Server vs Web Application n Web Application: ¨ n Web Server: ¨ n n Menggunakan bahasa Pemprograman(misal ASP, PHP, Java, . Net, Perl atau. NET) Melayani permintaan client dan meneruskan ke aplikasi yang sesuai selanjutnya diproses oleh aplikasi yang sesuai (misal IIS, Apache, thttpd dll. ) Web Application tidak bisa jalan tanpa Web Server bisa bekerja tanpa Web Application (Tapi hanya bisa melayani web dengan content statis)

Web Server n n Web Server: apache, xitami, PWS, IIS Biasanya diinstall bersama dengan PHP dan My. SQL => Apache. Triad ¨ Aplikasi free, ukuran cukup besar ¨ Tidak perlu konfigurasi n n Hanya perlu user & password apache dan My. SQL Bisa diinstall di Linux (XAMPP) dan Windows (WAMPP)

http: //www. apachefriends. org/en/xampp -windows. html

File konfigurasi Web Server n httpd. conf srm. conf access. conf n Juga perlu setting: n n ¨ Virtual Host

Httpd. conf n n n n Server. Type – berdiri sendiri / manual inetd. Server. Root – directory konfigurasi. Pid. File – nomor proses ID Resource. Config / Access. Config Time. Out – batas waktu time out. Keep. Alive – simultan koneksi dari satu IP. Max. Keep. Alive. Request – max. keep alive. Keep. Alive. Time. Out

Httpd. conf n n n n Min. Spare. Servers & Max. Spare. Servers – jumlah server untuk server farm. Start. Servers – server di jalankan. Max. Clients – jmlh koneksi simultan di server. Max. Requests. Per. Child Bind. Address – IP yang di tempelkan. Port – port yang di dengar Apache. User & Group – owner dari Apache Web. Server. Admin – e-mail admin Web server.

httpd. conf n n n n Server. Name – nama server. Error. Log. Level – level emerg, alert, crit, errors. Custom. Log – catat akses client & virtual host. Server. Signature – dikirim saat file tidak ada. User. Canonical. Name Hostname. Lookups – catat hostname akses.

srm. conf n n n n Document. Root – directory root HTML. User. Dir – public_html, http: //server/~user. Directory. Index – index file. Fancy. Indexing Access. File. Name -. htaccess Alias – alias directory khusus, cgi-bin Default. Type – Default tipe dokumen

access. conf <Directory /> Options Follow. Sym. Links Allow. Override None </Directory> <Directory “/usr/local/apache/htdocs”> Options Indexes Follow. Sym. Links Allow. Override None Allow from all </Directory>

Virtual Host – IP based <Virtual. Host 192. 168. 0. 1> Document. Root /path/to/document Server. Name www. vhost 1. com </Virtual. Host>

Virtual Host – name based Name. Virtual. Host 192. 168. 0. 128 <Virtual. Host 192. 168. 0. 128> Document. Root /path/to/document 1 Server. Name www. vhost 1. com </Virtual. Host> <Virtual. Host 192. 168. 0. 128> Document. Root /path/to/document 2 Server. Name www. vhost 2. com </Virtual. Host>

Database n n n Kumpulan data Tersimpan dalam suatu tempat Dapat digunakan secara bersama

Database Secara digital n n n tersimpan dalam bentuk file tersimpan dalam database server diakses secara bersama melalui jaringan komputer

Database Dalam sistem informasi, penerapan database tidak hanya ditinjau dari sisi ketersediaan data tetapi juga dari sisi • keamanan data • konsistensi data • validitas data • reliablilitas system Perlu menejemen data

Database Management System sistem basisdata yang mamiliki kemampuan menajemen untuk menjamin ketersediaan, keamanan, reliabilitas, konsistensi dan validitas data

Database Management System Bagaimana cara mengorganisasikan data dalam database? Salah satu metode yg digunakan Menggunakan metode relasi yang didasarkan pada teori himpunan matematika

Database Management System Tabel A Tabel B Tabel C Tabel D Tabel E Relational Database Management System

Web Database n n n Tempat penyimpanan (repositories) database atau informasi yang secara dinamis berinteraksi dengan halaman Web Sebuah metode untuk menyimpan content WWW, dalam format terstruktur atau usable, yang terhubung baik secara statis maupundinamis dengan database lain Membantu komunikasi antara Web server dan Database. dan memungkinkan pemakai menerbitkan atau mengumpulkan informasi dari manapun

Tujuan n Menyediakan jalan / cara remote access ke database server melalui browser Menggabungkan web server (http) dan database server Menggunakan semua metodologi web design standard untuk menyediakan kemudahan pemakaian, front end GUI ke database

CONTOH APLIKASI WAP-PHP-MYSQL CREATE TABLE skor_bola ( klub 1 CHAR(45) NOT NULL, Script – Table Bola klub 2 CHAR(45) NOT NULL, skor 1 CHAR(15) NOT NULL, skor 2 CHAR(15) NOT NULL, ID int PRIMARY KEY ); INSERT INTO skor_bola VALUES ('MU', 'MC', '3', '1'); INSERT INTO skor_bola VALUES ('FCB', 'RM', '4', '2'); INSERT INTO skor_bola VALUES ('LIV', 'INT', '2', '1', '3'); INSERT INTO skor_bola VALUES ('INA', 'LA', '0', '1', '4'); INSERT INTO skor_bola VALUES ('INA', 'MAS', '4', '0', '5'); INSERT INTO skor_bola VALUES ('INA', 'QTA', '2', '1', '6'); CREATE TABLE tuser ( usernm varchar(20) NOT NULL default '', passw varchar(20) default NULL, PRIMARY KEY (usernm) ) TYPE=My. ISAM; INSERT INTO tuser VALUES ('Admin', 'admin'); Script – Table tuser

Script – menu. php <? php header('Content-type: text/vnd. wap. wml'); echo('<? xml version="1. 0"? >'); echo('<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1. 1/EN">'); ? > <wml> <card title=". : : Menu Pilihan : : . " newcontext="true"> <p align="left"> <small> <br/> <? php echo "<a href="addbola. php">Add Bola</a><br/>"; echo "<a href="brwosebola. php">Browse Bola</a><br/>"; echo "<a href="listbola. php">List Bola</a><br/>"; echo "<a href="Form. Login. php">Log. Out</a><br/>"; echo "<br/>"; ? > </small> </p> </card> </wml>

<wml> <card id="baca" title="Add Bola"> <table bgcolor=#FFFF 99 color=#FF 0000><small><center> <? echo('<? xml version="1. 0"? >'); $con=mysql_connect("localhost", "root", ""); $nama_db=mysql_select_db("wap"); echo "<form action='' method='GET'>"; echo "Klub 1 <input type='text' height='22' width='75' name='klub 1'>"; echo "Klub 2 <input type='text' height='22' width='75' name='klub 2'>"; echo "Skor 1 <input type='text' height='22' width='75' name='skor 1'>"; echo "Skor 2 <input type='text' height='22' width='75' name='skor 2'>"; echo "<hr>"; echo "<input type='submit' name='simpan' value='Add'> "; echo "<input type='reset' name='batal' value='Cancel'> "; echo "</form>"; if ($_REQUEST[simpan]=='Add') { $klub 1=$_REQUEST[klub 1]; $klub 2=$_REQUEST[klub 2]; $skor 1=$_REQUEST[skor 1]; $skor 2=$_REQUEST[skor 2]; $sqlu="insert into skor_bola values ('$klub 1‘, '$klub 2', '$skor 1', '$skor 2')"; $result 1=mysql_query($sqlu); echo "Sukses disimpan. . !!"; } ? > <a href="menu. php">Back</a> </card> </wml> Script – addbola. php

Script – browsebola. php <wml> <card id="baca" title="Browse Bola"> <table bgcolor=#FFFF 99 color=#FF 0000><small><center> <? echo('<? xml version="1. 0"? >'); $con=mysql_connect("localhost", "root", ""); $nama_db=mysql_select_db("wap"); $sql="select * from skor_bola"; $result=mysql_query($sql); echo "<a href='addbola. php'>Add Bola</a>"; while ($row=mysql_fetch_array($result)) { echo "<hr>"; echo "$row[klub 1]-$row[klub 2] : $row[skor 1]-$row[skor 2]"; echo " <a href='editbola. php? ID=$row[ID]'>Edit | </a>"; echo "<a href='deletebola. php? ID=$row[ID]'>Del</a>"; } ? > <a href="menu. php">Back</a> </card> </wml>

<wml> <card id="baca" title="Deleting Bola"> <table bgcolor=#FFFF 99 color=#FF 0000><small><center> <? echo('<? xml version="1. 0"? >'); $con=mysql_connect("localhost", "root", ""); $nama_db=mysql_select_db("wap"); $ID=$_REQUEST[ID]; $sql="select * from skor_bola where ID='$ID'"; $result=mysql_query($sql); $row=mysql_fetch_array($result); $klub 1=$row[klub 1]; $klub 2=$row[klub 2]; $skor 1=$row[skor 1]; $skor 2=$row[skor 2]; echo "<form action='' method='GET'>"; echo "ID : <b><i> $ID "; echo "Klub 1 <input type='text' height='22' width='75' name='klub 1' value=$klub 1>"; echo "Klub 2 <input type='text' height='22' width='75' name='klub 2' value=$klub 2>"; echo "Skor 1 <input type='text' height='22' width='75' name='skor 1' value=$skor 1>"; echo "Skor 2 <input type='text' height='22' width='75' name='skor 2' value=$skor 2>"; echo "<input type='submit' name='hapus' value='Delete'> "; echo "<input type='reset' name='batal' value='Cancel'> "; echo "</form>"; if ($_REQUEST[hapus]=='Delete') { //echo "$klub 1 -$klub 2 -$skor 1 -$skor 2 -$ID"; $sqlu="delete from skor_bola where ID='$ID' "; $result 1=mysql_query($sqlu); echo "Sukses dihapus. . !!"; } ? > <a href="browsebola. php">Back</a> </card> </wml> Script – deletebola. php echo "<hr>";

<wml> <card id="baca" title="Editing Bola"> <table bgcolor=#FFFF 99 color=#FF 0000><small><center> <? echo('<? xml version="1. 0"? >'); $con=mysql_connect("localhost", "root", ""); $nama_db=mysql_select_db("wap"); $ID=$_REQUEST[ID]; $sql="select * from skor_bola where ID='$ID'"; $result=mysql_query($sql); $row=mysql_fetch_array($result); $klub 1=$row[klub 1]; $klub 2=$row[klub 2]; $skor 1=$row[skor 1]; $skor 2=$row[skor 2]; echo "<form action='' method='GET'>"; echo "ID : $ID "; echo "Klub 1 <input type='text' height='22' width='75' name='klub 1' value=$klub 1>"; echo "Klub 2 <input type='text' height='22' width='75' name='klub 2' value=$klub 2>"; echo "Skor 1 <input type='text' height='22' width='75' name='skor 1' value=$skor 1>"; echo "Skor 2 <input type='text' height='22' width='75' name='skor 2' value=$skor 2>"; echo "<hr>"; echo "<input type='submit' name='Edit' value='Update'> "; echo "<input type='reset' name='batal' value='Cancel'> "; echo "</form>"; if ($_REQUEST[Edit]=='Update') { $klub 1=$_REQUEST[klub 1]; $klub 2=$_REQUEST[klub 2]; $skor 1=$_REQUEST[skor 1]; $skor 2=$_REQUEST[skor 2]; $sqlu="update skor_bola set klub 1='$klub 1', klub 2='$klub 2', skor 1='$skor 1', skor 2='$skor 2' where ID=$ID "; $result 1=mysql_query($sqlu); echo "Sukses diupdate. . !!"; } ? > <a href="browsebola. php">Back</a> </card> </wml> Script – editbola. php

Script – listbola. php <wml> <card id="baca" title="Skor Bola"> <table bgcolor=#FFFF 99 color=#FF 0000><small><center> <? echo('<? xml version="1. 0"? >'); $con=mysql_connect("localhost", "root", ""); $nama_db=mysql_select_db("wap"); $sql="select * from skor_bola"; $result=mysql_query($sql); while ($row=mysql_fetch_array($result)) { echo "<hr>"; echo "$row[klub 1]-$row[klub 2] : $row[skor 1]-$row[skor 2]"; } ? > <hr><a href="menu. php">Back</a> </card> </wml>

Script – formlogin. php <? php header('Content-type: text/vnd. wap. wml'); echo('<? xml version="1. 0"? >'); echo('<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1. 1/EN">'); ? > <wml> <card id="satu" title="Login"> <table> <font size=-2> <tr><td>Username : </td><input width=90 height=25 name="user"></td></tr> <tr><td>Password : </td><input type="password" width=90 height=25 name="pass"></td></tr> <do type="accept" label="Back"> <go href="index. php"/> </do> <anchor> <go method="post" href="proses_login. php"> <postfield name="user. L" value="$(user)"/> <postfield name="pass. L" value="$(pass)"/> </go> Login </anchor> </p>

Script – proses_login. php <? php header('Content-type: text/vnd. wap. wml'); echo('<? xml version="1. 0"? >'); echo('<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1. 1/EN">'); ? > <wml> <card id="card 1" title="Proses Login"> <p> <? php mysql_connect("localhost", "root", ""); mysql_select_db("wap"); $sql="select * from tuser where usernm='". $_POST["user. L"]. "' and passw='". $_POST["pass. L"]. "'"; //echo $sql; $result=mysql_query($sql); $result 1=mysql_num_rows($result); if($result 1>0){ echo "<a href='menu. php'>Silahkan klik disini</a>"; }else{ echo"<center><b>Login Gagal</b> <a href='Form. Login. php'>Back</a>"; } ? > </p> </card> </wml>

CREATE TABLE mhs ( NIM varchar(16) NOT NULL default '', Nama varchar(145) NOT NULL default '', Tgl. Lahir date NOT NULL default '0000 -00 -00', Kelas varchar(15) NOT NULL default '', Jrs char(3) NOT NULL default '', PRIMARY KEY (NIM), KEY NIM (NIM) ) TYPE=My. ISAM; Script – Table mahasiswa INSERT INTO mhs VALUES ('091011152620001', 'Pradani', '1966 -07 -10', 'SK-4', '262'); INSERT INTO mhs VALUES ('091011152620002', 'Atika', '1966 -07 -10', 'SK-4', '262'); INSERT INTO mhs VALUES ('091011152620003', 'Danny', '1966 -07 -10', 'SK-4', '262'); INSERT INTO mhs VALUES ('091011152620004', 'Debie', '1966 -07 -10', 'SK-4', '262'); INSERT INTO mhs VALUES ('091011152620005', 'Cintya', '1966 -07 -10', 'SK-4', '262'); INSERT INTO mhs VALUES ('091011152620006', 'Asep', '1966 -07 -10', 'SK-4', '262'); INSERT INTO mhs VALUES ('091011152620007', 'Joko', '1966 -07 -10', 'SK-4', '262'); INSERT INTO mhs VALUES ('091011152620008', 'Acong', '1966 -07 -10', 'SK-4', '262'); INSERT INTO mhs VALUES ('091011152620009', 'Ucok', '1966 -07 -10', 'SK-4', '262'); INSERT INTO mhs VALUES ('091011152620010', 'Baba', '1966 -07 -10', 'SK-4', '262'); INSERT INTO mhs VALUES ('091011152620011', 'Khan', '1966 -07 -10', 'SK-4', '262'); INSERT INTO mhs VALUES ('091011152620012', 'Nere', '1966 -07 -10', 'SK-4', '262'); INSERT INTO mhs VALUES ('091011152620013', 'Sania', '1966 -07 -10', 'SK-4', '262'); INSERT INTO mhs VALUES ('091011152620014', 'Riani', '1966 -07 -10', 'SK-4', '262'); INSERT INTO mhs VALUES ('091011152620015', 'Ryan', '1966 -07 -10', 'SK-4', '262'); INSERT INTO mhs VALUES ('091011152620016', 'Wilujeng', '1966 -07 -10', 'SK-4', '262');

Browse. Mhs. php <? php header('Content-type: text/vnd. wap. wml'); echo('<? xml version="1. 0"? >'); echo('<!DOCTYPE wml PUBLIC "-//WAPFORUM// DTD WML 1. 1/EN">'); ? >php <wml> <card id="satu" title="Connect-Mysql"> <font size="-3" color="#FF 0000"> <? $con=mysql_connect("localhost", "root", ""); $db=mysql_select_db("dbmhs"); $sql="Select * from mhs"; $hasil=mysql_query($sql); while ($row=mysql_fetch_array($hasil)) { echo "$row[NIM]-$row[Nama]-$row[Tgl. Lahir]- $row[Kelas]-$row[Jrs]"; echo "<a href='editmhs. php? NIM=$row[NIM]'> Edit | </a> "; echo "<a href='deletemhs. php? NIM=$row[NIM]'> Delete</a> <hr>"; } ? > </card> </wml>

editmhs. php <? php header('Content-type: text/vnd. wap. wml'); echo('<? xml version="1. 0"? >'); echo('<!DOCTYPE wml PUBLIC "-//WAPFORUM// DTD WML 1. 1/EN">'); $nim=$_REQUEST[NIM]; $con=mysql_connect("localhost", "root", ""); $db=mysql_select_db("dbmhs"); $sql="Select * from mhs where NIM='$nim' "; $hasil=mysql_query($sql); $row=mysql_fetch_array($hasil); $nama=$row[Nama]; $tgllahir=$row[Tgl. Lahir]; $kelas=$row[Kelas]; $jrs=$row[Jrs]; ? >

<wml> <card id="satu" title="Connect-Mysql"> <font size="-3" color="#FF 0000"> <form action="" method="GET"> NIM <input type="text" name="NIM" value="<? echo $nim; ? > "> Nama <input type="text" name="Nama" value="<? echo $nama; ? > "> Tanggal Lahir <input type="text" name="Tgl. Lahir" value="<? echo $tgllahir; ? > "> Kelas <input type="text" name="Kelas" value="<? echo $kelas; ? > "> Jurusan <input type="text" name="Jrs" value="<? echo $jrs; ? > "> <input type="submit" name="simpan" value="Update"> <input type="reset" name="batal" value="Cancel"> </form>

<? if ($_REQUEST[simpan]=='Update') { echo "Proses Updating. . !"; $nim=$_REQUEST[NIM]; $nama=$_REQUEST[Nama]; $tgllahir=$_REQUEST[Tgl. Lahir]; $kelas=$_REQUEST[Kelas]; $jrs=$_REQUEST[Jrs]; $sql="update mhs set NIM='$nim', Nama='$nama', Tgl. Lahir='$tgllahir', Kelas='$kelas', Jrs='$jrs' where NIM='$nim' "; $hasil=mysql_query($sql); echo "Berhasil di Update. . !"; } ? > <hr><a href="List. Mhs. php">Back</a> </card> </wml>

deletemhs. php <? php header('Content-type: text/vnd. wap. wml'); echo('<? xml version="1. 0"? >'); echo('<!DOCTYPE wml PUBLIC "-//WAPFORUM// DTD WML 1. 1/EN">'); $nim=$_REQUEST[NIM]; $con=mysql_connect("localhost", "root", ""); $db=mysql_select_db("dbmhs"); $sql="Select * from mhs where NIM='$nim' "; $hasil=mysql_query($sql); $row=mysql_fetch_array($hasil); $nama=$row[Nama]; $tgllahir=$row[Tgl. Lahir]; $kelas=$row[Kelas]; $jrs=$row[Jrs]; ? >

<wml> <card id="satu" title="Connect-Mysql"> <font size="-3" color="#FF 0000"> <form action="" method="GET"> NIM <input type="text" name="NIM" value="<? echo $nim; ? > "> Nama <input type="text" name="Nama" value="<? echo $nama; ? > "> Tanggal Lahir <input type="text" name="Tgl. Lahir" value="<? echo $tgllahir; ? > "> Kelas <input type="text" name="Kelas" value="<? echo $kelas; ? > "> Jurusan <input type="text" name="Jrs" value="<? echo $jrs; ? > "> <input type="submit" name="simpan" value="Delete"> <input type="reset" name="batal" value="Cancel"> </form>

<? if ($_REQUEST[simpan]=='Delete') { echo "Proses Deleting. . !"; $sql=" delete from mhs where NIM='$nim' "; $hasil=mysql_query($sql); echo "Berhasil di Hapus. . !"; } ? > <a href="List. Mhs. php">Back</a> </card> </wml>

menu. php <? php header('Content-type: text/vnd. wap. wml'); echo('<? xml version="1. 0"? >'); echo('<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1. 1/EN">'); ? > <wml> <card title=". : : Menu Pilihan : : . " newcontext="true"> <p align="left"> <small> <br/> <? php echo "<a href="addmhs. php">Add Mhs</a><br/>"; echo "<a href="browsemhs. php">Browse Mhs</a><br/>"; echo "<a href="Listmhs. php">List Mhs</a><br/>"; echo "<a href="Form. Login. php">Exit</a><br/>"; echo "<br/>"; ? > </small> </p> </card> </wml>

addmhs. php <? php header('Content-type: text/vnd. wap. wml'); echo('<? xml version="1. 0"? >'); echo('<!DOCTYPE wml PUBLIC "-//WAPFORUM// DTD WML 1. 1/EN">'); $con=mysql_connect("localhost", "root", ""); $db=mysql_select_db("dbmhs"); <? ? > if ($_REQUEST[simpan]=='Add') <wml> { <card id="satu" title="Connect-Mysql"> echo "Proses Adding. . !"; <font size="-3" color="#FF 0000"> $nim=$_REQUEST[NIM]; $nama=$_REQUEST[Nama]; <form action="" method="GET"> $tgllahir=$_REQUEST[Tgl. Lahir]; $kelas=$_REQUEST[Kelas]; NIM $jrs=$_REQUEST[Jrs]; <input type="text" name="NIM"> $sql="Insert into mhs values ('$nim', '$nama', '$tgllahir', '$kelas', '$jrs')"; Nama $hasil=mysql_query($sql); <input type="text" name="Nama"> echo "Berhasil di Disimpan. . !"; Tanggal Lahir } <input type="text" name="Tgl. Lahir"> ? > Kelas <hr><a href=“menu. php">Back</a> <input type="text" name="Kelas"> </card> Jurusan </wml> <input type="text" name="Jrs"> <input type="submit" name="simpan" value="Add"> <input type="reset" name="batal" value="Cancel"> </form>

Listmhs. php <? php header('Content-type: text/vnd. wap. wml'); echo('<? xml version="1. 0"? >'); echo('<!DOCTYPE wml PUBLIC "-//WAPFORUM// DTD WML 1. 1/EN">'); ? > <wml> <card id="satu" title="Connect-Mysql"> <font size="-3" color="#FF 0000"> <? $con=mysql_connect("localhost", "root", ""); $db=mysql_select_db("dbmhs"); $sql="Select * from mhs"; $hasil=mysql_query($sql); while ($row=mysql_fetch_array($hasil)) { echo "$row[NIM]-$row[Nama]-$row[Tgl. Lahir]- $row[Kelas]-$row[Jrs]<hr>"; } ? > <a href=“menu. php”>Back</a> </card> </wml>

CREATE TABLE mtk ( Kode. MK varchar(10) NOT NULL default '', Nama. MK varchar(145) NOT NULL default '', SKS int, Kode. Jrs char(3) NOT NULL default '', PRIMARY KEY (Kode. MK), KEY Kode. MK (Kode. MK) ) TYPE=My. ISAM; Script – Table matakuliah INSERT INTO mtk VALUES ('KKKI 12001', 'Pancasila', '263'); INSERT INTO mtk VALUES ('KKKI 12002', 'Agama', '263'); INSERT INTO mtk VALUES ('KKKI 12003', 'Bahasa Indonesia', '263'); INSERT INTO mtk VALUES ('KKKI 12004', 'Kewarganegaraan', '263'); INSERT INTO mtk VALUES ('KKKI 12005', 'Etika Profesi', '263');

CREATE TABLE ambilmk ( nim varchar(16) NOT NULL default '', kode. MK varchar(10) NOT NULL default '', nilai char(2) defalt NULL, PRIMARY KEY (nim, kode. MK) ) TYPE=My. ISAM; Script – Table ambilmk INSERT INTO ambilmk VALUES ('091011152620003', 'KKKI 12001', 'A'); INSERT INTO ambilmk VALUES ('091011152620003', 'KKKI 12002', 'A'); INSERT INTO ambilmk VALUES ('091011152620003', 'KKKI 12003', 'B'); INSERT INTO ambilmk VALUES ('091011152620003', 'KKKI 12004', 'A'); INSERT INTO ambilmk VALUES ('091011152620003', 'KKKI 12005', 'C'); INSERT INTO ambilmk VALUES ('091011152620016', 'KKKI 12002', 'A'); INSERT INTO ambilmk VALUES ('091011152620016', 'KKKI 12003', 'B'); INSERT INTO ambilmk VALUES ('091011152620016', 'KKKI 12005', 'A');

<? php header('Content-type: text/vnd. wap. wml'); echo('<? xml version="1. 0"? >'); echo('<!DOCTYPE wml PUBLIC "-//WAPFORUM// DTD WML 1. 1/EN">'); ? >php <wml> <card id="satu" title="Connect-Mysql"> <font size="-3" color="#FF 0000"> <? $con=mysql_connect("localhost", "root", ""); $db=mysql_select_db("dbmhs"); $sql="Select * from mtk"; $hasil=mysql_query($sql); while ($row=mysql_fetch_array($hasil)) { echo "$row[Kode. MK]-$row[Nama. MK]-$row[SKS]-$row[Kode. Jrs]"; echo "<a href='editmtk. php? Kode. MK=$row[Kode. MK]'> Edit | </a> "; echo "<a href='deletemtk. php? Kode. MK=$row[Kode. MK]'> Delete</a> <hr>"; } ? > </card> </wml>

M_krs. php <? php mysql_connect("localhost", "root", ""); mysql_select_db("dbmhs"); $sql="Select * from mhs"; $hasil=mysql_query($sql); ? > <wml> <card id="KRS" title="Form KRS"> <font size="" color="#FF 0000"> <form method="post" action="simpan. php"> Nomor BP : <select name="nim"> <? while ($row=mysql_fetch_array($hasil)) { echo "<option value=$row[NIM]>$row[NIM]</option>"; } echo "</select> "; $query = "SELECT * FROM mtk"; $hasil = mysql_query($query); $no = 1; while ($data = mysql_fetch_array($hasil)) { echo "<input type='checkbox' value='". $data['Kode. MK']. "' name='mk". $no. "' /> ". $data['Kode. MK']. ' - '. $data['Nama. MK']. " "; $no++; } ? > <input type="hidden" name="jum. MK" value="<? php echo $no-1; ? >" /> <input type="submit" name="submit" value="Ambil" /> </form>

simpan. php <? php mysql_connect("localhost", "root", ""); mysql_select_db("dbmhs"); $nim = $_REQUEST['nim']; $jum. MK = $_POST['jum. MK']; for($i = 1; $i <= $jum. MK; $i++) { $mk = $_POST['mk'. $i]; if (!empty($mk)) { $query = "INSERT INTO ambil. MK VALUES('$nim', '$mk', '-')"; mysql_query($query); } } echo "Terimakasih sudah memilih matakuliah"; ? >

Form. Nilai. php <? php header('Content-type: text/vnd. wap. wml'); echo('<? xml version="1. 0"? >'); echo('<!DOCTYPE wml PUBLIC "-//WAPFORUM// DTD WML 1. 1/EN">'); mysql_connect("localhost", "root", ""); mysql_select_db("dbmhs"); $sql="Select * from mtk"; $hasil=mysql_query($sql); ? > <card id="KRS" title="Form Nilai"> <font size="" color="#FF 0000"> <form method="post" action="simpan 1. php"> Nomor BP : <select name="kodemk"> <? while ($row=mysql_fetch_array($hasil)) { echo "<option value=$row[Kode. MK]>$row[Kode. MK]</option>"; } echo "</select> "; $query = "SELECT * FROM ambilmk, mhs, mtk where ambilmk. nim=mhs. NIM and ambilmk. kode. MK=mtk. Kode. MK order by mhs. NIM"; $hasil = mysql_query($query); $no = 1; </card> </wml>

while ($data = mysql_fetch_array($hasil)) { echo "<select name='nl". $no. "'>"; echo "<option value='A'>A</option>"; echo "<option value='B'>B</option>"; echo "<option value='C'>C</option>"; echo "<option value='D'>D</option>"; echo "<option value='E'>E</option>"; echo "<option value='TL'>TL</option>"; echo "<input type='hidden' value='". $data['nim']. "' name='nim". $no. "' />"; echo "<input type='hidden' value='". $data['kode. MK']. "' name='mk". $no. "' /> ". $data['nim']. ' - '. $data['Nama. MK']. ' - '. $data['kode. MK']. "<br/>"; $no++; } ? > </select> <input type="hidden" name="jum. MK" value="<? php echo $no-1; ? >" /> <input type="submit" name="submit" value="Ambil" /> </form>

simpan 1. php <? header('Content-type: text/vnd. wap. wml'); echo('<? xml version="1. 0"? >'); echo('<!DOCTYPE wml PUBLIC "-//WAPFORUM// DTD WML 1. 1/EN">'); mysql_connect("localhost", "root", ""); mysql_select_db("dbmhs"); $jum. MK = $_POST['jum. MK']; for($i = 1; $i <= $jum. MK; $i++) { $mk = $_REQUEST['mk'. $i]; $nim = $_REQUEST['nim'. $i]; $nl = $_REQUEST['nl'. $i]; if (!empty($mk)) { $query = "update ambil. MK set nilai='$nl' where nim='$nim' and kode. MK='$mk'"; mysql_query($query); } } echo "Terimakasih sudah memilih matakuliah"; ? >

List. Nilai. php <? header('Content-type: text/vnd. wap. wml'); echo('<? xml version="1. 0"? >'); echo('<!DOCTYPE wml PUBLIC "-//WAPFORUM// DTD WML 1. 1/EN">'); ? >php <wml> <card id="KHS" title="KHS"> <b><big>DAFTAR NILAI MAHASISWA <? $con=mysql_connect("localhost", "root", ""); $db=mysql_select_db("dbmhs"); $sql="SELECT mhs. NIM, Nama, mtk. Kode. MK, Nama. MK, SKS, nilai FROM ambilmk, mhs, mtk where ambilmk. nim=mhs. NIM and ambilmk. kode. MK=mtk. Kode. MK order by mhs. NIM"; $hasil=mysql_query($sql); $nim='091011152620001'; $bb=0; $tsks=0; $nu=0; echo "<font size=-5 color=#FF 0000> <hr>"; while ($row=mysql_fetch_array($hasil))

{ $nu++; if ($nim!=$row[NIM]) { if ($nu>1) { echo "<b>Indek Prestasi : "; echo number_format($ip, 2, ', ', '. '); echo " <hr>"; $bb=0; $tsks=0; $nu=0; } } if ($row[nilai]=='A') $mutu=4; elseif ($row[nilai]=='B') $mutu=3; elseif ($row[nilai]=='C') $mutu=2; elseif ($row[nilai]=='D') $mutu=1; elseif ($row[nilai]=='E') $mutu=0; elseif ($row[nilai]=='TL‘) $mutu='0';

$bb=$mutu*$row[SKS]; $tsks=$tsks+$row[SKS]; $tbb=$tbb+$bb; if ($tbb>0) $ip=$tbb/$tsks; echo "$row[NIM]-$row[Nama]-$row[Kode. MK]-$row[Nama. MK]$row[SKS]-$row[nilai]-$mutu-$bb<hr>"; $nim=$row[NIM]; } echo "<b>Indek Prestasi : "; echo number_format($ip, 2, ', ', '. '); echo "<hr>"; ? > </card> </wml>