VB to XML

kemarin aku bikin program semacam downtime report gitu...
salah satu fitur dari aplikasi ini adalah menyajikan data dalam format XML
pertama bingung juga, aku kan belum pernah ngutak atik XML
tapi berkat bantuan Ade, aku dapet skrip untuk bikin XML dari VB
this is the source:

Option Explicit
Private Sub Form_Load()
Dim objADORS As New Recordset
Dim objXMLDOM As New MSXML2.DOMDocument40
Dim schemaNode As MSXML2.IXMLDOMNode
objADORS.Open "SELECT ContactName From Customers", _ "PROVIDER=SQLOLEDB.1;SERVER=.;UID=sa;PWD=;DATABASE=Northwind;" 'Save the recordset as a DOMDocument object
objADORS.Save objXMLDOM, adPersistXML
With objXMLDOM
.setProperty "SelectionNamespaces", _ "xmlns:s='uuid:BDC6E3F0-6DA3-11d1-A2A3-00AA00C14882'"
Set schemaNode = .selectSingleNode("//s:Schema")
With .documentElement
.removeChild schemaNode
.removeAttribute "xmlns:s"
.removeAttribute "xmlns:dt"
End With
.Save "c:\ContactsData.xml"
End With
objADORS.Close
Set objADORS = Nothing
Unload Me
End Sub

bourink.....

satu topik untuk hari ini....
borink.... (sesuai EYD nya inggris, aturan bored kali yak... tapi lebih keren dan lebih familiar boring si...)
kangen rumah.... pengen jalan² muter² jogja... pengen kumpul² di rumah.... intinya: kangen.... :(
3 hari ini aku full libur. dan 3 hari memuaskan diri dengan tidur hehehe
dulu aja pas di semarang libur 1 hari aja balik... la saiki...? cuman bisa ngendon di rumah. mo turun ke timika males, mo ngapa²in males, so cuman nongkrong di rumah. nton tipi sama baca "Harry Potter and The Half-Blood Prince"
kemarin ke perpus liat² buku, ternyata banyak juga koleksi yang belum aku baca. termasuk bacaan² yang dulu pas jaman sd-smp aku seneng banget. bisa ni di baca ulang... :)
lima sekawan, trio detektip, malory towers, candy², mari-chan... jadul banget kali yak... tapi boleh juga si buat ngisi waktu... he..he...
terus ada niat juga pengen pinjem buku² inggris, sapa tau bisa ketularan pinter inggris ;p

heran deh... kalo libur rasanya cepet banget... tau² besok udah mesti masuk lagi niy...
kembali ke topik...... bourink................................ :(

Plant Information System

plant information system, ato istilah kerennya PI....
mesti pada bingung apaan tu... begitu juga denganku waktu pertama denger. kirain "pie" ternyata PI...
sama kayak database, tapi dia ga kenal yang namanya tabel. adanya cuman nama data yaitu tag, dan data² untuk tag tersebut yang terdiri dari timestamp sama value.
dan disini nggak bisa pake query ato statement SQL, tapi nge-link datanya lewat Excel. so.. bingung juga pas coding, mo ngambil datane pie iki...
ga da kodok lagi tiap pagi, tapi mainnya lewat Excel apa PI ProcessBook. terus programming nya pake VB application.

kedua gambar itu adalah contoh tampilan ProsesBook. yang satu tampilan data, yang satu lagi tampilan truck yang antri mo dumping ke crusher.
kedua tampilan tersebut adalah karya pertamaku programming dengan PI. bukan sepenuhnya karyaku si... soale cuman ngembangin aja :D
seperti biasa, edit, copi, paste hehehe...
btw kemarin sempet ada masalah dengan server gara² upgrade versi server. sempet bikin geger, tapi untungnya masalah masih bisa dikendalikan... heran deh.. tiap aku dateng, baru beberapa bulan jalan, pasti ada masalah dengan server hehehe

t-sel mania

aku buat kartu halo euy... :D
lengkap sudah penderitaanku... eh salah, lengkap sudah simcard ku.. demi memenuhi hasrat untuk bisa pake paket internet bulanan...
lebih enak dan lebih murah kalo pake pasca bayar. kalo pake pra bayar paket 24 jam buat seminggu susah ngabisinnya.. mending pake yang 40 jam buat sebulan. apalagi share juga sama temen 1 kamar, jadi 40 jam pasti abis dah.. mungkin kurang malah... :D
lagian seperti kata kang Darwis, ni kartu juga murah buat telpon. 800 rupiah flat sesama t-sel, dengan tarif offpeak 650 per menit.
ps: offpeak nya mulai jam 8 bo'... jadi ga perlu nunggu jam 10 buat nikmatin tarif murah...
nilai plusnya lagi, tarif sms 250 ke semua seluler. lebih murah kan daripada simpati ato as... (dengan catatan untuk sms ke non t-sel)
bingung juga ngelola kartunya hehehe tapi mo gimana lagi, semua kartu punya point plus ... bingung juga kalo suruh milih yang mana yang mo dieliminasi.. so.. yawdah deh.. jalan terus... :)
yang satu buat sms, yang satu buat ngenet, yang satu buat telpon :D kasihan juga yang mo ngubungi aku, mesti bingung mo milih ke nomor yang mana :D tapi bodo amat yak...? ;p
point plus ke-3 kartu tsb buatku is...:
- simpati : tarif offpeak telepon 300 per menit... super murah buanged kalo mo telepon inlok lama
- as : free 100 sms tiap 100 sms terkirim, so aku tiap setengah bulan terakhir mesti nggak perlu ngeluarin pulsa buat sms. oh ya, as juga murah buat telepon ke non t-sel dengan itungan 40 rupiah per detiknya
- halo bebas bicara : paket internet bulanannya sama tarif telepon seperti telah kusebutkan di atas
so.. bingung ni yang mo dimatiin yang mana... jadi sambil jalan aja deh milihnya... ntar eliminasinya belakangan hehehe

