Latest Posts

Jumat, 19 Maret 2010

Membuat nomor urut pada laporan, Menggunakan Crystal Report 8.5


Sebuah laporan yang kita buat terkadang mebutuhkan nomor urut data yang ditampilkan, selain supaya memudahkan membaca laporan yang kita sajikan, nomor urut juga membuat laporan kita lebih sedap dipandang, berikut contoh laporan menggunakan nomor urut :



Bagaimana caranya, ini dia caranya,. Mari kita buka program crystal report, disini saya menggunakan Crystal Report 8.5, kita koneksikan laporan kita ke database caranya seperti postingan saya sebelumnya disini contoh laporan saya menggunakan database Nortwind dengan table Supplier,
setaleh ditata sedemikian rupa akhirnya
jadi laporan seperti ini :


Nahh…..sekarang tinggal mengisi nomor urut yang saya kasih dengan tanda warna merah tersebut diatas, kurang lebih seperi ini caranya :

Click menu insert Field Object, muncul form Filed Explorer,



Pada tree view Running Total Fields, click kanan dan pilih new, maka akan muncul form Create Running Total Field :



Isi Runnig Total Name suka-suka sobat semua, Isi Field to summarize dengan Field Supplier ID dan type of summary dengan Count.
Disini sedikit saya jelaskan maksud dari konfigurasi diatas, maksudnya adalah kita buat Count data dari SupplierID dari database yang kita pilih, sehingga nantinya apabila datanya ada 100 maka noUrut akan terisi 1-100 sesuai dengan data yang ada.
Apabila kita menginginkan nomor urut menjadi nomor 1 lagi dengan group data yang berbeda, maka pada On change group kita isi sesuai dengan field yang kita inginkan supaya nomor urut meng-counter manjadi nomor 1 lagi. Bingung ya…sama saya juga…hehehehehehe….


Seletelah konfigurasai diatas selesei click OK. Maka pada form Field Object pada tree view Running Total Filed akan muncul konfigurasi yang telah kita buat sebelumnya.



Sekarang tinggal kita letakkan nourut diatas pada laporan. Maka hasilnya akan seperti ini :



Demikian dulu sobat untuk informasinya, semoga bermanfaat, amin.....oiya minta komentarnya ya.....terimakasih sebelumnya...

read more...

Kamis, 18 Maret 2010

Membuat Read More/ Baca Selengkapnya pada blogger

Kadang ada sebuah template blog tidak dilengkapi dengan read more atau baca selengkapnya, sehingga membuat tampilan blog kita menjadi sangat panjang apabila postingan yang kita tampilkan memuat banyak pembahasan, nahhhh…suapaya tampilan blog awal/home sobat tidak memanjang seperti menara petronas, kita harus membuat read more pada bagian artikel yang ingin kita potong. Berikut ini langkah-langkah nya.
Login ke blog sobat masing-masing, klik Layout kemudian masuk ke Edit HTML
centang Expand Widget Templates
Masukkan kode berikut sebelum tag <head>
atau tepat sesudah kode ]]></b:skin>
seperti ini contohnya :

]]></b:skin>
<style>
<b:if cond='data:blog.pageType == "item"'>
span.fullpost {display:inline;}
<b:else/>
span.fullpost {display:none;}
</b:if>
</style>

Selanjutnya mengatur supaya postingan terpotong, cari kode

<p><data:post.body/></p> dalam template sobat, kemudian bawahnya beri code seperti ini :

<b:if cond='data:blog.pageType != "item"'>
<a expr:href='data:post.url'> Read More..</a>
</b:if>

Nah supaya terpotong, setiap kali sobat posting, klik pada bagian posting dimana sobat ingin tulisan Read More.. muncul maka ketik span <class="fullpost">. kemudian pada akhir postingan sobat kasih </span>. Untuk menmbahkan kode ini, ketika posting sobat harus dalam mode Edit HTML bukan Compose


Contoh penulisan posting:
Membuat Read more.. itu mudah semudah memjamkan mata, yang susah dijaman sekarang itu, cari uang susahnya minta ampun. Saya potong dulu. <class="fullpost"> Tapi kalo mau berusaha semuanya pasti bias….semangat….</span>
read more...

