Kudeta tidak berdarah pada MUGI Batam

Wah pasti rekans yang mendengar judul diatas menjadi merinding dan bingung, apa yang terjadi pada MUGI Batam. "KUDETA" ini dilakukan, dikarenakan ketua yang menjabat saat ini (bro aprizon) akan melanjutkan studi nya ke Padang.

Maka untuk mengisi kekosongan posisi ketua, maka para pengurus aktif bernisiatif untuk melakukan pemilihan ketua periode 2010-2012. kronologis pemilhan ketua nya sebagai berikut.

Pada tanggal 15 januari 2010, di caffe semerbak sekretariat mugi batam pemilihan tersebut berlangsung.

Setelah berkumpulnya pengurus-pengurus mugi batam tepat jam 1600 wib (bro anam, atha, john, irawan, rudy dan saya, bro abe, febri dan saiful absen).

Lumayan alot dalam pemilihan ketua periode ini, kita melakukan berbagai argumen tentang sapa yang cocok untuk posisi ini.

Saya pribadi menginginkan bro john sebagai ketua, karena pada saat ini beliau menjabat wakil ketua, secara otomatis dengan kepergian ketua maka posisi itu di gantikan oleh beliau.. Dan beliau sendiri mencalonkan bro anam, dengan alasan beliau adalah pendiri mugi batam dan sepak terjang nya sudah lama dan terbukti ampuh.

Dikarenkan waktu sudah menunjukkan jam 1700 wib, dengan berbagai alasan dan disetuju oleh rekan2 yang lain. Maka seluruh anggota rapat pada hari itu mengangkat saya sebagai ketua secara aklamasi (kayak pemilhan ketua partai aja J)

Sebenarnya saya sudah menyebutkan alasan-alasan kenapa saya tidak cocok untuk posisi ini. tapi karena seluruh pengurus yang hadir pada waktu itu sudah satu suara, akhirnya dengan beban yang berat posisi ini harus saya pikul.

MUGI Batam di bawah kepemimpinan bro aprizon sangat maju dan berkembang dengan baik. pada saat itu salah satu pengurus batam dapat award dari Microsoft berupa MVP yaitu saya sendiri. Jadi beban saya sangat berat, bagaiman dibawah kepemimpinan saya mugi batam setidak nya sama dengan periode bro ap.

Tapi dikarenakan saya diyakinkan oleh pengurus yang lain bahwa mereka juga berkomitmen untuk membangun MUGI Batam lebih baik. maka saya pun bersedia.

Berikut kepengurusan mugi batam

Ketua : Junindar

Wakil Ketua : John Friadi

Sekretaris : Khairul Anam

Bendahara : Irawan

Divisi SDM : Saiful

Divisi Riset : Athaila

Rudy Prasetyo

Divisi Humas : Febri Rahman

Abudu

Ini hasil jeprat-jepret pada pemilihan waktu itu.

searah dengan jarum jam (Saya,bro anam, bro rudy, bro irawan dan bro john)

searah dengan jarum jam (Saya,bro anam, bro rudy, bro john dan bro atha)

wassalam

Selected Text (Visual Studio 2010)

Visual Studio 2008

Visual Studio 2010

Jika kita melihat sekilas dua gambar diatas tidak ada perbedaan. Cuma jika diteliti lebih lanjut ada perbedaan yang sangat jelas. Coba liat gambar pertama (VS 2008),code yang kita selected tidak hanya memiliki satu warna saja (putih), sedangkan jika pada gambar kedua (VS 2010) setelah code di selected kita masih melihat dengan jelas warna code seperti sebelum di selected. Inilah kelebihan dari VS 2010 kita masih bisa mengetahui code apa yang kita select/block. Hebat kan, simple but useful.

Wassalam

4 Fitur Baru dengan 4 Video Tutorial (VB 2010)

Wahhh ga krasa sekarang sudah masuk taon 2010...

Seperti nya umur kita makin tua nich.... btw kok ga nyambung ya dengan judul diatas... :)

Langsung aja dech, masuk ke inti nya... ini merupakan postingan pertama di awal taon 2010..

Berikut adalah beberapa video tutorial dari fitur-fitur terbaru pada VB 2010..

Seperti Multi windows : Bagaimana kita bisa menarik jendela code kluar dari Jendela Utama

Zoom : Ini fitur yang unik, kita bisa memperbesar atau sebalik nya jendela code kita dengan mudah

Highlight Reference = Bagaimana Kita dapat memaintain suatu variable atau control. Dengan Ctrl+Shift PanahAtas/Bawah

dan Generate from usage = Ini yang keren , pokok nya nonton aja dech.. :)

untuk video nya sengaja saya pecah menjadi 4 bagian sesuai dengan nama-nama fitur nya..

silahkan di download pada link dibawah ini