bacaan paling lama seumur hidup

aku kan kemarin pinjem hari potter yang seri Orde Phoenix dengan jatah waktu 2 minggu. 2 minggu pertama terlewati dan ternyata belum selesai. aku perpanjang dan ternyata belum selesai juga. kuperpanjang lagi sampe sekarang ternyata... belum selesai juga hehehe tapi lumayan c... tinggal 200 halaman lagi. tenggang waktunya sampai besok minggu. moga slese deh.. males kalo mesti perpanjang lagi. udah hampir 6 minggu je... mosok nggak selesai juga

btw malem ini upload cepet banget euy... lagi sepi kali yah... jd aksesnya cepet

me n my life (2)

rumah warna ijo itu kediamanku selama disini
tidak seperti kebanyakan bangunan di jawa yang ber-tembok ria, rumah disini semua terbuat dari gypsum.
bagian dalem rumah dan kamar² di cat warna putih
manis dan minimalis
lemarinya juga simple banget, cuman dinding yang dikasih pintu geser, terus di dalemnya di buat rak. praktis banget kan..?
bisa jadi inspirasi buat rumah masa depan niy.. hehehe

bis yang tiap hari mengantarku ke kantor
bis yang bisa dibilang super duper bis, abis kuat naik tanjakan hampir 70 derajat dengan penumpang lebih dari 50 orang
tak tanggung deh, as**** ga bakal tahan lama kalo beroperasi di sini.
abis tanjakannya curam, terjal berbatu pula
dulu pas pertama naik bis ini ke kantor, senam jantung euy... abis di bawah ada jurang, mana bis jalannya kadang miring kalo ada lubang. tapi sekarang frekuensi senam jantungnya udah berkurang meski kadang masih senam bentar :)

kangen jogja :(

hari ini adalah hari nggak mandi sedunia :)
tadi pagi air macet, alhasil se-tembagapura gak mandi pagi semua
paling cuman cuci muka sama sikat gigi pake air mineral :D cape deh...
untung kemarin sore mandi, bayangpun kalo nggak... hehehe

hari ini nyoba² sharing koneksi internet sama mbak Wiwid, temen satu kamarku. akhirnya berhasil koneksi lewat LAN berkat bantuan mas Adi.
dah 3hr nyoba² koneksi lewat wifi gabisa jg akhirnya nyoba lewat LAN.
biarpun di share, tapi koneksi sama cepete. lumayan juga yah…
satu harga bisa buat 2 koneksi :)

akhir² ini mulai kangen jogja euy...
gara² kemarin jalan² ke blog temen yang upload video tentang jogja
sederhana, namun cukup membangkitkan memoriku tentang jogja
angkringan Pak Man, malio, vredeburg (salah nulis ga yah..?), bunderan, tamansari dsb
kangen... huks..huks..huks..

btw lagi seneng niy...
2 proyek yg memusingkanku 2 minggu ini sudah dapet titik cerah
paling nggak udah mau running, tinggal nunggu error² nya ajah
moga aja ga eror, so minggu depan bisa lao² sambil mikir xml nya :)
nggak salah yah aku jauh² ke sini
banyak yg bisa dipelajari :) raketan kadang marai mumet hehehe