Archive for the ‘Semester V’ Category

Scanning IP dan Port

Posted: January 25, 2010 in Network Security
Tags: , , , ,

Oleh:

I Wayan Agus Mahardika [070010095]

Komang Indra Lesmana [070010267]

Hendra Wijaya [070010055]

Ni Made Rasmiati [070010056]

Yosef Bella Kurnia [070010018]

——————————————————-

Untu menscan Ip dan melihat port apa saja yang terbuka di dalam alamat IP tersebut, kita membutuhkan beberapa software / tools untuk melakukannya, banyak software seperti itu, kita akan mecoba salah satu dari sekian banyak tools yang ada, salah satunya adalah :

  1. Angry Ipscaner  v.3 beta 4 [1]
  2. Auto NOC Port Scan [2]

Kedua tools tersebut dapat digunakan untuk mescan IP dari koneksi Wireless [3] maupun Wired [4] , sebagai contoh kami menggunakan media Wireless,

Untuk wireless yang menggunkan Ip secara dinamik atau DHCP [5] untuk kampus [Stikom Bali] kita bias melihat Kelas IP tersebut [Setelah Terkoneksi dengan Jaringan] :

Alamat Ip, Sm, dan Gw computer Kami

Alamat Ip, Sm, dan Gw computer Kami

Ip         :           192.168.18.160 [6]

Sm       :           255.255.255.0

GW     :           192.168.18.254

Ip , Sm, Gw diatas adalah diberikan secara otomatis dari AP.

Setelah Mengetahui IP dari Komputer kita, lalu buka tools untuk menscan Ip berapa saja yang ada di dalam range 192.168.18.xxx [7]

Langkah –langkah :

  1. Buka tools Angry Ipscaner
  2. Masukan Ip Range dari 192.168.18.1 to 192.168.18.255
  3. Klik Tools, Klik Preferences
  4. Pada Tab Display, Pilih Alive Host (responding to ping) only. “Hanya Menampilkan Host yang Hidup / yang dapat menerima ping dari kita. [8]
  5. Klik Ok
Preferences
Preferences

6. Klik Start

Scanning IP

Hasil Scanning IP
Hasil Scanning IP

Dari hasil scanning diatas kita mendapatkan 4 Ip Sekelas[9] yang terkoneksi dengan computer kita.

Misalnya kita akan mencoba melihat port apa saja yang terbuka dari alamat IP 192.168.18.170

Untuk mengetahui  port apa saja yang terbuka dari alama Ip diatas ikuti langkah – langkah dibawah ini :

  1. Buka Auto NOC Port Scan
  2. Masukan Ip yang dimaksud kedalam kolom ”site or Ip Address”
  3. Secara Default ”#Threads” akan terisi dengan angka ”100”[10]
  4. Isikan batasan port yaitu ”Start” = 0 dan ”End” = 100
  5. Klik Go
Hasil Scanning Port
Hasil Scanning Port

Dari hasil scanning port di atas alamat Ip 192.168.18.170 terbukti mempunyai 2 port yang terbuka yaitu port 21[11] dan port 80 [12] untuk batasan dari port 0 – 100.

Kita mencoba menscan alamat ip yang lain misalnya 192.168.18.243, dengan range port ditambahkan dari 100 menjadi 1000.

Scanning Port

scanning port
scanning port

Hasilnya adalah pada alamat ip diatas ternyata port yang terbuka lebih banyak yaitu port 21, 110, 139, 135, 445.[13-16]

—————————

