ROck RR

Jumat, 19 Oktober 2012

MEMBUAT TABEL DI PEMROGRAMAN HTML

22.06 Gama Lover BloG 2 comments

Assalamu'alaikum Wr Wr
Ok kali ini saya akan Membagi sedikit ilmu tentang bagaimana caranya untuk Membuat Tabel Di Pemrograman HTML. Yang sangat sederhana, sebenarnya untuk tabel sangat-sangat diperlukan di dalam pembuatan sebuah web, hanya saja biasanya pada sebuah web, border Tabel tidak di tampakkan sehingga penyusunan dari web tersebut, terlihat sangat rapi,, Oklah saya kira cukup untuk pengenalannya,, berikut merupakan tag dan atribut yang di perlukan untuk Membuat Tabel Di pemrograman HTML

1. untuk membuat baris menggunakan="tr"

2. untuk membuat kolom menggunakan="td"

3. Menggabungkan beberapa baris="rowspan"

4. Menggabungkan beberapa kolom="collspan"

Diatas Merupaka contoh sederhana dari pembuatan table di HTML. yang terdiri dari 4 kolom 3 baris, kolom kolom yang keempat dibagi menjadi 3 kolom dan baris pertama dibagi menjadi 2 baris pada kolom DATA. Untuk enggabungkan beberapa baris anda dapat menggunakan rowspan, Dan untuk menggabungkan beberapa kolom anda dapat menggunakan collspan. Untuk kodingnya Anda bisa lihat di bawah ini,

<html>
<head>
<title>latihan membuat table</title>
<body bgcolor="#40F536"> 
<p align="center"><b>latihan membuat table</b></p>
<p align="center"><b>berikut tutorial sederhana untuk membuat table di bahasa pemrograman html
<p align="left">1. untuk membuat baris menggunakan="tr"</p>
<p align="left">2. untuk membuat kolom menggunakan="td"</p>
<p align="left">3. Menggabungkan beberapa baris="rowspan"</p>
<p align="left">4. Menggabungkan beberapa kolom="collspan"</p>
<p>contoh</p>

<table align="left" border="2">
<caption align="top"><b>Daftar Admin</b></caption>
<tr bgcolor="gray"><th rowspan="2">no</th><th rowspan="2">id</th><th rowspan="2">password</th><th colspan="3">data</th>
</tr>
<tr bgcolor="gray"><th>umur</th><th>jenkel</th><th>ttl</th></tr>
<tr bgcolor="silver"><td align="center">1</td>
<td width="80" height="50">00234</td><td align="right"width="180">happysong</td>

<td>21</td><td>l</td><td>mojokerto,20 desember 1990</td>
</tr>
<tr bgcolor="silver"><td align="center">2</td>
<td height="50">00235</td><td align="right">bokep123</td>
<td>20</td><td>p</td><td>mojokerto,31 februari 1992</td>
</tr>
</table>
<br>

<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<p>Diatas Merupaka contoh sederhana dari pembuatan table di HTML. yang terdiri dari 4 kolom 3 baris, kolom kolom yang keempat dibagi menjadi 3 kolom dan baris pertama dibagi menjadi 2 baris pada kolom DATA.
Untuk enggabungkan beberapa baris anda dapat menggunakan rowspan, Dan untuk menggabungkan beberapa kolom anda dapat menggunakan collspan. Untuk kodingnya Anda bisa lihat di klik kanan di web browser pilih view page source</p>
</body>
</head>
</html>

MEMBUAT PROGRAM PENGHITUNG GAJI MENGGUNAKAN C++

19.19 Gama Lover BloG No comments