Selasa, 16 Maret 2010

Membuat Related Post Berdasarkan Lable

Sudah lama saya tidak posting artikel di blog saya yang satu ini...biasa karena banyak pikiran beban hidup yang semakin berat, jadi tidak sempat nulis hehehehehe...
kali ini saya akan berbagi informasi bagaimana caranya membuat related post berdasarkan label, related post biasanya difungsikan untuk memudahkan para pembaca blog kita untuk mendapatkan informasi yang berhubungan dengan postingan yang dibaca, sehingga para pembaca bisa betah membaca blog kita.
Baik langsung saja begini caranya :
- Pertama pastinya Loggin dulu ke blogger.
- Masuk ke Tata Letak/Layout
- Pilih Edit HTML
- Centang tulisan Expand Widget Template
Cari code ini,
<data:post.body/>
untuk memudahkan tekan Ctrl+f, cari code tersebut :
setelah code tersebut ditemukan paste code dibawah ini setelah code tersebut diatas.


<b:if cond='data:blog.pageType == &quot;item&quot;'>
<div class='similiar'>
<!-- *****************Related Posting****************** -->
<div class='widget-content'>
<b>Related Posting :</b>
<div id='data2007'/><br/><br/>
<div id='Randezvous'>
<u><h5><a href=''>
</a></h5></u>
</div>
<script type='text/javascript'>
var homeUrl3 = &quot;<data:blog.homepageUrl/>&quot;;
var maxNumberOfPostsPerLabel = 4;
var maxNumberOfLabels = 10;
maxNumberOfPostsPerLabel = 100;
maxNumberOfLabels = 3;
function listEntries10(json) {
var ul = document.createElement(&#39;ul&#39;);
var maxPosts = (json.feed.entry.length &lt;= maxNumberOfPostsPerLabel) ?
json.feed.entry.length : maxNumberOfPostsPerLabel;
for (var i = 0; i &lt; maxPosts; i++) {
var entry = json.feed.entry[i];
var alturl;
for (var k = 0; k &lt; entry.link.length; k++) {
if (entry.link[k].rel == &#39;alternate&#39;) {
alturl = entry.link[k].href;
break;
}
}
var li = document.createElement(&#39;li&#39;);
var a = document.createElement(&#39;a&#39;);
a.href = alturl;
if(a.href!=location.href) {
var txt = document.createTextNode(entry.title.$t);
a.appendChild(txt);
li.appendChild(a);
ul.appendChild(li);
}
}
for (var l = 0; l &lt; json.feed.link.length; l++) {
if (json.feed.link[l].rel == &#39;alternate&#39;) {
var raw = json.feed.link[l].href;
var label = raw.substr(homeUrl3.length+13);
var k;
for (k=0; k&lt;20; k++) label = label.replace(&quot;%20&quot;, &quot; &quot;);
var txt = document.createTextNode(label);
var h = document.createElement(&#39;b&#39;);
h.appendChild(txt);
var div1 = document.createElement(&#39;div&#39;);
div1.appendChild(h);
div1.appendChild(ul);
document.getElementById(&#39;data2007&#39;).appendChild(div1);
}
}
}
function search10(query, label) {
var script = document.createElement(&#39;script&#39;);
script.setAttribute(&#39;src&#39;, query + &#39;feeds/posts/default/-/&#39;
+ label +
&#39;?alt=json-in-script&amp;callback=listEntries10&#39;);
script.setAttribute(&#39;type&#39;, &#39;text/javascript&#39;);
document.documentElement.firstChild.appendChild(script);
}
var labelArray = new Array();
var numLabel = 0;
<b:loop values='data:posts' var='post'>
<b:loop values='data:post.labels' var='label'>
textLabel = &quot;<data:label.name/>&quot;;
var test = 0;
for (var i = 0; i &lt; labelArray.length; i++)
if (labelArray[i] == textLabel) test = 1;
if (test == 0) {
labelArray.push(textLabel);
var maxLabels = (labelArray.length &lt;= maxNumberOfLabels) ?
labelArray.length : maxNumberOfLabels;
if (numLabel &lt; maxLabels) {
search10(homeUrl3, textLabel);
numLabel++;
}
}
</b:loop>
</b:loop>
</script>
</div>
</div>
</b:if>
read more...

Kamis, 21 Januari 2010

Membuat Report Pada Visual Basic Menggunakan Koneksi ADO

OK…sobat semua. Setelah pada postingan saya sebelumnya Menampilkan Report dengan Crystal Report Menggunakan ADO, sekarang mari kita bahas bagaimana caranya memasukkannya kedalam program/Aplikasi. Disini saya menggunakan visual basic 6.0, jadi pertama sobat harus install VB 6 dan masuk kedalam aplikasi. Setelah dibuka program VBnya, click Project >> Add Criystal Report 8.5 (karena disini saya menggunakan CR 8.5), ato kalo dimenu project tidak ada maka Click Project >> More ActiveX Designers >> Add Criystal Report 8.5. maka akan muncul form seperti ini :

Photobucket

Nahh…dari form diatas pilih Form an Exiting Report, jadi sebelumnya sobat harus buat reportnya dulu di crystal report kemudian kita ambil ke VB 6. setelah muncul form diatas click OK, dan ambil reportnya dimana sobat menyimpanya.Click Open, kemudian muncul Form ini :

Photobucket

Click OK,Maka akan muncul dua form pada visual basic, form Designer dan Form untuk CRViewer atau form untuk menampilkan laporan dari designer. Setelah proses diatas selesei, sekarang kita isi coding yang ada pada form CRViewrnya, Bentuk laporan yang akan saya tampilkan adalah seperti ini :

Photobucket

Data dari laporan tersebut saya ambil dari database Nortwhin dengan dari query Invoice yang ada pada SQL Server, Nahh…sekarang kembali ke coding, kita isi coding pada from CRViewernya bukan Form Designer. Codingnya kurang lebih seperti ini :

Dim Report As New dLaporan
Dim conn As New ADODB.Connection
Dim rec As New ADODB.Recordset
Dim comm As New ADODB.Command


Private Sub Form_Load()
Screen.MousePointer = vbHourglass


Set conn = Nothing


conn.Open "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=Northwind;Data Source=(local)"


Set comm = New ADODB.Command


With comm
.ActiveConnection = conn
.CommandType = adCmdText
.CommandText = "set dateformat dmy select * from Invoices where OrderDate >= '" & fMenu.DTPicker1.Value & "' and OrderDate <= '" & fMenu.DTPicker2.Value & "'"
.Execute
End With


Set rec = New ADODB.Recordset
rec.Open comm
Report.DiscardSavedData
Report.Database.SetDataSource rec



CRViewer1.ReportSource = Report
CRViewer1.ViewReport
Screen.MousePointer = vbDefault
End Sub


Private Sub Form_Resize()
CRViewer1.Top = 0
CRViewer1.Left = 0
CRViewer1.Height = ScaleHeight
CRViewer1.Width = ScaleWidth
End Sub


Nahh…perahtikan code yang saya warna merah, disitu letakn enaknya menggunakan ADO, kita bisa menggunakan koneksi command. Sehingga kita bisa langsung select pada source laporan dari database dengan criteria yang kita inginkan, bahkan kita bisa menggunakan store procedure di SQL server untuk menampilkan laporan. Apabila sobat masih bingung dengan semuanya yang ada diatas tadi bisa download disini untuk contohnya, nanti bisa dipelajari dan diutek-utek sendiri ma sobat-sobat semua, biar tambah mudah dimengerti.
read more...

Selasa, 19 Januari 2010

Menampilkan Report dengan Crystal Report Menggunakan ADO

Ada banyak cara untuk coneksi crystal report dengan database salah satunya adalah dengan ADO. Dan menurut saya ni ya, ini menurut pendapat saya gak tau kalo menurut sobat semua. Koneksi menggunakan ADO lebih cepat, lebih fleksible, lebih mudah membuatnya dari pada koneksi lainnya.selain nantinya lebih mudah membuatnya ketika di crystal report, lebih mudah juga membuatnya ketika diterapkan diaplikasi atau program. Yuk…langsung saja begini caranya unutk koneksi ADO di Crystal Report. Pertama buka program Crystal Report, buat laporan baru, muncul window seperti ini :



Pilih Using The Report Expert, Click OK, maka muncul window ini :



Click Database, muncul window ini :



Disitu pilih More Data Source >> Active Data >> Active Data (ADO). Maka akan muncul window ini :



Plih ADO and OLE DB, Click Build. Munucl window ini :



Pilih databse yang sobat gunakan. Disini saya menggunakan SQL Server. click Next. Maka muncul window ini :



Isi sesuai dengan konfigurasi SQL Server Sobat, dan pilih database yang digunakan. Click OK maka kembali ke Window ini :



Click OK. Maka (dari tadi maka terus yaaa) akan kembali ke Window ini :



Click add. Mucul window ini :



Pilih Table/View yang akan digunakan. Keudian click OK, Click Close, Maka kembali ke window ini :



Click next, silahkan sobat pilih konfigurasi laporan yang sobat inginkan. Seteleh selesei click Finish, selesei sudah bagaimana cara untuk membuat koneksi ADO crystal report sengan database. Disini saya menggunakan database SQL Server.
Seletelah sobat setting laporanya sedimikian rupa tinggal dimasukkan kedalam Program/Aplikasi. Untuk setting di programya saya bahas pada postingan saya berikutnya.
read more...

Minggu, 17 Januari 2010

Kisah Inspirasi (STEVE JOBS )




Tahun 1976, bersama rekannya Steve Wozniak, Jobs yang baru berusia 21 tahun mulai mendirikan Apple Computer Co. di garasi milik keluarganya. Dengan susah payah mengumpulkan modal yang diperoleh dengan menjual barang-barang mereka yang paling berharga, usaha itu pun dimulai. Komputer pertama mereka, Apple 1 berhasil mereka jual sebanyak 50 unit kepada sebuah toko lokal. Dalam beberapa tahun, usaha mereka cukup berkembang pesat sehingga tahun 1983, Jobs menggaet John Sculley dari Pepsi Cola untuk memimpin perusahaan itu. Sampai sejauh itu, Apple Computer menuai kesuksesan dan makin menancapkan pengaruhnya dalam industri komputer terlebih dengan diluncurkannya Macintosh. Namun, pada tahun 1985, setelah konflik dengan Sculley, perusahaan memutuskan memberhentikan pendiri mereka, yaitu Steve Jobs sendiri.

Setelah menjual sahamnya, Jobs yang mengalami kesedihan luar biasa banyak menghabiskan waktu dengan bersepeda dan berpergian ke Eropa. Namun, tak lama setelah itu, pemecatan tersebut rupanya justru membawa semangat baru bagi dirinya. Ia pun memulai usaha baru yaitu perusahaan komputer NeXT dan perusahaan animasi Pixar. NeXT yang sebenarnya sangat maju dalam hal teknologinya ternyata tidak membawa hasil yang baik secara komersil. Akan tetapi, Pixar adalah sebuah kisah sukses lain berkat tangan dinginnya. Melalui Pixar, Jobs membawa trend baru dalam dunia film animasi seiring dengan diluncurkannya film produksinya Toy Story dan selanjutnya Finding Nemo dan The Incredibles.

Sepeninggal Jobs dan semakin kuatnya dominasi IBM dan Microsoft membuat Apple kalah bersaing dan nyaris terpuruk. Maka, tahun 1997, Jobs dipanggil kembali untuk mengisi posisi pimpinan sementara. Dengan mengaplikasi teknoligi yang dirancang di NeXT, kali ini Apple kembali bangkit dengan berbagai produk berteknologi maju macam MacOS X, IMac dan salah satu yang fenomenal yaitu iPod.

Kisah sukses Steve Jobs mengajarkan kepada kita bahwa tidak ada kesuksesan yang instan. penolakan dan kegagalan seringkali mewarnai perjalanan hidup kita, tapi jangan biarkan semua itu membuat kita berhenti.
read more...

Kisah Inspirasi (OPRAH WINFREY )




Bermodal keberanian "Menjadi Diri Sendiri", Oprah menjadi presenter paling populer di Amerika dan menjadi wanita selebritis terkaya versi majalah Forbes, dengan kekayaan lebih dari US $ 1 Milyar. Copy acara "The Oprah Winfrey Show" telah diputar di hampir seluruh penjuru bumi ini.

TAHUKAH ANDA?

Lahir di Mississisipi dari pasangan Afro-Amerika dengan nama Oprah Gail Winfrey. Ayahnya mantan serdadu yang kemudian menjadi tukang cukur, sedang ibunya seorang pembantu rumah tangga. Karena keduanya berpisah maka Oprah kecil pun diasuh oleh neneknya di lingkungan yang kumuh dan sangat miskin. Luarbiasanya, di usia 3 tahun Oprah telah dapat membaca Injil dengan keras.

"Membaca adalah gerai untuk mengenal dunia" katanya dalam suatu wawancaranya.

Pada usia 9 tahun, Oprah mengalami pelecehan sexual, dia diperkosa oleh saudara sepupu ibunya beserta teman-temannya dan terjadi berulang kali. Di usia 13 tahun Oprah harus menerima kenyataan hamil dan melahirkan, namun bayinya meninggal dua minggu setelah dilahirkan.

Setelah kejadian itu, Oprah lari ke rumah ayahnya di Nashville. Ayahnya mendidik dengan sangat keras dan disiplin tinggi. Dia diwajibkan membaca buku dan membuat ringkasannya setiap pekan. Walaupun tertekan berat, namun kelak disadari bahwa didikan keras inilah yang menjadikannya sebagai wanita yang tegar, percaya diri dan berdisiplin tinggi.

Prestasinya sebagai siswi teladan di SMA membawanya terpilih menjadi wakil siswi yang diundang ke Gedung Putih. Beasiswa pun di dapat saat memasuki jenjang perguruan tinggi. Oprah pernah memenangkan kontes kecantikan, dan saat itulah pertama kali dia menjadi sorotan publik..

Karirnya dimulai sebagai penyiar radio lokal saat di bangku SMA. Karir di dunia TV di bangun diusia 19 tahun. Dia menjadi wanita negro pertama dan termuda sebagai pembaca berita stasiun TV lokal tersebut. Oprah memulai debut talkshow TVnya dalam acara People Are Talking. Dan keputusannya untuk pindah ke Chicago lah yang akhirnya membawa Oprah ke puncak karirnya. The Oprah Winfrey Show menjadi acara talkshow dengan rating tertinggi berskala nasional yang pernah ada dalam sejarah pertelevisian di Amerika. Sungguh luar biasa!

Latar belakang kehidupannya yang miskin, rawan kejahatan dan diskriminatif mengusik hatinya untuk berupaya membantu sesama. Tayangan acaranya di telivisi selalu sarat dengan nilai kemanusiaan, moralitas dan pendidikan. Oprah sadar, bila dia bisa mengajak seluruh pemirsa telivisi, maka bersama, akan mudah mewujudkan segala impiannya demi membantu mereka yang tertindas.
Oprah juga dikenal dengan kedermawanannya. Berbagai yayasan telah disantuni, antara lain, rumah sakit dan lembaga riset penderita AIDs, berbagai sekolah, penderita ketergantungan, penderita cacat dan banyak lagi.

Dan yang terakhir, pada 2 januari 2007 lalu, Oprah menghadiri peresmian sekolah khusus anak-anak perempuan di kota Henley-on-Klip, di luar Johannesburg, Afrika selatan, yang didirikannya bersama dengan pemirsa acara televisinya. Oprah menyisihkan 20 juta pounsterling ( 1 pons kira2 rp. 17.000,- )atau 340 milyiar rupiah dari kekayaannya. "Dengan memberi pendidikan yang baik bagi anak2 perempuan ini, kita akan memulai mengubah bangsa ini" ujarnya berharap.

Kisah Oprah Winfrey ialah kisah seorang anak manusia yang tidak mau meratapi nasib. Dia berjuang keras untuk keberhasilan hidupnya, dan dia berhasil. Dia punya mental baja dan mampu mengubah nasib, dari kehidupan nestapa menjadi manusia sukses yang punya karakter. Semangat perjuangannya pantas kita teladani!
read more...