http://www.mediafire.com/file/yzoyyoo0gjg/Multi.avi

http://www.mediafire.com/file/x0jtytyz2kw/Zoom.avi

http://www.mediafire.com/file/ttjzdkn0tyy/Hight.avi

http://www.mediafire.com/file/yhxyflon2tu/Generate.avi

Wassalam..

Live Demo - TechNet and MSDN Day @ Gedung Politeknik Batam / FT. UMRAH

Postingan ini bersumber dari blog Bro Ap

Dengan semangat ingin berbagi sesama IT Pro dan teman-teman Mahasiswa / Siswa dilingkungan Kota Batam dan atas perjuangan teman-teman HMTI Politeknik Batam / FT. UMRAH akhirnya event dengan tema “Microsoft Technology Update” seperti yang saya informasikan sebelumnya sukses digelar sesuai dengan jadwal yang telah direncanakan yakni pada hari minggu tanggal 13 Desember 2009 yang bertempat di Gedung Politeknik Batam / Fak. Tek. UMRAH di Batam.

Tepat jam 09:30, diawali dengan pembukaan acara oleh duo MC (Eki dan Yola) yang memukau para peserta dengan kepiawaiannya membawa acara.

Seperti halnya event-event lain, duo MC mengundang Ketua panitia untuk memberikan sambutan sebagai pembukan event ini dan dilanjutkan dengan sambutan oleh MUGI Batam yang diwakili oleh saya sendiri dengan merefresh peserta mengenai MUGI dan MUGI Batam serta target yang ingin dicapai oleh MUGI Batam untuk melakukan sharing kepada semua masyarakat di kota Batam.

Setelah sambutan yang disampaikan oleh Ketua Panitia dan MUGI Batam, acara dilanjutkan dengan pembawaan materi session pertama oleh Narenda Wicaksono, Technical Advisor Microsoft Indonesia. Materi yang dibawakan adalah “Microsoft Windows Server 2008 R2”.

Penyampaian materi ini diawali dengan pegenalan Windows Server 2008 R2 dan dikuti dengan penyampaian kelebihan Windows Server 2008 R2 dari Windows Server 2008 dikuti dengan fitur dari Windows Server 2008 R2 Core yang sudah mensupport Microsoft dot Net dimana hal ini belum disupport pada versi sebelumnya serta fitur lainnya, diantaranya Bit locker dilevel server.

Sesion selanjutnya membahas mengenai Visual Basic 2010 dengan LINQ oleh Junindar, MVP. Pada session ini peserta ditantang untuk berinteraksi dengan pembicara dan tantangan tersebut disambut beberapa peserta dengan menjawab pertanyaan yang disampaikan pembicara pada akhir session. Trik yang digunakan MVP kita ini sangat jitu untuk membuat peserta penasaran, salut buat the first MVP dari Batam ini. Thanks buat Bro Junindar, ditengah kesibukannya dalam menanti sang buah hati yang lahir pada hari sabtu 12 Desember 2009, beliau masih menyempatkan diri untuk mengisi slot yang telah sediakan. Congratulation buat Bro Junindar atas kelahiran putrinya.

Session selanjutnya dibawakan oleh Ronal Rajaguguk, Develper Advisor Microsoft Indonesia, Beliau membawakan Silverlight 4.0. Session ini sangat menarik perhatian peserta terlebih pada saat di demokan betapa mudahnya cara membuat game menggunakan Silverlight - Expression Blend tanpa harus melakukan coding :)

Setelah puas dengan materi yang disampaikan oleh Ronal, acara break untuk ISHOMA selama satu jam sambil menunggu session berikutnya yang akan dideliver oleh Wely, MVP para pembicara melakukan pose bersama, berdiri dari kiri anda, Ronal Rajagukguk, Wely dan Naren Wicaksono. Duduk dari kiri anda, Junindar, Athailah dan Saya sendiri Aprizon.

Pada session ke-4, rekan kita Wely, MVP yang sedang menimba ilmu di negeri singa menyempatkan diri untuk mengisi slot yang diberikan oleh Panitia, materi yang dibawakan oleh Wely adalah Visual Studio 2010 dengan ASP.Net nya. Disini wely mendemokan perbedaan kecepatan akses ke database antara LINQ dan PLINQ yang cukup menarik perhatian peserta walaupun sempat bengong-bengong pada awal session dimulai karena kebetulan sebagian peserta terdiri dari IT Pro.

Session terakhir saya dan Atha membawakan materi Windows 7 dan Office 2010. Dimulai dengan memperkenalkan fitur Windows 7 oleh Pak Atha dan dilanjutkan dengan Demo dari fitur yang telah di presentasikan. Antusiasme peserta sangat tinggi untuk bertanya sehingga membuat atha kewalahan dalam menjawab pertanyaan, karena begitu banyak peserta yang ingin mengajukan pertanyaan, akhirnya tidak semua pertanyaan terjawab dan akan dijawab memalui milis MUGI-BATAM