Selamat Pagi Semua,, Oklah,, Berhubung Sangant banyak sekali Mahasiswa Informatika Tingkat 1 Yang Menanyakan tentang PEMROGRAMAN C++, Nah disin saya sebagai admin akan memberikan sebuah contoh penggunaan PEMROGRAMAN C++,, yang di buat untuk menghitung gajih,, sebelumnya maaf,, mungkin contoh ini masih terlalu sulit untuk di pahami untuk pemula. karena saya disin hanya memberikan gambaran mengenai PEMROGRAMAN C++,, Oklah silahkan dinikmati aja, atau coba kalian compile bila perlu di MICROSOFT VISUAL C++ 6.0.. berikut langkahnya
1. Buka program Microsoft Visual c++ 6.0
2. klik File-New
3. Pilih klik FILE dan pilih C++ source File
4. klik OK
jika sudah muncul jendela koding,, silahkan copykan koding dibawah ini,, lalu tekan F5 untuk mengcompile
Atau tekan build, simpan dan execute,,

MENGHITUNG GAJI

#include<iostream.h>

#include<string>

void main()

{

char nama[40],ket[20];

int jamker; long gapok,gaber,gator,pjk;

cout<<"NAMA KARYAWAN : "; cin.getline(nama,40);

cout<<"GAJI POKOK : Rp. "; cin>>gapok;

cout<<"JML. JAM KERJA : ";cin>>jamker;

gator = gapok*jamker;

cout<<"============================================="<<endl;

cout<<"GAJI KOTOR : "<<gator<<endl;

if (gator>=3000000)

{

pjk = 0.10*gator;

strcpy(ket,"WAJIB PAJAK");

gaber = gator - pjk;

}

else

{

pjk = 0*gator;

strcpy(ket,"TIDAK WAJIB PAJAK");

gaber = gator - pjk;

}

cout<<"PAJAK : Rp. "<<pjk<<endl;

cout<<"GAJI BERSIH : Rp. "<<gaber<<endl;

cout<<"KETERANGAN : "<<ket<<endl;

cout<<"============================================="<<endl;

}

Belajar HTML Bagian 1

22.08 Gama Lover BloG 1 comment

Maaf agan2,, sekedar sharing.. Yang udah Mahir tolong Jangan komen yak,, heheheh
Belajar HTML bagian 1, di posting untuk programmer newbie yang ingin mengetahui tentang koding-koding HTML, Silahkan pelajari Koding HTML nya,, Maaf kalo penjelasannya agak gg enak di baca,, hahahah
Oklah,, Ini Kodingnya

<html>
<head>
<title> Belajar HTML Bagian 1 </title>
<body bgcolor="green">
 Teks berada Di sebelah kiri 
 Teks berada di tengah 
 Teks berada di sebelah kanan 
 keterangan koding,, Paragraph ini bertipe justify. Dimana semua teks akan dibuat
lurus sama dengan batas tepi halaman. Oh ya, tag merupakan
default atau bentuk baku tag dimana teks atau paragraf akan
berformat rata kiri. Jika anda tidak memberi atribut align pada tag
 maka browser akan menganggap rata kiri.
 teks ini merupakan contoh jika anda tidak memberikan atribut align pada tag
maka browser akan menganggap teks menjadi rata kiri 
</body>
</head>

Review Hubungan Tanpa Status,, (Kisah Si Admin)

20.09 Gama Lover BloG 1 comment

Met pagi sob,,, heheheh,, y maap gw ngucapin met pagi karna gw buat ni posting di pagi hari,

Sebelumnya maap ni ya sob, kali ini gw gg bikin posting masalah IT, y admin kan juga’ manusia, sebenernya sih gw mw berbagi aja sama lu semua. Tentang kisah asmara gw,, Eeaakk,, Udah deh, mending lu simak aja, Hadduh mulainya darimana y’, bingung juga’ gw,, Mugkin dari hubungan HTS aja kali y’,, Ok dah, Gw pertama kali njalanin hubungan HTS, waktu gw habis lulus SMA, y walau walnya gg sengaja sih, gw ketemu sama temen SMA, trus smsn deh, gg tw knp y sob, kita berdua jg’ gg ada prasaan. Tapi bawa’annya pgen perhatian mulu’ sama dia, Akhirnya kita sepakat bwt jdi TTM aj,

Yg kedua ini lucu sob,, kt kenal di pesbuk, udah sekitar setahun, nah wktu ketemuan kita akrab deh,,trus selang beberapa bulan gw jadian deh, y wlwpun kita pacarannya gg lama sih,, putus juga gg ada sebabnya, , sekarang HTSan lgi dah,, heheheh t

