CARA PALING MUDAH UPGRADE OS BLACKBERRY

Para pengguna blackberry yang ingin meng upgrade OS blackberry biasanya pergi ke toko-toko HP Blackberry yang menawarkan service upgrade OS versi terbaru dengan harga jasa Rp 100.000 – Rp 250.000. Namun jika anda tahu cara upgrade os blackberry maka anda tidak perlu pergi ke toko HP untuk mengupgrade blackberry anda, karna anda bisa upgrade OS BlackBerry anda sendiri dengan mudah.
Seperti halnya OS windows dan mac, OS BlackBerry juga terus diperbaharui dengan versi baru untuk memperbaiki system operational / kerja devicenya. Dan RIM menyediakan update OS tersebut secara gratis dengan mendownload melalui situs resmi Blackberry. User BlackBerry dapat mendownload OS dari website RIM dan instal upgrade OS BlackBerry sendiri secara mudah.
Yang perlu anda siapkan untuk meng upgrade OS Blackberry adalah Blackberry Desktop Software yang terdapat di CD Blackberry anda, atau anda dapat mendownloadnya melalui situs resminya dihttp://blackberry.com/desktop
Install Blackberry Desktop Software di komputer anda

upgrade os blackberry menggunakan Blackberry Desktop Software
Untuk minimum system requirements dari komputer yang digunakan dapat anda lihat di sini.
Yang perlu diperhatikan saat melakukan upgrade OS Blackberry
Sebelum anda melakukan upgrade, terlebih dahulu backup data-data blackberry anda. Caranya: jalankan blackberry desktop software kemudian hubungkan blackberry anda ke komputer menggunakan kabel data. pada menu device pilih backup, kemudian pilih lokasi dimana anda akan mengimpan backup data.

Cara upgrade OS BlackBerry secara online
1. Jalankan BlackBerry Desktop Software, hubungkan hanset Blackberry ke komputer
2. pada menu device klik update lalu tunggu beberapa saat, jika software mendeteksi adanya OS terbaru maka akan muncul pemberitahuan adanya update OS.
3. ikuti wizard yang ada. tunggu sampai prosesnya selesai dan BlackBerry reboot, bisa memakan waktu sampai satu jam.
4. Selesai. Restore data yang sudah dibackup menggunakan Desktop Manager. Caranya klik pada menu Device lalu pilih restore, pilih lokasi dimana anda menyimpan backup lalu tunggu proses restore selesai.

Cara upgrade OS BlackBerry secara manual
Jika dengan cara upgrade blackberry secara online Blackberry Desktop Manager tidak menemukan update terbaru, anda bisa mendownload OS terbaru dari Blackberry anda yang disediakan oleh situs resmi blackberry. Anda bisa mendownloadnya dihttp://us.blackberry.com/support/downloads/download_sites.jsp. pilih sesuai vendor operator anda dan pilih sesuai tipe BlackBerry anda.
Dengan cara upgrade OS BlackBerry secara manual ini terkadang ada OS yang tidak disediakan untuk operator anda karena biasanya ada fitur untuk operator masing tertentu yang tidak ada di operator lain. Namun anda tetap bisa menggunakan OS yang disediakan untuk operator lain jika OS tersebut tidak tersedia untuk operator dengan cara menghapus file vendor.xml pada instalan OS di PC. Berikut ini langkah-langkah upgrade OS Blackberry cara manual:

• Install OS yang telah di download, klik file exe OS untuk Install OS ke komputer yang akan diupgrade via komputer. Penting Restart komputer anda.
• Hapus vendor.xml di C drive -> program files -> common files -> research in motion -> app.loader
• Back up data BlackBerry ke komputer dengan Desktop Manager
• buka software desktop manager, hubungkan BlackBerry nya ke komputer untuk di connect ke desktop manager.
• Desktop manager akan otomatis detect untuk synchronize data, lalu akan otomatis check for updates yang muncul OS versi terbaru sebagai updates/upgrade, ikut petunjuk. (kalau tidak terdetect, restart lagi komputer dan restart desktop manager).
• Kalau desktop manager masih tidak mendetect OS baru, tutup desktop manager dan masuk ke tempat hapus vendor.xml, klik loader.exe dan ikuti petunjuk.
• Tunggu sampai benar-benar selesai dan Blackberry selesai reboot. Kemudian restore data yang sudah dibackup sebelumnya.