Keterangan:

  1. http://www.azib.net/ipscan/
  2. http://www.autonoc.com/index.htm
  3. Koneksi tanpa Kabel atau udara sebagai perantaranya
  4. Koneksi Menggunakan Kabel
  5. DHCP (Dynamic Host Configuration Protocol) adalah protokol yang berbasis arsitektur client/server yang dipakai untuk memudahkan pengalokasian alamat IP dalam satu jaringan.
  6. Ip Komputer Kita
  7. Ip Sekelas
  8. Optional ”Boleh di Setting atau boleh juga tidak di setting”
  9. 192.168.18.170,192.168.18.236, 192.168.18.243, 192.168.18.254
  10. umlah Port yang akan di tampilkan didalamnya.
  11. File Transfer (Control)/tcp [Transmission Control Protocol (TCP) adalah suatu protokol yang berada di lapisan transpor (baik itu dalam tujuh lapis model referensi OSI atau model DARPA) yang berorientasi sambungan (connection-oriented) dan dapat diandalkan (reliable). TCP dispesifikasikan dalam RFC 793], File Transfer (Control)/udp, FTP/sctp [SCTP adalah perkembangan teknologi dari TCP (Transmission Control Protocol) atau dapat disebut juga sebagai ‘super TCP’. SCTP dirancang untuk memenuhi kebutuhan penggunaan yang lebih luas dibandingkan dengan yang dapat diberikan oleh TCP. SCTP merupakan suatu layer yang terletak antara layer user adaptation dan layer IP. Layer ini dirancang untuk menyediakan aplikasi protokol transmisi.]
  12. 12. World Wide Web HTTP, [tcp,udp] idem 11
  13. port 110 [POP3 / Post Office Protocol – Version 3]
  14. port 139 [netbios-ssn / NETBIOS Session Service]
  15. port 135 [epmap / DCE endpoint resolution]
  16. port 445 [microsoft-ds]


Advertisements

Artikel Ini Sudah dipindahkan DISINI

Artikel ini sudah dipindahkan DISINI

Pada project sebelumnya tentang applikasi penjualan bag. 1 sudah di posting beberapa minggu lalu, sekarang ini adalah updater dari applikasi penjualan tersebut, ada beberapa penambahan tabel, dan form. pertama anda harus menambahkan tabel bernama t_kategori didalam database POS anda, lihat gambar:

Tabel Kategori

Tabel Kategori

Yang perlu diganti adalah identity diubam menjadi “Yes” Setelah anda membuat tabel diatas, langkah selanjutnya adalah membuat sebuah form baru bernama formUser.vb, tambahkan 4 buah command button, 3 buah label, 3 buah textbox, 2 buah grop, lalu ubah properti name menjadi :

textbox1 = txtUserId

textbox2 = txtNama

textbox3 = txtPassword

button1 = btnSimpan

button2 = btnHapus

button3 = btnBatal

button4 = btnKeluar

Designlah form user tersebut menjadi seperti ini :

Master User

Master User

Lalu masukkan koding dibawah ini :

Imports System.Data
Imports System.Data.SqlClient
Public Class Form_User
Sub LoadData(ByVal lv As ListView)
With lv
.Items.Clear()
.Columns.Clear()
.Columns.Add(“User ID”, 120, HorizontalAlignment.Left)
.Columns.Add(“Nama”, 200, HorizontalAlignment.Left)
.Columns.Add(“”, 0, HorizontalAlignment.Left)
.GridLines = True
.FullRowSelect = True
.Activation = ItemActivation.TwoClick
.View = View.Details
.MultiSelect = False
End With
Dim sSql As String
sSql = “Select * From t_user”
Dim comm As New SqlCommand(sSql, Koneksi)
Try
Koneksi.Open()
Dim MyReader As SqlDataReader = comm.ExecuteReader
If MyReader.HasRows Then
Do While MyReader.Read
Dim new_item As New ListViewItem(MyReader.Item(“user_id”).ToString)
new_item.SubItems.Add(MyReader.Item(“nm_user”))
new_item.SubItems.Add(MyReader.Item(“password”))
LVUser.Items.Add(new_item)
Loop
End If
MyReader.Close()
Catch ex As Exception
MsgBox(ex.Message)
Finally
Koneksi.Close()
End Try
End Sub
Sub ClearAll()
txtUserId.Clear()
txtNama.Clear()
txtPassword.Clear()
txtUserId.Focus()
End Sub
Private Sub Form_User_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Call SetMdi(Me)
Call LoadData(LVUser)
Call ClearAll()
End Sub
Private Sub LVUser_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles LVUser.MouseClick
Try
txtUserId.Text = Trim(LVUser.SelectedItems(0).SubItems(0).Text)
txtNama.Text = Trim(LVUser.SelectedItems(0).SubItems(1).Text)
txtPassword.Text = Trim(LVUser.SelectedItems(0).SubItems(2).Text)
Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Critical, “Error!”)
End Try
End Sub
End Class
—————————————————————–
Males Ngetik ? Download aja disini