Yg ketiga sama tmen gw,, ini maap ya’ agak gw rahasiain,, soalnya ada kepentingan lain. Tp tetep gw critain kog,, yg satu ini temen gw kuliah, gw sebenrnya dulu sempat suka sama dia, tp setelah gw pikir, mending gg, pertama sih kt smsn biasa aj y’, trus lama kelamaan kt sama2 curhat, malah sempat gw nyiptain lagu bwt dia,, tapi sayang sampai sekarang gue gg bisa nyanyiin di depannya, selang beberapa waktu, akhirnya kita lama2 jdi deket,, udah deh mulai HTSan, kalo smsn sama dia mah, enak, taip sms berhayal mulu’ kerjaannya,, heheheh,, dia juga’ sering bwt ak tertawa,, skrg hbgan dy sama gw baik2 aj kog,,

Yg keempat ini sama temen gw, dia dari mahasiswa kebidanan,, asal lu tw y sob, ini temen gw wktu SMP, tp gw kenal deketnya gara2 di kenalin sama temen gw SMA,, hahahah,, lucu’ y, ni pertama smsn sih biasa aj,, gw akrabnya karena gw dulu pernah dua kali pentas ato ngeband,, sama dia,, dia pegang bass lho,, kan dia jugag mahir maen gtarnya, nah,, itulah yg bwt gw jadi akrab sama.. gw kira di antara temen gw HTSan dia yg paling sering mengisi waktu2 di hidupku, kita sih emang saling membutuhkan, tapi keliatannya kita gg saling cinta. Banyak sih kenangan gw sama dia,, tapi udahlah sob, itu cuman kenangan, ada kenangan yg lucu’ kenanngan yg memalukan, kenangan indah, ada jgg kenangan yg nikmat,

Nah yg satu ini sob,, bukan temen HTS sih, sebelumnya sih gw agak nyesel y kenal sama dia,, tp y udahlah,, ni temen gw SMP jgg, y gw taunya jg gara2 gw ikut acara bukber SMP,y meskipun gw telat, Awalnya sih jugag dia datang di pesbuk gw, gw gg tw malahan klo dia temen gw SMP,, nah trus,, kita ngobrol, akhirnya gw mintak nomer Hpnya, akhirnya w main krmahnya dia, mulai dah gw ngasih perhatian sama dia, y wlwpun awalnya niat gw jgag iseng2, tp gg tw jugag y sob,, lama-kelamaan gw mulai kangen sama dia, gw jg heran, gw ndiri udah lama’ gg ngrasain kayak gini,, y wlwpun gw programmer gw kan jg manusia sob,, sebnernya sih gw takut cinta sama dia, tp apalah daya gw sob, gw cuman bisa nahan prasaanku aj,, Akhirnya gw gg mw berlarut2 yak,, gw tanya deh sama dia, ternyata dia jg’ udah pnya cowok,, Nah akhirnya gw putusin deh bwt ngilangin prasaan itu,, y wlwpun itu gg mudah,, gini lah sob crita hidup gw, padahal gw mw serius, tp gw jugag gg tw’ gimana prasaan dia ke gw, itu sob yg bwt gw agag nyesel sama perkenalan gw, skrg bru percaya gw, kalo cinta itu bisa tumbuh pada pandangan pertama,, gw gg tw y’ kog bisa suka sama dia, masalah cantik temen2 Hts bnyak yg gg kalah cantik, tp gw gg pernah cinta’,, masalah lainnya juga’ dia biasa2 aj,,

Gw kira udah y sob crita yg gw bagi’in kali ini, lain kali gw critain jgag deh, masalah gw sama pacar2 gw,, ni kan sama HTS aja, malah lebih seru ntr klo gw crita masalah mantan2 gw,, tapi khusus untuk 17+ y,,, hhehehhe,, soalnya bakal gw critain pengalaman gw wktu pacaran,, ya sekedar pertama kali ciuman, pertama kali petting,, banyak deh,,