Atau bisa menggunakan Cara ini


Langkah-langkah untuk melakukan upgrade OS Blackberry :

• Siapkan ponsel Blackberry anda
• Koneksi internet untuk proses download softwarenya
• Komputer PC atau laptop dengan operating system Windows (untuk Mac OS gunakan Virtual Windows atau BootCamp)
• Kabel USB bawaan blackberry
• Install Desktop Manager (DM) di komputer anda (biasanya ada CD driver yang diberikan pada box Blackberry anda). Jika tidak ada, silahkan download BlackBerry Desktop Software.
• Insall OS yang akan digunakan untuk UpGrade (biasanya sistem akan melakukan auto detect untuk versi OS anda). Jika download file OS tidak sesuai carrier, maka dari windows explorer lakukan search (including system and hidden files) file dengan nama ‘vendor.xml’ setelah ketemu hapus aja file tersebut (kalo pake WindowsVista, bisa dicari di : C:\Program Files\Common Files\Research In Motion\AppLoader). Kalo filenya sesuai carrier, biarkan saja
• Installation Wizard akan muncul,
• klik ‘Next’
• pilih negara anda, ‘Accept the terms of service’
• klik ‘Next’ lagi.Setelah proses instal selesai di PC, anda akan diminta untuk memulai Blackberry Desktop Manager. Centang pilihan ini lalu klik ‘Finish’. Secara otomatis Desktop Manager akan terbuka, silahkan hubungkan ponsel blackberry anda ke pc melalui kabel usb. Seandainya setelah beberapa menit DM tidak terbuka berarti anda mesti menjalankannya secara manual.
• Hubungkan Blackberry (BB) ke Komputer atau laptop via kabel data USB. Buka Desktop Manager (DM). Kalau ada permintaan upgrade os Blackberry dicancel dulu.
• Lakukan BackUp dulu supaya kalau ada masalah data bisa dikembalikan. Caranya, Run the DM –> Select Backup/Restore –> Backup –> Select dimana anda akan menyimpan file backup anda.
• Ingat lakukan dengan hati-hati ya …
• Selesai backup, masuk ke application loader. Kalau ada permintaan masukkan password Blackberry, masukkan paswordnya (kalau tidak ada paswordnya, klik ok saja)
• Pilih add/remove application. Kalau normal akan muncul semua file program yang akan diinstall. Silahkan dipilih language dan program/aplikasi bawaan OS apa saja yg mau diinstall di Blackberry. Ikuti instruksi di Desktop Manager (DM) tersebut, dan tunggu sampe selesai prosesnya.
• Selesai Upgrade OS Blackberry, cabut kabel data, restart lagi Blackberry nya, tutup Desktop Manager, dan uninstall file OS dari PC/laptop (optional)

Tidak semua hanset Blackberry bisa support OS tertinggi yang dirilis oleh RIM (OS 6 atau OS 7) karena device memory tidak mendukung OS yang memerlukan memory tinggi untuk menjalankannya. Jika anda tidak menemukan OS 6/7 untuk Blacberry anda, berarti BlackBerry anda memang tidak mendukung untuk upgrade OS BlackBerry ke versi terbaru.

Membuat Program Penjualan Barang Dengan menggunakan VB NET

Nah teman-teman hari ini saya ingin shering tentang program yang baru saya buat ini kepada teman-teman semuanya,siapa tau bisa bermanfaat bagi Teman-teman semuanya.,.
     Nah langsung aj kita mulai.,.
untuk pertama-tama kita membuat desain form nya seperti gambar di bawah ini.!!!

 

Nah setelah itu masukkan perintah di kodingya seperti di bawah ini.,!!!

