cara merubah tampilan button vb 6.0

posting kali ne... saya mau bahas bagaimana cara merubah tampilan button pada vb... tentunya pasti bosen kan... kalau tiap bikin program selalu memakai button bawaan standard dari vb......jadi agar tidak bosan...dan juga agar tampilan program yang kita buat juga jadi lebih menarik tidak ada salahnya kita coba hal yang baru....seperti contoh form di bawah ini

terlihat bentuk button nya lain dari button bawaan standard vb
button tersebut menggunakan xp button

silahkan download xpbutton disini

cara menambahkan artikel terkait di bawah posting

menambahkan link artikel terkait di bawah posting  tujuanya ya...agar pengunjung bisa mengetahui artikel-artikel menarik lainya di blog kita ....siapa tau mereka membaca artiker tersebut... seperti yang ada di blog saya ini...

langsung saja...silahkan login di blog kita
1. Dari halaman dasbor/dashboard, pilih dan klik Design atau Rancangan.kemudian pilih tab edit html

atau yang memakai antar muka bloger yang sudah di perbaharui pilih tab tamplate kemudian klik edit html

2.tandai Expand Widget Template (sebaiknya download dulu template Anda sebagai backup) buat jaga-jaga siapa tau ada kesalahan...

3.cari kode berikut <data:post.body/>
4. kemudian paste kode berikut tepat di bawh kode <data:post.body/>

<b:if cond='data:blog.pageType == "item"'>

<div class='similiar'>

<div class='widget-content'>

<h3>Related Post</h3>

<div id='data2007'/><br/><br/>

<script type='text/javascript'>

var homeUrl3 = "<data:blog.homepageUrl/>";

var maxNumberOfPostsPerLabel = 4;

var maxNumberOfLabels = 10;

maxNumberOfPostsPerLabel = 100;

maxNumberOfLabels = 3;

function listEntries10(json) {

var ul = document.createElement('ul');

var maxPosts = (json.feed.entry.length <= maxNumberOfPostsPerLabel) ?

json.feed.entry.length : maxNumberOfPostsPerLabel;

for (var i = 0; i < maxPosts; i++) {

var entry = json.feed.entry[i];

var alturl;

for (var k = 0; k < entry.link.length; k++) {

if (entry.link[k].rel == 'alternate') {

alturl = entry.link[k].href;

break;

}

}

var li = document.createElement('li');

var a = document.createElement('a');

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 < json.feed.link.length; l++) {

if (json.feed.link[l].rel == 'alternate') {

var raw = json.feed.link[l].href;

var label = raw.substr(homeUrl3.length+13);

var k;

for (k=0; k<20; k++) label = label.replace("%20", " ");

var txt = document.createTextNode(label);

var h = document.createElement('b');

h.appendChild(txt);

var div1 = document.createElement('div');

div1.appendChild(h);

div1.appendChild(ul);

document.getElementById('data2007').appendChild(div1);

}

}

}

function search10(query, label) {

var script = document.createElement('script');

script.setAttribute('src', query + 'feeds/posts/default/-/'

+ label +

'?alt=json-in-script&callback=listEntries10');

script.setAttribute('type', 'text/javascript');

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 = "<data:label.name/>";

var test = 0;

for (var i = 0; i < labelArray.length; i++)

if (labelArray[i] == textLabel) test = 1;

if (test == 0) {

labelArray.push(textLabel);

var maxLabels = (labelArray.length <= maxNumberOfLabels) ?
</div>

</b:if>

5.simpan  Template, atau klik pratinjau untuk melihat hasilnya...kalau gagal...tinggal keluar dari halaman edit html...maka akan keluar peringatan kalau perubahan yang kita lakukan tidak di simpan...klik ok..biar perubahanya tidak di simpan......

terima kasih semoga bermanfaat....

cara mudah mengembalikan file atau folder yang di hapus virus

Langsung saja kita bahas bagaimana cara mengembalikan file yang di hapus oleh virus,...sebenarnya file tersebut tidak benar dihapus..tapi hanya di sembunyikan......
untuk mengembalikanya..saya pernah searcing di mbah google yaitu dengan masuk di comand promt trus masuk di direktori drive yang file di hiden kemudian ketik "attrib –s –h –r /s /d" 
tapi ketika saya coba tetap saja kadang tidak berhasil..... mungkin saya salah ketik atau gimana gx tau....jadi  saya pakai cara yang paling gampang saja... yaitu pastikan dulu kalau file tersebut hanya di hidden oleh virus caranya di windows explorer dari menu tool pilih folder option

pada tab view pilih show hidden file and folder
 kemudian hilangkan ceklis pada hide protected operating system file(recommended)