Semester V ini pada mata kuliah Pemrograman Visual II, UAS nya akan dilaksanakan dengan metode Project yang tiap minggu selalu di update, update itu penambahan dan pengurang program sesuai dengan kebutuhan sehingga pada hari H nya, yaitu hari UAS maka project tersebut akan di uji coba dengan penambahan fitur lain, fitur lain inilah yang akan menjadi “Project” pribadi / diri sendiri yang nantinya semua project yang telah di buat selama sebelum UAS dan pada waktu UAS akan dikumpulkan sebagai nilai dari UAS. Kelas M071 mendapat applikasi penjualan barang, sesuai dengan permintaan dosen yang bersangkutan, kami sebagai mahasiswa menerimanya dengan lapang dada, alasannya karena kelas lain juga mendapatkan project yang sama yaitu applikasi penjualan mungkin fitur dan codingnya yang berbeda. kita cukupkan basa  -basi kita diatas langsung saja kepokok masalahnya.

Visual Studio 2008

Visual Studio 2008

SQL server 2000

SQL server 2000

Sebagai informasi saja, project ini dibuat menggunakan Microsoft Visual Studio [MVS] 2008 dengan Databasenya menggunakan My SQL 2000 Server.  Untuk memulai membuatnya seperti biasa, buka MVS 2008 anda, lalu buat project baru dan simpan dengan nama POS / Terserah anda, usahakan menyimpannya pada direktori selain dari direktori system windows, misalnya D:/.

Pembuatan Database

Pada langkah ini akan dijelaskan pembuatan database yang kita perlukan untuk applikasi penjualan yang akan kita buat, dan hanya akan dilakukan pada Bag.1 saja, sisanya hanya update database  tanpa harus membuatnya dari awal, hanya saja mungkin akan ada penambahan – penambahan tabel2x yang akan diperlukan. Pembuatan database pada sql 2000 server kali ini akan menggunakan Enterprise Manager :

Enterprise Manager

Enterprise Manager

Setelah enterprise manager nya terbuka, silahkan anda membuat Database baru caranya, klik kanan pada folder database lalu pilih new database :

New Database

New Database

Setelah anda melakukan langkah diatas, akan muncul sebuah dialog box yang dimana anda harus mengisikan nama dari database anda :

New Database

New Database

Setelah anda mengisikan nama database nya, silahkan anda klik pada tab “Data Files”, disana anda akan menentukan lokasi penyimpanan database anda :

New Database

New Database

Pilih Lokasi dimana anda akan menyimpan file database, untuk memudahkannya lebih baik anda simpan pada direktori dimana applikasi MVS 2008 anda berada, buat sebuah direktori baru di dalam direktori project anda dengan nama “database” atau “db”:

New Database

New Database

Setelah ini, pindah ke tab “Transaction Log”, simpatn log database anda sama dengan dimana anda menyimpan database anda.

Tahapan berikutnya adalah membuat tabel tambahan sebagai fundamen anda untuk melakukan login administrator, langkahnya adalah sebagai berikut :

1. Masuk kedalam Database yang baru saja anda buat “POS” cari Tabel, pada area kanan, klik kanan lalu pilih New Table:

New Database

New Database

New Database

New Database

Setelah anda melakukan langkah diatas, isikan column name, Data type, Length dan Allow nulls seperti gambar dibawah ini :

New Database

New Database

Jangan lupa isikan “Default Value” dengan = tanda petik spasi tanda petik (‘ ‘) tanpa tanda kurung, berikan primary key pada user_id dan hilangkan semua centang pada allow not nulls. Klik tombol “save” dan berinama tabel yang baru saja anda buat dengan “t_user”.