Public Class Form1

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

        Nama.Items.Add("Sony 20 inchi")

        Nama.Items.Add("Sony 32 inchi")

        Nama.Items.Add("Sony 18 inchi")

        Dim i As Integer

        For i = 1 To 20

            JJ.Items.Add(i)

        Next

    End Sub

    Private Sub BtnKeluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnKeluar.Click

        End

    End Sub

    Private Sub Btnhapus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnhapus.Click

        Nama.Text = ""

        Harga.Text = ""

        JJ.Text = ""

        Discount.Text = ""

        Total.Text = ""

        TP.Text = ""

    End Sub

    Private Sub Nama_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Nama.SelectedIndexChanged

        Select Case Nama.Text

            Case "Sony 20 inchi"

                Harga.Text = 2000000

            Case "Sony 32 inchi"

                Harga.Text = 5000000

            Case "Sony 18 inchi"

                Harga.Text = 1500000

        End Select

    End Sub

    Private Sub Btnproses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnproses.Click

        Total.Text = Harga.Text * JJ.Text

        If Total.Text > 2500000 Then

            Discount.Text = 0.01 * Total.Text

        Else

            Discount.Text = 0

        End If

        TP.Text = Total.Text - Discount.Text

    End Sub

End Class

 

Nah setelah selesai pengimputan codingnya,langsung aj kita jalankan programnya dengan menekan tombol F5 atau klik Debuge,dan hasilnya akan muncul seperti gambar berikut ini.,.

 

Nah sekian dari saya,smoga dapat bermanfaat bagi kita semuanya.,.

selamat soreee, :)!!

Membuat List View DI VB NET

Hai teman-teman kali ini saya akan memosting sebuah program list view dngan menggunakan VB NET
nah langsung saja ya teman-teman

langkah pertama,kita harus membuat form nya dlu seperti gambar  di bawah ini.,.!!!!

  

nah,setelah selesai membuat formnya,lalu tugas kita selanjutnya adalah membuat perintah atau mengimput codingya,supaya programnya bisa kita jalankan,,

cara pengetikan codingya seperti di bawah ini.,.