Jadi gini sob Intinya,, HTS itu cuman hbgn yg sengaja bwt main2, tp bukan mainin perasaan, tp gw pikir bgus kog htsn itu,, y sebelum pacaran mending lu htsn dlu,, skedar bwt ngetes prasaan si Do’i. Sama penjajakan sob, atau PDKT, lewat hts kan lu bisa tw,, apa sisi negatifnya di sama apa sisi positifnya dia,,

Sekian deh sob,, capek gw ngomong mulu’, belum makan lagi pas gw nulis ni posting,, oh ya, terimah kasih,, buat orang yg pernah ngbahagiain gw,, gw bakal sllu inget kg, heheh..

“Bukan Kesempurnaan Yg Membuat orang Jatuh Cinta, Tapi Cinta Yg Membuat Seorang MenJadi Sempurna”

Created

By Melon Outsiders,,

Admin BLoG Paling Keren, Meskipun Kere Tapi Tetep Mbois,

Tenang sob Bs ini gw Semester 5, Pasti postingan gw berikutnya lebih berbobot, yg mw req Artikel lu koment aja di sebelah kanan, Nanti bakal gw cari’in referensinya kog,,

MInal Aidzin Wal Faidzin Y

20.53 Gama Lover BloG 2 comments

Saya Selaku Admin,, Candra Wahyu Arifin Mengucapkan Selamat Mengucapkan Hari Raya Idul Fitri Yang Ke 1433 H,, Minal Aidzin wal faidzin mohon maaf lahir batin

Mohon Maaf Y sob,, Bila Ada postingan saya yg kurang berkenan

Membuat Form Pencarian Di VB 6.0 Dengan MsFlexGrid 6.0

06.51 Gama Lover BloG 2 comments

(Coretan Mahasiswa UNIM) Ok Sob,, Disini Gue akan jelasin gimana caranya buat FORM PENCARIAN DI VISUAL BASIC 6.0 menggunakan MSFlexGrid 6.0 Dengan Database SQL SERVER 2000. Ok lah Pertama siapin Kopi dulu sama camilan,, hehehehe,, Sama Menyan skalian ya.

1. Lu Mesti siapin Data Base dengan 2 tabel yaitu HP sama Aksesori,
2. Nah Untuk nambahin MsFlexGrid, Klik Kana Di Menu kontrol Pilih component dan cari MsFlexGrid 6.0
3. Tinggal deh Design Form Kayak gini

Nah Kalo Sudah Jadi Formnya, Tiggal Ketik kodingnya aja Dibawah ini.. Copas aja Saya Maafkan kog

Public dbconn As New ADODB.Connection
Public strconn As String

Sub koneksi()
strconn = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=boncell;Data Source=MELOND-PC\MELOND"
    dbconn.CursorLocation = adUseClient
    If dbconn.State = adStateClosed Then
        dbconn.Open strconn
        If dbconn.State = adStateClosed Then
            MsgBox "Koneksi Database Gagal!", vbCritical + vbOKOnly, "Error"
        End If
    End If
End Sub

Private Sub cmd_login_Click()
If txt_login.Text = "admin1001" Then
form4.Show
Else
MsgBox "Hayoo Salah Masukkan Password.!!", vbCritical + vbOKOnly, "Salah"
txt_login.Text = ""
txt_login.SetFocus
End If
End Sub

Private Sub flex_Click()

End Sub

