Thursday 6 March 2014

Prinsip sebagai orang tua

Jangan mengharapkan anak kita membalas kebaikan kita. Kenapa? Karena mereka ada di dunia ini atas keinginan kita (orang tua); bukan atas keinginan mereka. Sudah sepantasnya kita menghidupi mereka walaupun nanti kelak ia kemungkinan menyakiti kita.

1st step to network programming (socket programming)

Dim s1 As Socket = Nothing

Wednesday 5 March 2014

privilleged exec mode
R1#


not-privilleged exec mode (user mode):


global config mode:
R1(config)#


routing configuration mode:
R1(config-router)#

Basic routing conf

1. Basic RIP configuration



Task 5: Verifying RIP routing
step 1: show ip route
untuk melihat apakah network lain / network bukan directly connected terhadap suatu router sudah terinjeksi kedalam routing table.

step 2: show ip protocols

step 3: debug ip rip
"who send and what he send"



step 4: undebug all
non aktifkan debug ip rip (kata-kata yang menyedihkan)

Monday 3 March 2014

Namespace

Tempat penyimpanan kelas-kelas

Contoh penggunaan namespace

Namespace pekerjaanmanusia
    Public Class Petani
        Public luaslahan As Integer = Nothing
        Sub jumlahlahan(ByVal luas)
            luaslahan = luas
        End Sub
    End Class

    Public Class Programmer
        Public bahasaprogram As String = Nothing
        Sub bahasayangdikuasai(ByVal nama)
            bahasaprogram = nama
        End Sub
    End Class
End Namespace

Module Module1
    Dim Budi As New pekerjaanmanusia.Programmer
    Dim tardo As New pekerjaanmanusia.Petani
    Sub Main()
        Budi.bahasaprogram = "C"
        Console.WriteLine(Budi.bahasaprogram)
        Console.ReadLine()

        tardo.luaslahan = 100
        Console.WriteLine("Luas lahan tardo: " & tardo.luaslahan & " " & "Hektar")
        Console.ReadLine()
    End Sub

End Module

Creating class, instantiate

Public Class Person
    Private weight As Double = 8
    Private money As Double = 100
    Private income As Double = 7.25

    Public Sub eat(ByVal pounds As Double)
        weight += pounds
    End Sub

    Public Sub excercise(ByVal time As Double)
        weight -= time / 10
    End Sub

    Public Sub work(ByVal hours As Double)
        money += hours * income
    End Sub

    Public Function getweight() As Double
        Return weight
    End Function

    Public Function getmoney() As Double
        Return money
    End Function

    Public Function getincome() As Double
        Return income
    End Function
End Class

Class

Public Class Form1
Private myperson As New Person