Public Class Form1

    Sub buattable()

        LV.Columns.Add("Npm", 60, HorizontalAlignment.Left)

        LV.Columns.Add("Nama", 100, HorizontalAlignment.Center)

        LV.Columns.Add("Jenjang/Jurusan", 100, HorizontalAlignment.Center)

        LV.Columns.Add("Kode Dosen", 80, HorizontalAlignment.Center)

        LV.Columns.Add("Nama Dosen", 100, HorizontalAlignment.Center)

        LV.Columns.Add("Kode Matakuliah", 100, HorizontalAlignment.Center)

        LV.Columns.Add("Matakuliah", 70, HorizontalAlignment.Center)

        LV.Columns.Add("Nilai Kehadiran", 90, HorizontalAlignment.Center)

        LV.Columns.Add("Nilai Tugas", 70, HorizontalAlignment.Center)

        LV.Columns.Add("Nilai UTS", 70, HorizontalAlignment.Center)

        LV.Columns.Add("Nilai UAS", 70, HorizontalAlignment.Center)

        LV.Columns.Add("Nilai Huruf", 70, HorizontalAlignment.Center)

        LV.Columns.Add("Keterangan", 70, HorizontalAlignment.Center)

        LV.View = View.Details

        LV.GridLines = True

        LV.FullRowSelect = True

    End Sub

    Sub isitable()

        Dim lst As New ListViewItem

        lst.Text = Npm.Text

        lst.SubItems.Add(Nama.Text)

        lst.SubItems.Add(JJ.Text)

        lst.SubItems.Add(KoDo.Text)

        lst.SubItems.Add(NaDO.Text)

        lst.SubItems.Add(KoMa.Text)

        lst.SubItems.Add(Matakuliah.Text)

        lst.SubItems.Add(NilaiK.Text)

        lst.SubItems.Add(NilaiT.Text)

        lst.SubItems.Add(NilaiU.Text)

        lst.SubItems.Add(NilaiUA.Text)

        lst.SubItems.Add(NH.Text)

        lst.SubItems.Add(Ket.Text)

        LV.Items.Add(lst)

    End Sub

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

        Npm.Items.Add("11120544")

        Npm.Items.Add("12110740")

        Npm.Items.Add("10120546")

        KoDO.Items.Add("k1234567")

        KoDO.Items.Add("R4567890")

        KoDO.Items.Add("S0987654")

        Dim i As Integer

        For i = 40 To 100

            NilaiK.Items.Add(i)

            NilaiT.Items.Add(i)

            NilaiU.Items.Add(i)

            NilaiUA.Items.Add(i)

        Next i

        buattable()

    End Sub

    Private Sub Npm_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Npm.SelectedIndexChanged

        Select Case Npm.Text

            Case "11120544"

                Nama.Text = "Ahmad Hafizi"

            Case "12110740"

                Nama.Text = "Edwin Raymon Damanik"

            Case "10120546"

                Nama.Text = "Parningotan Rambe"

        End Select

        Dim i As String

        i = Microsoft.VisualBasic.Left(Npm.Text, 2)

        If i = "11" Then

            JJ.Text = "SI/Sistem Informasi"

        ElseIf i = "12" Then

            JJ.Text = "D3/sistem informasi"

        ElseIf i = "10" Then

            JJ.Text = "D1/Komputer Akuntansi"

        End If

    End Sub

    Private Sub KoDo_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles KoDo.SelectedIndexChanged

        Select Case KoDo.Text

            Case ("k1234567")

                NaDO.Text = ("Mesran,SKom,M.Kom")

            Case ("R4567890")

                NaDO.Text = ("Sinar Sinurat,ST,M.Kom")

            Case ("S0987654")

                NaDO.Text = ("Harvei hutabarat,S.Kom,M.Kom")

            Case Else

                Nama.Text = "_"

        End Select

        Dim i As String

        i = Microsoft.VisualBasic.Right(KoDo.Text, 3)

        If i = "567" Then

            KoMa.Text = "001"

            Matakuliah.Text = "Pemograman Visual"

        ElseIf i = "890" Then

            KoMa.Text = "002"

            Matakuliah.Text = "Sistem informasi"

        ElseIf i = "654" Then

            KoMa.Text = "003"

            Matakuliah.Text = "Struktur Data"

        End If

    End Sub

    Private Sub Btnkeluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnkeluar.Click

        End

    End Sub

    Private Sub Btnhapus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnhapus.Click

        Npm.Text = ""

        Nama.Text = ""

        JJ.Text = ""

        KoDo.Text = ""

        NaDo.Text = ""

        KoMa.Text = ""

        Matakuliah.Text = ""

        NilaiK.Text = ""

        NilaiT.Text = ""

        NilaiU.Text = ""

        NilaiUA.Text = ""

        Ket.Text = ""

        NH.Text = ""

        NA.Text = ""

    End Sub

    Private Sub Btnproses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnproses.Click

        NA.Text = 0.01 * NilaiK.Text + 0.15 * NilaiT.Text + 0.3 * NilaiU.Text + 0.45 * NilaiUA.Text

        If NA.Text < 50 Then

            Ket.Text = "GagaL"

            NH.Text = "E"

        ElseIf NA.Text <= 51 Then

            Ket.Text = "Gagal"

            NH.Text = "D"

        ElseIf NA.Text <= 60 Then

            Ket.Text = "Lulus"

            NH.Text = "C"

        ElseIf NA.Text <= 61 Then

            Ket.Text = "Lulus"

            NH.Text = "B"

        ElseIf NA.Text <= 70 Then

            Ket.Text = "Lulus"

            NH.Text = "B+"

        ElseIf NA.Text >= 80 Then

            Ket.Text = "Lulus"

            NH.Text = "A"

        End If

    End Sub

    Private Sub BtnSimpan_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnSimpan.Click

        isitable()

    End Sub

    Private Sub BtnSemuaData_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnSemuaData.Click

        LV.Items.Clear()

    End Sub

    Private Sub BtnHapusdata_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnHapusdata.Click

        LV.Items.Remove(LV.SelectedItems(0))

    End Sub

End Class

  

  nah setelah selesai penginputan codingya,nah lalu kita jalnkan programnya dengan menekan F5 atau klik debug di atas menu taksbarnya.,.

dan halisnya seperti gambar dibawah ini.,.

 

Nah sekian dari saya,semoga dapat bermanfaat bagi kita semua.,.