Private Sub Form_Load()
Dim tampil As ADODB.Recordset
'Menentukan lebar kolom [(0)berarti posisi kolom]
flex.ColWidth(0) = 400
flex.ColWidth(1) = 800
flex.ColWidth(2) = 2000
flex.ColWidth(3) = 1000
flex.ColWidth(4) = 1800
flex.ColWidth(5) = 1200
'Membuat Text Judul Pada Kolom [(0, 1) 0 bersrti posisi karakter 0 spasi dan 1 posisi kolom)
flex.TextMatrix(0, 0) = "No"
flex.TextMatrix(0, 1) = "Kode"
flex.TextMatrix(0, 2) = "Tipe"
flex.TextMatrix(0, 3) = "Kondisi"
flex.TextMatrix(0, 4) = "Kelengkapan"
flex.TextMatrix(0, 5) = "Harga"
'Mengatur rata dari data dari kiri berdasarkan jumlah spasi
flex.ColAlignment(1) = 0
flex.ColAlignment(5) = 0
'memanggil koneksi
Call koneksi
'query untuk menampilkan semua data dari tabel
Set tampil = dbconn.Execute("select*from hp")
'Data akan tampil apabila kondisi dengan jika tidak end of file
If Not tampil.EOF Then
'n=baris data
    n = 0
    tampil.MoveFirst
    'Melakukan perulangan untuk menampilkan data dengan kondisi jika tidak end of file
    While Not tampil.EOF
        n = n + 1
        flex.Rows = n + 1
        flex.TextMatrix(n, 0) = n
        flex.TextMatrix(n, 1) = tampil(0)
        flex.TextMatrix(n, 2) = tampil(1)
        flex.TextMatrix(n, 3) = tampil(2)
        flex.TextMatrix(n, 4) = tampil(3)
        flex.TextMatrix(n, 5) = tampil(4)
        tampil.MoveNext
        Wend
End If
End Sub

Private Sub Text1_Change()
On Error GoTo salah
Dim cari As ADODB.Recordset
Call koneksi
'menampilkan semua data dari hp dimana tipe mengandung karakter di posisi sembarang pada text 1
If Combo1.Text = "Tipe" Then
Set cari = dbconn.Execute("select*from hp where Tipe like '%" & Text1.Text & "%'")
'menampilkan semua data dari hp dimana kondisi mengandung karakter di posisi sembarang pada text 1
ElseIf Combo1.Text = "Kondisi" Then
Set cari = dbconn.Execute("select*from hp where Kondisi like '" & Text1.Text & "%'")
End If
'Data akan tampil apabila cari dengan kondisi jika tidak end of file
If Not cari.EOF Then
'posisi baris data awal=0
        n = 0
        cari.MoveFirst
        'Melakukan perulangan untuk menampilkan data dengan kondisi jika tidak end of file
        While Not cari.EOF
            n = n + 1
            flex.Rows = n + 1
            flex.TextMatrix(n, 0) = n
            flex.TextMatrix(n, 1) = cari(0)
            flex.TextMatrix(n, 2) = cari(1)
            flex.TextMatrix(n, 3) = cari(2)
            flex.TextMatrix(n, 4) = cari(3)
            flex.TextMatrix(n, 5) = cari(4)
        cari.MoveNext
        Wend
    Else
    'jika tidak ditemukan data
    n = 0
    'menghapus semua data dengan menyisahkan 2 baris untuk nama kolom dan satunya kosong
        flex.Clear
        flex.Rows = 2
        flex.TextMatrix(0, 0) = "No"
        flex.TextMatrix(0, 1) = "Kode"
        flex.TextMatrix(0, 2) = "Tipe"
        flex.TextMatrix(0, 3) = "Kondisi"
        flex.TextMatrix(0, 4) = "Kelengkapan"
        flex.TextMatrix(0, 5) = "harga"
    End If
    Exit Sub
salah:
MsgBox "Pilih Kategori", vbInformation + vbOKOnly, "Informasi"
End Sub

ROck RR

Jumat, 19 Oktober 2012

MEMBUAT TABEL DI PEMROGRAMAN HTML

Minggu, 07 Oktober 2012

MEMBUAT PROGRAM PENGHITUNG GAJI MENGGUNAKAN C++

Sabtu, 06 Oktober 2012

Belajar HTML Bagian 1

Senin, 17 September 2012

Review Hubungan Tanpa Status,, (Kisah Si Admin)

Minggu, 19 Agustus 2012

MInal Aidzin Wal Faidzin Y

Sabtu, 04 Agustus 2012

Membuat Form Pencarian Di VB 6.0 Dengan MsFlexGrid 6.0

Waktu & Tanggal

Kerabat Rockrr

KoMenT

Total Tayangan Halaman

Popular Posts

Pengunjung Hari Ini

Tolong tinggalkan penilaian anda tentang blog ini

Blog Archive

Keep Rock .. . . But Stil pregrammer