Selanjutnya untuk materi Office 2010, saya awali dengan melakukan sounding kepada peserta mengenai Office Application dan sesuai dugaan saya, semua peserta telah menggunakan Office Application sehingga saya merasa tidak perlu lagi mempresentasikan apa itu office 2010 tapi saya mulai dengan pertanyaan selanjutnya mengenai kesulitan mereka menggunakan Office versi sebelumnya. Cukup menarik, saya coba trigger dengan file yang digunakan secara bersama di dalam satu network, dimana data yang telah dibukan oleh orang lain akan berstatus read only dibuka oleh mereka atau harus menunggu file tersebut ditutup telebih dahuluapabila , saya kemukakan solusinya bahwa di Office 2010 hal ini sudah teratasi dengan fitur co-authoring. Pertanyaan lain yang muncul adalah recovery file yang lupa tersimpan, hal ini juga saya kemukakan sudah teratasi di Office 2010 dengan fitur Recovery Unsaved Document

Setelah semua materi dideliver oleh pembicara tibalah waktunya kita untuk berpisah dengan temen-temen panitia yang telah mengorbankan waktunya untuk mewujudkan agar event ini terlaksana dengan baik seperti saat ini. Perpisahan sementara ini kita abadikan dengan foto bersama panitia, berikut hasil jepretan yang dilakukan oleh atha :)

inally, terima kasih kepada temen-temen yang telah berjuang dengan penuh semangat untuk event ini, semoga akan muncul event-event lain yang lebih menarik sebagai ajang kita buat berbagi.

Terima kasih juga yang sebesar-besarnya kepada para sponsor:

- Microsoft Indonesia, /up, Narenda Wicaksono

- Tabloid PC Plus, /up, Bapak J. Bayu Sarwoaji

- Politeknik Batam / FT. UMRAH, /up, Bapak Uuf

- MUGI Nasional, /up, Ketua MUGI, Sony Setiawan

Semoga kita bisa bekerja sama kembali pada event-event berikutnya agar kita bisa saling berbagi satu sama lain.

MS Chart Pada VB 9/10

Seperti pada artikel saya step ke 16, untuk membuat Chart kita bisa menggunakan owc11. dan sebelumnya kita harus melakukan beberapa langkah terlebih dahulu.Atau kita bisa menggunakan 3^rd party program untuk membuat chart, tapi tentunya tidak gratis.

Pada VS 2008 kita bisa menggunakan MS Chart komponen, pada saat installation VS 2008, komponen ini memang tidak ada pada toolbox, kita harus mendownload terlebih dahulu. Silahkan download pada link dibawah ini.

http://www.microsoft.com/downloads/details.aspx?FamilyId=130F7986-BF49-4FE5-9CA8-910AE6EA442C&displaylang=en (MSChart.exe)

http://www.microsoft.com/downloads/details.aspx?familyid=1D69CE13-E1E5-4315-825C-F14D33A303E9&displaylang=en (MS Chart Control Add-on)

Setelah berhasil mendownload pada dua link di atas, hal pertama yang dilakukan adalah jalankan file MSChart.exe , lalu MSChart_VisualStudioAddOn.exe.

Coba buka VS 2008, dan liat pada toolbox > Data, maka ada sebuah komponen baru dengan nama chart.

Di bawah merupakan contoh code menggunakan komponen ini.

Dengan menggunakan LINQ

Dim db As New ChartDataContext

Dim hasil = From rep In db.REPs

Chart1.Series("Series1").Points.DataBindXY(hasil, "Name", hasil, "Sales")

Dan , dengan menggunakan DataReader

Dim myConnectionString As String = "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=chartdata.mdb"

Dim mySelectQuery As String = "SELECT Name, Sales FROM REPS WHERE RegionID <>

Dim myConnection As New OleDbConnection(myConnectionString)

Dim myCommand As New OleDbCommand(mySelectQuery, myConnection)

myCommand.Connection.Open()

Dim myReader As OleDbDataReader=myCommand.ExecuteReader(CommandBehavior.CloseConnection)

Chart1.Series("Default").Points.DataBindXY(myReader, "Name", myReader, "Sales")

myReader.Close()

myConnection.Close()

Untuk contoh lengkap bisa di dapat disini http://code.msdn.microsoft.com/mschart/Release/ProjectReleases.aspx?ReleaseId=1591

Note : Pada VB 2010, komponen ini sudah otomatis ada pada saat kita menginstall VS 2010.

Wassalam

Read/Write Configuration File (VB 9)