Langkah selanjutnya adalah mengisi tabel user diatas dengan user id, nama dan password hal ini akan digunakan untuk proses login pada applikasi yang akan kita buat nantinya, langkahnya klik kanan pada t-user yang telah kita buat pilih Open Table, Klik Return All rows :

New Database

New Database

Masukan user id = admin, user_nm = Administator, password = 123456, anda boleh bebas menentukan user id, nama dan password anda sesuai dengan selera.

New Database

New Database

Pembuatan Applikasi

Setelah Pembuatan database selesai, selanjutnya kita akan membuat sebuah design applikasinya, untuk bag.1 ini hanya akan mendesign form login dan form utama. Pertama tambahakan 2 form dengan nama “form_Login” dan “form_Utama”, Design Form Loginya sebagai berikut :

Form Login

Tambahkan kedalam Form Login : 2 Buah Group Container, 2 Buah Label, 2 Buah Textbox, 2 Buah Button.

ubah property name dari 2 buah textbox  tersebut menjadi : txtUser, txtPass

ubah property name dari 2 buah button tersebut menjadi : btnLogin, btnExit

Login

Login

Codingnya :

Imports System.Data
Imports System.Data.SqlClient
Public Class Form_login

Sub Login(ByVal user As String, ByVal pass As String)
Dim sSql As String
sSql = “select * from t_user where user_id = ‘” & user & “‘” & ” and password ='” & pass & “‘”
Dim Comm As New SqlCommand(sSql, Koneksi)
Try
Koneksi.Open()
Dim MyReader As SqlDataReader = Comm.ExecuteReader
If MyReader.HasRows Then
MyReader.Read()
p_userid = MyReader.Item(“user_id”)
p_nama = MyReader.Item(“nm_user”)
MyReader.Close()
Else
MsgBox(“User atau Password Masih Salah !”, MsgBoxStyle.Exclamation, “Perhatian!”)
Exit Sub
End If
Catch ex As Exception
MsgBox(ex.Message)
Exit Sub
Finally
Koneksi.Close()
End Try
Me.Hide()
Form_Utama.Show()
End Sub

Private Sub btnLogin_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnLogin.Click
If txtUser.Text = “” Or txtpass.Text = “” Then
MsgBox(“User Atau Password Belum Lengkap!”, MsgBoxStyle.Exclamation, “Perhatian!”)
Else
Call Login(txtUser.Text, txtpass.Text)
End If
End Sub

Private Sub btnExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnExit.Click
Me.Close()
End Sub
End Class

Form Utama

Langkah selanjutnya adalah membuat Form Utama, Tambahkan sebuah Menu strip lalu Masukan Data sebagai berikut :

File [Log Off, Exit]

Master [Master User, Master Kategori, Master Barang]

Form Utama

Form Utama

Codingnya :

Public Class Form_Utama