Setelah menggunakan VB 2005 keatas, banyak sekali para developer memanfaatkan suatu fitur baru yaitu My.Settings. Salah satu fungsi nya adalah untuk melakukan penyimpaanan informasi yang bisa di akses secara mudah dan cepat oleh aplikasi kita. Dan fitur banyak sekali di gunakan untuk menyimpan connection string dalam mengakses database. Lalu bagaimana membuat aplikasi yang fleksible dalam menyimpan connection string tanpa harus membuka secara langsung file konfigurasi nya. Untuk itu kita harus membuat sedikit code untuk mengakses dan memanipulasi data yang tersimpan di file tersebut. Bagaimana cara nya , ikuti trus artikel ini.

untuk artikel bisa didapatkan di  link

untuk source code di  link

Wassalam

Mengurangi size pada excel file dengan menggunakan VBA

Sering sekali kita menerima atau menemukan file excel kita berukuran yang sangat besar namum isi nya hanya sedikit, dan sangat tidak masuk akal. Isi yang sedikit tapi dengan Size bisa mencapai 5-10 MB.

Lalu bagaimana cara mengatasinya, banyak sekali caranya, misalkan dengan melakukan Save As ke .html, .csv format. Tapi hal ini pernah saya lakukan dan tidak berhasil dengan sempurna.

Tulisan ini mengajak kita untuk menyelesaikan masalah diatas dengan menggunakan VBA. Pasti akan timbul pertanyaan, apakah setiap file yang bermasalah akan menggunakan VBA, berarti kita akan selalu mengetikkan code jika menemui file yang bermasalah. Tentu jawaban nya tidak, kebayang jika kita memiliki 100 user dan 50% dari user sering mengalami masalah ini. Oleh karena kita akan membuat Add-Ins (.xla), dan akan di distribusikan ke user.

Ikuti langkah-langkah berikut :

1. Create New Excel file dan simpan dengan nama Reduce
2. Pada jendela excel, tekan Alt+F11 (untuk membuka jendela Visual Basic Editor)
3. Pada jendela VBA, klik kanan VBA Project (Reduce) dan Insert > Module
4. Pada Module ketikkan sintaks seperti dibawah

Option Explicit

Sub Reduce

Dim LastRow As Long

Dim LastCol As Long

Dim ColFormula As Range

Dim RowFormula As Range

Dim ColValue As Range

Dim RowValue As Range

Dim ws As Worksheet

Application.ScreenUpdating = False

Application.DisplayAlerts = False

On Error Resume Next

For Each ws In Worksheets

With ws

On Error Resume Next

Set ColFormula = .Cells.Find(What:="*", After:=Range("A1"), LookIn:=xlFormulas, _

LookAt:=xlPart, SearchOrder:=xlByColumns, SearchDirection:=xlPrevious)

Set ColValue = .Cells.Find(What:="*", After:=Range("A1"), LookIn:=xlValues, _

LookAt:=xlPart, SearchOrder:=xlByColumns, SearchDirection:=xlPrevious)

Set RowFormula = .Cells.Find(What:="*", After:=Range("A1"), LookIn:=xlFormulas, _

LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlPrevious)

Set RowValue = .Cells.Find(What:="*", After:=Range("A1"), LookIn:=xlValues, _

LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlPrevious)

On Error GoTo 0

If ColFormula Is Nothing Then

LastCol = 0

Else

LastCol = ColFormula.Column

End If

If Not ColValue Is Nothing Then

LastCol = Application.WorksheetFunction.Max(LastCol, ColValue.Column)

End If

If RowFormula Is Nothing Then

LastRow = 0

Else

LastRow = RowFormula.Row

End If

If Not RowValue Is Nothing Then

LastRow = Application.WorksheetFunction.Max(LastRow, RowValue.Row)

End If

.Range(Cells(1, LastCol + 1).Address & ":IV65536").Delete

.Range(Cells(LastRow + 1, 1).Address & ":IV65536").Delete

End With

Next

Application.ScreenUpdating = True

Application.DisplayAlerts = True

MsgBox ("Selesai")

End Sub

5. Simpan. Lalu Save As file tersebut dengan type .xla (Microsoft Office Excel Add-In) dengan nama Reduce.xla

Lalu bagaimana menggunakan nya, buka file yang bermasalah , dan Klik Tools > Add-Ins. Pada jendela Add-Ins aktifkan check box Reduce. Jika tidak ada cari (browse) dimana sewaktu kita menyimpan file .xla nya. (Ini dilakukan cukup sekali pada setiap PC). Dan untuk menjalankan nya, klik Tools > Macro > Macros

Jika pada jendela Macro tersedia “Reduce” Macro maka tinggal klik button Run, jika belum ketikkan “Reduce” pada Macro Name dan klik Run. Setelah ada pesan “Selesai”. Tutup dan lihat size nya sudah berkurang..

Selamat mencoba ..

Wassalam