Private Sub Form_Utama_Disposed(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Disposed
With Form_login
.txtpass.Clear()
.Show()
End With
End Sub

Private Sub LogOffToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles LogOffToolStripMenuItem.Click
Me.Dispose()
End Sub

Private Sub ExitToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ExitToolStripMenuItem.Click
Form_login.Dispose()
End Sub

Private Sub MasterUserToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MasterUserToolStripMenuItem.Click
Form_User.Show()
End Sub

Private Sub MasterKategoriToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MasterKategoriToolStripMenuItem.Click
Form_Kategori.Show()
End Sub

Private Sub Form_Utama_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

End Sub
End Class

Pembuatan Module

Langkah selanjutnya adalah membuat sebuah module, tambah kan modul kedalam applikasi yang anda buat, lalu masukan coding nya :

Imports System.Data
Imports System.Data.SqlClient
Module Module1
Dim strKoneksi As String = “Data Source = localhost;” & ” Initial Catalog= POS;Integrated Security = True”
Public Koneksi As New SqlConnection(strKoneksi)

Public p_userid As String
Public p_nama As String

Sub SetMdi(ByVal frm As Form)
frm.MdiParent = Form_Utama
frm.FormBorderStyle = FormBorderStyle.FixedDialog
End Sub
End Module

Males Buat ??? Silahkan Download Disini

Selamat Mencoba dan Semoga Bermanfaat

Bersambung..

Wassalam

Bahasa Indonesia

Posted: November 19, 2009 in Bahasa Indonesia
Tags: ,

Pendahuluan

Bahasa Melayu Kuna itu tidak hanya dipakai  pada zaman Sriwijaya karena di Jawa Tengah (Gandasuli) juga ditemukan prasasti berangka tahun 832 M dan di Bogor ditemukan prasasti berangka tahun 942 M yang juga menggunakan bahasa Melayu Kuna. Pada zaman Sriwijaya, bahasa Melayu dipakai sebagai bahasa kebudayaan, yaitu bahasa buku pelajaran agama Budha. Bahasa Melayu juga dipakai sebagai bahasa perhubungan antarsuku di Nusantara dan sebagai bahasa perdagangan, baik sebagai bahasa antarsuku di Nusantara maupun sebagai bahasa yang digunakan terhadap para pedagang yang datang dari luar Nusantara.Bahasa Indonesia tumbuh dan berkembang dari bahasa Melayu yang sejak zaman dulu sudah dipergunakan sebagai bahasa perhubungan (lingua franca) bukan hanya di Kepulauan Nusantara, melainkan juga hampir di seluruh Asia Tenggara.  pada saat itu, para pemuda dari berbagai pelosok Nusantara berkumpul dalam Kerapatan Pemuda dan berikrar (1) bertumpah darah yang satu, tanah Indonesia, (2) berbangsa yang satu, bangsa Indonesia, dan (3) menjunjung bahasa persatuan, bahasa Indonesia. Ikrar para pemuda ini dikenal dengan nama Sumpah Pemuda.

Bahasa Melayu mudah diterima oleh masyarakat Nusantara sebagai bahasa perhubungan antarpulau, antarsuku, antarpedagang, antarbangsa, dan antarkerajaan karena bahasa Melayu tidak mengenal tingkat tutur. Bahasa Melayu dipakai di mana-mana di wilayah Nusantara serta makin berkembang dan bertambah kukuh keberadaannya. Bahasa Melayu yang dipakai di daerah di wilayah Nusantara dalam pertumbuhannya dipengaruhi oleh corak budaya daerah. Bahasa Melayu menyerap kosakata dari berbagai bahasa, terutama dari bahasa Sanskerta, bahasa Persia, bahasa Arab, dan bahasa-bahasa Eropa.

Para pemuda Indonesia yang tergabung dalam perkumpulan pergerakan secara sadar mengangkat bahasa Melayu menjadi bahasa Indonesia, yang menjadi bahasa persatuan untuk seluruh bangsa Indonesia (Sumpah Pemuda, 28 Oktober 1928). Kebangkitan nasional telah mendorong perkembangan bahasa Indonesia dengan pesat. Peranan kegiatan politik, perdagangan, persuratkabaran, dan majalah sangat besar dalam memodernkan bahasa Indonesia. Proklamasi kemerdekaan Republik Indonesia, 17 Agustus 1945, telah mengukuhkan kedudukan dan fungsi bahasa Indonesia secara konstitusional sebagai bahasa negara. Kini bahasa Indonesia dipakai oleh berbagai lapisan masyarakat Indonesia, baik di tingkat pusat maupun daerah.

Sumber : Disini

Modul

Pendahuluan Bahasa Indonesia, Diksi dan Kalimat Efektif, Download Disini

Kalimat Efektif Lanjutan Download Disini

Tugas

…Di dalam table di atas menunjukkan bahwa penduduk Indonesia sebagian besar petani…Kepada para mahasiswa diharap masuk satu per satu….

Jawaban Tugas 2 Download Disini

UTS

UAS

Statistik

Posted: November 1, 2009 in Statistik
Tags:

Artikel ini sudah dipindahkan DISINI