tag:blogger.com,1999:blog-50672433474184893852024-03-08T02:23:37.563-08:00CAP Info TechTutorial komputer dan blogger, Software Gratis full, Source Code, Visual Basic, Macromedia Flash, Batch Script, Template, WidgetCAP INFO TECHhttp://www.blogger.com/profile/08161630745349972910noreply@blogger.comBlogger163125tag:blogger.com,1999:blog-5067243347418489385.post-13217296534058928202016-08-24T22:10:00.000-07:002016-08-24T22:10:49.299-07:00CAP MOVIE LIST ver 03.0614<div dir="ltr" style="text-align: left;" trbidi="on">
<div class="rvps2">
<span class="rvts8">CAP MOVIE LIST adalah aplikasi/software
komputer yang digunakan untuk menampilkan daftar Film/Video koleksi anda, Dengan
tampilan yang menarik dan mudah di gunakan.</span></div>
<div class="rvps2">
<span class="rvts8">Menampilkan Informasi Tayang,Rating,Favorit dan
lain-lain, Pada Film/Video yang di pilih.</span></div>
<div class="rvps2">
<span class="rvts8">Memberikan kenyamanan pada saat memutar
Film/Video, Tidak perlu takut file Film berpindah-pindah atau
terHapus.</span></div>
<div class="rvps2">
<span class="rvts8">Daftar film sudah di urutkan sesuai Abjad,
Untuk mempermudah pencarian.</span></div>
<div class="rvps2">
<span class="rvts8">CAP MOVIE LIST ver 03.0614 akan terus
diperbarui untuk menambah fitur-fitur baru dan Mempermudah
penggunaan.</span></div>
<div class="rvps2">
<br /></div>
<div class="rvps2">
<br /></div>
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgRovbWZ8aqydvBgmVAog9lkUfutcnRPHgNwPdsE8BtsFjNHTSknIJe7ylCJ3QbyEhOozCGx0GkQDpJ9pAKiX5FEgK4boUOlz0FYTb8JEJyahNhkJyFR36awuH7M_0kGX4oNEO8IDGxcQ/s1600/CML1.PNG" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="224" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgRovbWZ8aqydvBgmVAog9lkUfutcnRPHgNwPdsE8BtsFjNHTSknIJe7ylCJ3QbyEhOozCGx0GkQDpJ9pAKiX5FEgK4boUOlz0FYTb8JEJyahNhkJyFR36awuH7M_0kGX4oNEO8IDGxcQ/s400/CML1.PNG" width="400" /></a></div>
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjfEI6HT4xK2EYCVApG9Pqj1xitbYBD6BpYjHB5j-PGUiDkABvFkTVEAMjGdep9HmOIO5TmXaIKik0KbX-rIPJbU4NM_4qW54ry_-oe1SOG9SUqJ1YjNNgDax-CAye27PrUSvru10Sh5Q/s1600/CML2.PNG" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="223" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjfEI6HT4xK2EYCVApG9Pqj1xitbYBD6BpYjHB5j-PGUiDkABvFkTVEAMjGdep9HmOIO5TmXaIKik0KbX-rIPJbU4NM_4qW54ry_-oe1SOG9SUqJ1YjNNgDax-CAye27PrUSvru10Sh5Q/s400/CML2.PNG" width="400" /></a></div>
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhxpU-SL8h_FdIG0pDfs-9aiz-X0lMtZ4TGi3KLu1xt-3TtL2o_DlO2BzrOlbO6acTaMYwS1XZ7bGwcL8Lq7WnVqMcaIMW-7V33c6wwmLyjOczpy_QbJVpS4nFCxU3MC_QxbBvcqtu5IQ/s1600/CML3.PNG" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="223" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhxpU-SL8h_FdIG0pDfs-9aiz-X0lMtZ4TGi3KLu1xt-3TtL2o_DlO2BzrOlbO6acTaMYwS1XZ7bGwcL8Lq7WnVqMcaIMW-7V33c6wwmLyjOczpy_QbJVpS4nFCxU3MC_QxbBvcqtu5IQ/s400/CML3.PNG" width="400" /></a></div>
<br />
<div class="rvps2">
<br /></div>
<div class="rvps2">
<span class="rvts8"> Dan untuk sobat yang pengen koleksi film di tampilkan di CAP MOVIE LIST...</span></div>
<div class="rvps2">
<span class="rvts8">1. Buka CAP MOVIE LIST</span></div>
<div class="rvps2">
<span class="rvts8">2. Klik Menu - Back To (dan cari di mana folder kumpulan Film sobat berada)</span></div>
<div class="rvps2">
<span class="rvts8">3. Klik Ok dan Klik tombol Back, dan otomatis daftar Film sobat akan muncul</span></div>
<div class="rvps2">
<span class="rvts8">4. Pastikan Folder Film tidak berubah-ubah lokasinya, Jika berubah sobat lakukan lagi cara nomor 1</span></div>
<div class="rvps2">
<br /></div>
<div class="rvps2">
<span class="rvts8">Kelebihan CAP Movie List :</span></div>
+ Membuat daftar Film rapi dan tertata<br />
+ Tidak perlu buang2 waktu mencari letak folder Film (asal folder tidak pindah2) <br />
+ Anti Copy & Move yang tidak di sengaja<br />
+ Terdapat Informasi, History, Rating, Like, dan masih banyak lagi<br />
+ Tidak perlu install, Karena software/aplikasi ini Portable (11MB) <br />
+ Dan tampilan yang menarik tentunya ..... menurut ane..he he :)<br />
<br />
Kekurangan :<br />
Namanya juga aplikasi buatan amatir, pasti ada kekuranganya...<br />
- List/Daftar Film harus klik 2x baru muncul poster film<br />
- Tidak bisa menyesuaikan Resolusi komputer dengan otomatis, Dan jika sobat menggunakan Netbook/mini laptop sobat harus ganti ke Mini CAP MOVIE LIST...<br />
caranya : Klik Menu - lalu Klik Small Size...<br />
*Mungkin cuma itu kekuranganya, Selebihnya Sobat yang mencintai produk2 Indonesia yang bisa menilai...he..he ...he :)<br />
<br />
<div class="rvps2">
<span class="rvts8">Dan jika sobat masih bingung cara menggunakanya, Sobat bisa membaca Menu - Help, Di situ terdapat pentunjuk penggunaan CAP MOVIE LIST lengkap bahasa indonesia...</span></div>
<div class="rvps2">
<span class="rvts8">karena emang yang buat saya, Jadi kalau buat Paduan bahasa inggris juga susah... :) :D</span></div>
<div class="rvps2">
<span class="rvts8">Dan Akhir kata, Jika Sobat suka dan pengen <a href="http://www.mediafire.com/download/4475o57wwghdblx/CAP_MOVIE_LIST_v3.rar">DOWNLOAD</a>,,,Monggo di <a href="http://www.mediafire.com/download/4475o57wwghdblx/CAP_MOVIE_LIST_v3.rar">SINI</a></span></div>
<div class="rvps2">
<span class="rvts8"></span></div>
<div class="rvps2">
<span class="rvts8"></span></div>
<div class="rvps2">
<span class="rvts8"></span></div>
<div class="rvps2">
<span class="rvts8"></span></div>
<div class="rvps2">
<span class="rvts8"></span></div>
<div class="rvps2">
<span class="rvts8"></span></div>
<div class="rvps2">
<span class="rvts8"></span></div>
<div class="rvps2">
<span class="rvts8"></span></div>
<div class="rvps2">
<span class="rvts8"></span></div>
<div class="rvps2">
<span class="rvts8"><br /><u>Sekilas Tentang CAP application :</u></span></div>
<div class="rvps2">
<br /></div>
<div class="rvps2">
<span class="rvts13">Apa itu CAP application ?</span></div>
<div class="rvps2">
<span class="rvts13"></span><span class="rvts13">CAP application adalah nama/merk dari
Aplikasi/Software komputer yang di buat oleh :</span></div>
<div class="rvps2">
<span class="rvts13">CEN</span><span class="rvts17">DHIKI</span><span class="rvts13">A ADITYA PRATAMA [ CAP ]</span></div>
<div class="rvps2">
<span class="rvts13">Software yang dibuat menggunakan VB6 dan
VB.net, Dan akan menggunakan bahasa pemrogaman lainya.</span></div>
<div class="rvps2">
<span class="rvts13">Semua Source Code yang digunakan di Aplikasi
buatan CAP application 100% [ CODE SENDIRI ]</span></div>
<div class="rvps2">
<span class="rvts13">Dan jika CAP application menggunakan Source
Code Progamer lain, Akan dicantumkan Alamat Website/Nama Pembuat [ SUMBER
DICANTUMKAN ]</span></div>
<div class="rvps2">
<span class="rvts13">Dan untuk saat ini CAP application belum
menggunakan Source Code dari sumber lain.</span></div>
<div class="rvps2">
<br /></div>
<div class="rvps2">
<br /></div>
<div class="rvps2">
<span class="rvts8">*Terima Kasih Semoga Bermanfaat*</span></div>
<div class="rvps2">
<br /></div>
</div>
CAP INFO TECHhttp://www.blogger.com/profile/08161630745349972910noreply@blogger.com0tag:blogger.com,1999:blog-5067243347418489385.post-46366905193906426812016-08-24T20:52:00.000-07:002016-08-24T21:04:18.596-07:00CARA DOWNLOAD di GOOGLE DRIVE<div dir="ltr" style="text-align: left;" trbidi="on">
Tutorial ini di tujukan untuk siapa aja yang berkunjung di Blog CAPINFOTECH dan WebBlog lainya yang Link Downloadnya di Google Drive...<br />
<br />
Caranya SUPER GUUAMMPANG Banget...<br />
Lihat aja Screenshot di bawah :<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiILDGJli2kfiuljfUi4Vf3iWSuzZfpLf5AfwGWRKcIxdA5KZOj_F860yZSR0NP6TjCmqeJBzCIYR5_ZYVaU2hx1yXen4tzb3xbo55v1ZJE_c8AeUaX5oDNAUhqh6M99WGlYFMYTJciJQ/s1600/download.PNG" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="212" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiILDGJli2kfiuljfUi4Vf3iWSuzZfpLf5AfwGWRKcIxdA5KZOj_F860yZSR0NP6TjCmqeJBzCIYR5_ZYVaU2hx1yXen4tzb3xbo55v1ZJE_c8AeUaX5oDNAUhqh6M99WGlYFMYTJciJQ/s400/download.PNG" width="400" /></a></div>
<br />
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjJ1_4qDjeaCBghDAqOA4cRkDz6XueBR2V1RdgKCUmwW7s2zdiBZ_ZdCs8IiK7lqt0r-LgE722MGfHSCeGhZcQYrtMl2Sm_YD4fl7AqxO2oVV-80jxNs9SIXn02zNHYyFtGEoh-SDkXLw/s1600/SSSSS.PNG" imageanchor="1" style="clear: left; float: left; margin-bottom: 1em; margin-right: 1em;"><img border="0" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjJ1_4qDjeaCBghDAqOA4cRkDz6XueBR2V1RdgKCUmwW7s2zdiBZ_ZdCs8IiK7lqt0r-LgE722MGfHSCeGhZcQYrtMl2Sm_YD4fl7AqxO2oVV-80jxNs9SIXn02zNHYyFtGEoh-SDkXLw/s1600/SSSSS.PNG" /></a> Nah, Sobat tinggal Klik tanda Panah Download di pojok kanan atas setelah sobat membuka Link Download yang ada di WebBlog...<br />
<br />
<br />
<br />
<br />
<a href="https://drive.google.com/open?id=0Byr_0yQLXNQLMEdzM1l5UTNZQVk">download sample01</a><br />
<a href="https://www.blogger.com/home?bpli=1&pli=1">www.capinfotechsignin.com</a> </div>
CAP INFO TECHhttp://www.blogger.com/profile/08161630745349972910noreply@blogger.com0tag:blogger.com,1999:blog-5067243347418489385.post-48814665063733646902014-07-18T13:24:00.001-07:002014-11-17T10:36:57.329-08:00Aktivasi Windows Seven<div dir="ltr" style="text-align: left;" trbidi="on">
<br />
Yang butuh Aktivasi Windows Seven ...<br />
Langsung klik Link Download di bawah<br />
<br />
<a href="http://www.mediafire.com/download/1u2p83d6w3l8b34/Hack_Activasi_Win7.zip" target="_blank">Download</a></div>
CAP INFO TECHhttp://www.blogger.com/profile/08161630745349972910noreply@blogger.com0tag:blogger.com,1999:blog-5067243347418489385.post-90279213069857724052014-07-18T13:22:00.000-07:002014-09-22T10:05:18.252-07:00MKV Merge<div dir="ltr" style="text-align: left;" trbidi="on">
> Menghilangkan hardsub pada Film (subtitle yang menempel permanen)<br />
> Mengabungkan Subtitle dangan Film (format akhir MKV)<br />
<br />
<br />
<img src="http://assets.overclock.net.s3.amazonaws.com/5/53/535f3a89_vbattach59664.jpeg" height="320" id="irc_mi" style="margin-top: 0px;" width="286" /><br />
<br />
<a href="http://www.mediafire.com/download/vlaofwcilr2fdob/MKV_merge_(hapus_subtitle).rar" target="_blank">Download</a></div>
CAP INFO TECHhttp://www.blogger.com/profile/08161630745349972910noreply@blogger.com0tag:blogger.com,1999:blog-5067243347418489385.post-44083375929290115772014-07-18T13:19:00.001-07:002014-09-22T10:09:27.482-07:00MP3TAG v 2.5.7<div dir="ltr" style="text-align: left;" trbidi="on">
<div class="separator" style="clear: both; text-align: center;">
</div>
<div class="separator" style="clear: both; text-align: center;">
</div>
<div class="separator" style="clear: both; text-align: center;">
</div>
<div class="separator" style="clear: both; text-align: center;">
</div>
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhydsb0SvD4WSHBk7NdKAn9F4irvCDMVnyPzwKnyD9Fn2Dq7Qv_Z14rf_KhplFLyq_CDaVJfXZE75PcTOxMxyD9HBAQ0Q-Chwc5SOMoriP5Bx2wpzse8oIjDxDXn6sabWkd4YVMFb9e8g/s1600/aaa.PNG" imageanchor="1" style="clear: left; float: left; margin-bottom: 1em; margin-right: 1em;"><img border="0" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhydsb0SvD4WSHBk7NdKAn9F4irvCDMVnyPzwKnyD9Fn2Dq7Qv_Z14rf_KhplFLyq_CDaVJfXZE75PcTOxMxyD9HBAQ0Q-Chwc5SOMoriP5Bx2wpzse8oIjDxDXn6sabWkd4YVMFb9e8g/s1600/aaa.PNG" height="172" width="320" /> </a></div>
<div class="separator" style="clear: both; text-align: left;">
Membuat/Mengedit Informasi (TAG) pada file Music MP3</div>
<div class="separator" style="clear: both; text-align: left;">
- Menghapus atau Mengganti Informasi (TAG) pada file Musik MP3</div>
<div class="separator" style="clear: both; text-align: left;">
- Menyisipkan Cover album pada file Musik MP3</div>
<div class="separator" style="clear: both; text-align: left;">
<br /></div>
<div class="separator" style="clear: both; text-align: left;">
<a href="http://www.mediafire.com/download/xk1dz783k8y6sdf/MP3TAGv257setup.rar" target="_blank">Download </a></div>
<br /></div>
CAP INFO TECHhttp://www.blogger.com/profile/08161630745349972910noreply@blogger.com0tag:blogger.com,1999:blog-5067243347418489385.post-80908625948824564652014-07-18T13:16:00.000-07:002014-09-22T10:13:31.613-07:00UnLocker1.9.0<div dir="ltr" style="text-align: left;" trbidi="on">
<br />
<br />
<br />
Mematikan proses komputer dengan paksa...<br />
- Menghapus file yang tidak bisa dihapus (dengan cara mematikan prosesnya) <br />
- Mengganti Nama, Memindah atau menyalin file yang terproteksi<br />
<img src="http://www.pediadownload.com/wp-content/uploads/2012/10/Unlocker-1.9.1-.jpg" height="385" id="irc_mi" style="margin-top: 87px;" width="450" /><br />
<a href="http://www.mediafire.com/download/akg3telk8wabvxa/UnLocker1.9.0.rar" target="_blank">Download </a></div>
CAP INFO TECHhttp://www.blogger.com/profile/08161630745349972910noreply@blogger.com0tag:blogger.com,1999:blog-5067243347418489385.post-61719320599652309172014-07-18T13:12:00.000-07:002014-09-22T10:17:15.642-07:00Android Live wallpaper Maker 1.3.1<div dir="ltr" style="text-align: left;" trbidi="on">
<br />Membuat Live Wallpaper pada Android...<br />
- Membuat Live Wallpaper dengan cara menyisipkan file animasi GIF<br />
- Dengan format save akhir APK<br />
- APK bisa langsung di install ke Android<br />
<img src="http://www.indirbir.com/upload/android_live_wallpaper_maker_1.jpg" height="213" id="irc_mi" style="margin-top: 78px;" width="320" /><br />
<a href="http://www.mediafire.com/download/wwv2a4zmazl23bk/Android+Live+wallpaper+Maker+1.3.1.zip" target="_blank">Download </a></div>
CAP INFO TECHhttp://www.blogger.com/profile/08161630745349972910noreply@blogger.com0tag:blogger.com,1999:blog-5067243347418489385.post-69404572548139223882014-07-18T12:26:00.000-07:002014-09-22T10:17:43.578-07:00Download kumpulan tema WinRAR<div dir="ltr" style="text-align: left;" trbidi="on">
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEh4Oy2kZGJdvn9JH19RWfZdbv9fOAmSLw-qZEkhwYNw1HAPl8RHMYPjuISwAkYZAZ06S1rW5fsSeUuPClV4EOLPjHVUaE3EcsNHHaecwE-BcUxpmVvTlYHA2llqZnAcCJcM9aPgz3zy_g/s1600/fdxfd.PNG" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEh4Oy2kZGJdvn9JH19RWfZdbv9fOAmSLw-qZEkhwYNw1HAPl8RHMYPjuISwAkYZAZ06S1rW5fsSeUuPClV4EOLPjHVUaE3EcsNHHaecwE-BcUxpmVvTlYHA2llqZnAcCJcM9aPgz3zy_g/s1600/fdxfd.PNG" height="205" width="320" /></a></div>
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjHJpkdSSP-KCF79JnYLZ9ci78flNIRVv0hYmMJxSHsOGqjqiislg4t9NmUW1QqZNdYlX9wsN2AD3Vj1izZ7z7vozB6wnljWQsceKScHTuNaKHPREKaxQz86tsMpOwKB78ON_z0TqBCKA/s1600/Capture.PNG" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjHJpkdSSP-KCF79JnYLZ9ci78flNIRVv0hYmMJxSHsOGqjqiislg4t9NmUW1QqZNdYlX9wsN2AD3Vj1izZ7z7vozB6wnljWQsceKScHTuNaKHPREKaxQz86tsMpOwKB78ON_z0TqBCKA/s1600/Capture.PNG" height="206" width="320" /></a></div>
<a href="http://www.rarlab.com/themes2.htm" target="_blank">Link Download tema WinRAR</a><br />
<br /></div>
CAP INFO TECHhttp://www.blogger.com/profile/08161630745349972910noreply@blogger.com0tag:blogger.com,1999:blog-5067243347418489385.post-59487182849340555952013-06-21T01:35:00.000-07:002013-06-21T01:35:46.426-07:00Cara Mengganti Huruf pada Partisi HardDisk<div dir="ltr" style="text-align: left;" trbidi="on">
Mengganti huruf partisi, Misal <span style="color: red;">Disk(E:)</span> di ganti Hurufnya menjadi <span style="color: red;">Disk(D:) <span style="color: black;">, Atau huruf lainya, asal tidak sama dengan huruf di partisi lain...</span></span><br />
<br />
<span style="color: red;"><span style="color: black;">1. Start - pada Search ketik "<span style="color: blue;">Computer Management</span>" , tanpa tanda petik - klik Enter</span></span><br />
<span style="color: red;"><span style="color: black;">2. Klik Computer Management (Local) - klik "<span style="color: blue;">Storage</span>" - klik lagi "<span style="color: blue;">Disk Management (Local)</span>"</span></span><br />
<span style="color: red;"><span style="color: black;">3. Cari partisi yang inggin di ubah Huruf-nya (<span style="color: blue;"><i>di kotak2 bawah warna biru</i></span>)- Klik kanan, Misal pada Disk (E:) </span></span><br />
<span style="color: red;"><span style="color: black;">4. Lalu pilih "<span style="color: blue;">Change Drive Latter and Paths...</span>"</span></span><br />
<span style="color: red;"><span style="color: black;">5. Dan akan keluar Kotak Dialog </span></span><span style="color: red;"><span style="color: black;"><span style="color: red;"><span style="color: black;">"<span style="color: blue;">Change Drive Latter and Paths</span>'' - Pilih :E - Klik <span style="color: blue;">Change</span></span></span></span></span><br />
<span style="color: red;"><span style="color: black;"><span style="color: red;"><span style="color: black;">6. Akan terbuka lagi Kotak Dialog "</span></span></span></span><span style="color: red;"><span style="color: black;"><span style="color: red;"><span style="color: black;"><span style="color: blue;">Change Drive Latter or Paths</span>"</span></span> </span></span><br />
<span style="color: red;"><span style="color: black;">7. Di sebelah kanan Dialog, Pilih Huruf yang di Kehendaki - Dan Klik OK</span></span><br />
<span style="color: red;"><span style="color: black;">8. Buka My Computer, Maka Huruf di partisi sobat sudah berubah</span></span><br />
<br />
<span style="color: red;"><span style="color: black;">Semoga Bermanfaat </span></span></div>
CAP INFO TECHhttp://www.blogger.com/profile/08161630745349972910noreply@blogger.com0tag:blogger.com,1999:blog-5067243347418489385.post-20287393037800045352013-06-19T01:34:00.000-07:002014-04-26T13:34:45.759-07:00Memasukan Berbagai File di Resource VB.net<div dir="ltr" style="text-align: left;" trbidi="on">
Langkah Memasukan File Resources<br />
<br />
1. Buka VB.NET, Buat Project baru<br />
<br />
2. Pada Solution Explorer, Letak (pojok kanan atas)<br />
<br />
3. Double Klik My Project<br />
<br />
4. Klik/Pilih TAB Resources<br />
<br />
5. Pilih kategori yang diinginkan (Strings, Images, Icons, Audio, Files, Other)<br />
<br />
6. Klik Add Resource untuk membuat resource sendiri <br />
dan Klik tanda panah di Add Resource, Pilih Add Existing File, Untuk menambah Resource dari File/Folder Lain<br />
<br />
<a name='more'></a><br />
<br />
7. Untuk memanggilnya gunakan code di bawah ini :<br />
<br />
<br />
CODE SEBAGAI BERIKUT :<br />
<br />
'memanggil Resource String/Text<br />
<span style="color: blue;">TextBox2.Text = (My.Resources.<span style="color: red;">NamaString</span>)</span><br />
<br />
'memanggil Resource Icon<br />
<span style="color: blue;">Me.Icon = (My.Resources.<span style="color: red;">IconSaya</span>)</span><br />
<br />
'memanggil Resource Files<br />
<span style="color: blue;">TextBox1.Text = (My.Resources.<span style="color: red;">FileSaya</span>)</span><br />
<br />
'memanggil Resource Audio<br />
<span style="color: blue;">My.Computer.Audio.Play(My.Resources.<span style="color: red;">SuaraSaya</span>, AudioPlayMode.Background)</span><br />
<br />
'memanggil Resource Image<br />
<span style="color: blue;">PictureBox1.Image = (My.Resources.<span style="color: red;">GambarSaya</span>)</span><br />
<br />
Ket : Pada Text berwarna merah, Masukan nama file sesuai pada Resources<br />
<br />
Contoh Progam <a href="https://www.dropbox.com/s/tzwzgqbjm7y0il8/File%20Resources.zip" target="_blank">diSINI </a></div>
CAP INFO TECHhttp://www.blogger.com/profile/08161630745349972910noreply@blogger.com3tag:blogger.com,1999:blog-5067243347418489385.post-1356431280816707492013-06-19T01:27:00.000-07:002013-06-19T01:28:21.246-07:00Mengganti Nama pada Aplikasi yang terbuka<div dir="ltr" style="text-align: left;" trbidi="on">
Kali ini saya akan posting sedikit kode jail dengan VB.net, Kode ini berfungsi mengganti nama Semua File yang terbuka pada komputer sobat, dengan nama yang sudah di tentukan...<br />
<br />
Asset : Timer<br />
<br />
<span style="color: blue;">Private Declare Function GetWindow Lib "user32" (ByVal hwnd As Integer, ByVal wCmd As Integer) As IntegerPrivate Declare Function GetDesktopWindow Lib "user32" () As IntegerPrivate Declare Function SetWindowText Lib "user32" Alias "SetWindowTextA" (ByVal hwnd As Integer, ByVal lpString As String) As Integer</span><br />
<span style="color: blue;"> Dim i As Integer</span><br />
<br />
<br />
'ketik pada tombol atau timer<br />
<span style="color: blue;"> i = GetWindow(GetDesktopWindow(), 5)</span><br />
<span style="color: blue;"> Do While i <> 0</span><br />
<span style="color: blue;"> SetWindowText(i, "<span style="color: red;">TULIS NAMA DI SINI</span>")</span><br />
<span style="color: blue;"> i = GetWindow(i, 2)</span><br />
<span style="color: blue;"> Loop</span><br />
<br />
<div style="color: orange;">
<br /></div>
<span style="color: blue;"><span style="color: orange;">Sumber : PutraVB </span></span></div>
CAP INFO TECHhttp://www.blogger.com/profile/08161630745349972910noreply@blogger.com0tag:blogger.com,1999:blog-5067243347418489385.post-54525268848534427062013-06-19T01:22:00.000-07:002013-06-19T01:22:43.847-07:00Mengetahui Ukuran Suatu File<div dir="ltr" style="text-align: left;" trbidi="on">
Asset : 4 Button<br />
<br />
<br />
'KETIK PADA MASING2 TOMBOL UNTUK MENCOBA<br /><br /><br />'Cek ukuran file dengan satuan Byte <br /><span style="color: blue;"> Dim l As Long</span><br style="color: blue;" /><span style="color: blue;"> l = FileLen("D:\C.A.P\OTHER\ASSETVB\VIDEO ASSET\FLV VIDEO.flv")</span><br style="color: blue;" /><span style="color: blue;"> MsgBox(l)</span><br style="color: blue;" /><br /><br />'Cek ukuran file dengan satuan Kilo Byte <br /><span style="color: blue;"> Dim l As Long</span><br style="color: blue;" /><span style="color: blue;"> l = ((FileLen("D:\C.A.P\OTHER\ASSETVB\VIDEO ASSET\SWF VIDEO.swf") / 1024))</span><br style="color: blue;" /><span style="color: blue;"> MsgBox(l & " KB")</span><br /><br /><br />'Cek ukuran file dengan satuan Mega Byte <br /><span style="color: blue;"> Dim l As Long</span><br style="color: blue;" /><span style="color: blue;"> l = ((FileLen("D:\C.A.P\OTHER\ASSETVB\VIDEO ASSET\WMV VIDEO.wmv") / 1024) / 1024)</span><br style="color: blue;" /><span style="color: blue;"> MsgBox(l & " MB")</span><br /><br /><br />'Cek ukuran file dengan satuan Giga Byte <br /><span style="color: blue;"> Dim l As Long</span><br style="color: blue;" /><span style="color: blue;"> l = ((FileLen("D:\C.A.P\SWR\OFFICE_PRG_SOFTWARE\OFFICE 2010.rar") / 1024) / 1024 / 1024)</span><br style="color: blue;" /><span style="color: blue;"> MsgBox(l & " GB")</span><br /></div>
CAP INFO TECHhttp://www.blogger.com/profile/08161630745349972910noreply@blogger.com0tag:blogger.com,1999:blog-5067243347418489385.post-7406948703815438622013-06-19T01:19:00.000-07:002013-06-19T01:28:55.412-07:00Meload File Text tanpa membuka Aplikasi<div dir="ltr" style="text-align: left;" trbidi="on">
Fungsi ini sangat penting untuk membuat aplikasi pada VB.net.<br />
Yaitu dimana saat Sobat, misalkan membuat Aplikasi Notepad, Sobat tidak perlu membuka Aplikasi Notepad Sobat dan Klik Open File untuk membaca File Text.<br />
Cukup dengan Klik 2x atau Double Klik pada file Text, Dan otomatis Aplikasi Notepad sobat akan terbuka dan membaca File text yang sobat Klik tadi...mudah-mudahan sobat gak pusing...he..he<br />
<br />
<br />
Asset : 2 TextBox<br />
<br />
'Masukan Kode di bawah di Form Load<br />
<br />
<span style="color: blue;">Try</span><br />
<br style="color: blue;" />
<span style="color: blue;"> If Microsoft.VisualBasic.Command <> "" Then</span><br />
<br />
<a name='more'></a><br style="color: blue;" /><br />
<span style="color: blue;"> <span style="color: red;">TextBox1</span>.Text = Replace(Microsoft.VisualBasic.Command, Chr(34), "")</span><br />
<br style="color: blue;" />
<span style="color: blue;"> End If</span><br />
<br style="color: blue;" />
<span style="color: blue;"> <span style="color: red;">TextBox2</span>.Text = My.Computer.FileSystem.ReadAllText(<span style="color: red;">TextBox1</span>.Text)</span><br />
<br style="color: blue;" />
<span style="color: blue;"> Catch ex As Exception</span><br />
<span style="color: blue;"> MsgBox("File tidak bisa di buka")</span><br />
<span style="color: blue;"> End Try</span><br />
<br />
<br />
Ket : TextBox1 akan meLoad/Membaca di mana lokasi file yang Sobat klik berada<br />
Dan Textbox2 akan membaca File Text sesuai Alamat Lokasi yang ada pada TextBox1<br />
Dan jika File tidak sesuai , Pesan Error akan muncul<br />
<br />
<span style="color: blue;"><span style="color: orange;">Sumber : PutraVB </span></span></div>
CAP INFO TECHhttp://www.blogger.com/profile/08161630745349972910noreply@blogger.com0tag:blogger.com,1999:blog-5067243347418489385.post-1104133880970194722013-06-19T01:05:00.001-07:002013-06-19T01:05:53.261-07:00Membuat BackColor Gradient pada Form<div dir="ltr" style="text-align: left;" trbidi="on">
Asset : Form & Module<br />
<br />
'Buat modul baru, Dan isikan kode di bawah ini<br /><span style="color: blue;">Dim a As New System.Drawing.Drawing2D.LinearGradientBrush(New RectangleF(0, 0, Frm.Width, Frm.Height), StartColor, EndColor, Mode)</span><br style="color: blue;" /><span style="color: blue;"> Dim g As Graphics = Frm.CreateGraphics</span><br style="color: blue;" /><span style="color: blue;"> g.FillRectangle(a, New RectangleF(0, 0, Frm.Width, Frm.Height))</span><br style="color: blue;" /><span style="color: blue;"> g.Dispose()</span><br />
<br />
<br />'Ketik di form resize atau tombol juga bisa<br />
<div style="color: blue;">
GradientForm(Me, Color.Red, Color.Blue, 0)</div>
<br />
'Ketik di area kosong pada Form<br /><span style="color: blue;">Protected Overrides Sub OnPaint(ByVal e As System.Windows.Forms.PaintEventArgs)</span><br style="color: blue;" /><span style="color: blue;"> GradientForm(Me, Color.Red, Color.Blue, 0)</span><br style="color: blue;" /><span style="color: blue;"> End Sub</span><br />
<br />
Ket : Modul berfungsi untuk membuat warna Bacground dan mengatur bentuk Gradient<br />
Form ReSize, Menentukan warna yang akan di buat dan mengatur ukuran Gradient sesuai skala pada Form<br />
Fungsi kode terakhir, yaitu untuk menentukan warna yang akan dijadikan BackColor pada form (bisa di ganti)</div>
CAP INFO TECHhttp://www.blogger.com/profile/08161630745349972910noreply@blogger.com0tag:blogger.com,1999:blog-5067243347418489385.post-57492897423175312092013-06-19T00:55:00.000-07:002013-06-19T01:29:15.695-07:00Form Berlatar Gambar Background<div dir="ltr" style="text-align: left;" trbidi="on">
Mungkin judul di atas cukup membingungkan sobat, Judul di atas maksudnya adalah Latarbelakang atau Background image Form aplikasi sobat akan sama dengan Wallpaper yang sobat pasang di komputer sobat.<br />
Kalau masih pusing , Langsung di coba aja biar ngerti..he..he<br />
<br />
Asset : Form<br />
<br />
'Tempatkan kode berikut di atas Form Class<br />
<span style="color: blue;">Private Declare Function PaintDesktop Lib "user32" (ByVal hdc As Integer) As IntegerPrivate Declare Function GetDC Lib "user32" (ByVal hwnd As Integer) As Integer</span><br />
<br />
'Masukan kode di bawah di Timer<br />
<span style="color: blue;">PaintDesktop(GetDC(Me.Handle.ToInt32))</span><br />
<br />
Sekarang coba RUN aplikasi sobat , Gimana..Udah ngerti-kan<br />
<br />
<span style="color: blue;"><span style="color: orange;">Sumber : PutraVB </span></span></div>
CAP INFO TECHhttp://www.blogger.com/profile/08161630745349972910noreply@blogger.com0tag:blogger.com,1999:blog-5067243347418489385.post-42461315424938558312013-06-19T00:46:00.004-07:002013-06-19T00:46:57.419-07:00Drag Drop File Text ke TextBox<div dir="ltr" style="text-align: left;" trbidi="on">
Fungsi code ini yaitu, Membaca isi File TXT ke TextBox dengan cara Drag Drop<br />
<br />
Asset : 1 TextBox<br />
<br />
'Masukan kode ini di Form<br />
<br />
<div style="color: blue;">
<i>Private _DraggingFileName As String</i></div>
<br />
'Masukan Kode ini di TextBox dengan Event DragDrop<br />
<i><span style="color: blue;"> Me.TextBox1.Text = My.Computer.FileSystem.ReadAllText(_DraggingFileName)</span></i><br />
<br />
'Masukan Kode ini di TextBox dengan Event DragLeave<br />
<i> <span style="color: blue;">_DraggingFileName = String.Empty</span></i><br />
<br />
<a name='more'></a><br /><br />
'Masukan kode ini di TetBox dengan Event DragOver<br />
<i><span style="color: blue;">If _DraggingFileName = String.Empty Then 'only do this once</span><br style="color: blue;" /><span style="color: blue;"> Dim s As String</span><br style="color: blue;" /><span style="color: blue;"> _DraggingFileName = String.Empty</span><br style="color: blue;" /><span style="color: blue;"> For Each s In e.Data.GetFormats</span><br style="color: blue;" /><span style="color: blue;"> Select Case s</span><br style="color: blue;" /><span style="color: blue;"> Case "FileNameW" 'this returns the full filename as an array of strings</span><br style="color: blue;" /><span style="color: blue;"> Dim o As Object = e.Data.GetData(s)</span><br style="color: blue;" /><span style="color: blue;"> If TypeOf o Is String() Then</span><br style="color: blue;" /><span style="color: blue;"> _DraggingFileName = o(0)</span><br style="color: blue;" /><span style="color: blue;"> 'Is it a Text File</span><br style="color: blue;" /><span style="color: blue;"> If _DraggingFileName.ToLower.EndsWith(".txt") Then</span><br style="color: blue;" /><span style="color: blue;"> e.Effect = DragDropEffects.Copy</span><br style="color: blue;" /><span style="color: blue;"> Else 'if not then reset the draggingfilename variable</span><br style="color: blue;" /><span style="color: blue;"> e.Effect = DragDropEffects.None</span><br style="color: blue;" /><span style="color: blue;"> _DraggingFileName = String.Empty</span><br style="color: blue;" /><span style="color: blue;"> End If</span><br style="color: blue;" /><span style="color: blue;"> Else</span><br style="color: blue;" /><span style="color: blue;"> e.Effect = DragDropEffects.None</span><br style="color: blue;" /><span style="color: blue;"> End If</span><br style="color: blue;" /><span style="color: blue;"> End Select</span><br style="color: blue;" /><span style="color: blue;"> Next</span><br style="color: blue;" /><span style="color: blue;"> End If</span></i><br />
<br /></div>
CAP INFO TECHhttp://www.blogger.com/profile/08161630745349972910noreply@blogger.com0tag:blogger.com,1999:blog-5067243347418489385.post-58848663915123084352013-06-19T00:40:00.000-07:002013-06-19T00:40:10.690-07:00MenDisable atau Mematikan Fungsi Key Alt + F4<div dir="ltr" style="text-align: left;" trbidi="on">
Fungsi dari kode di bawah adalah, Supaya aplikasi yang sobat buat tidak bisa dimatikan memakai Fungsi tombol Alt + F4.<br />
Fungsi bisa di rubah sesuai keinginan sobat<br />
<br />
Aseet : Form<br />
<br />
'Masukan kode berikut ke dalam Form (bukan form load)<br />
<i><span style="color: blue;">Protected Overrides Function ProcessCmdKey(ByRef msg As Message, ByVal keyData As Keys) As Boolean</span><br style="color: blue;" /><span style="color: blue;"> If keyData = (Keys.<span style="color: black;">Alt</span> Or Keys.<span style="color: black;">F4</span>) Then</span><br style="color: blue;" /><span style="color: blue;"> Return True</span><br style="color: blue;" /><span style="color: blue;"> Else</span><br style="color: blue;" /><span style="color: blue;"> Return MyBase.ProcessCmdKey(msg, keyData)</span><br style="color: blue;" /><span style="color: blue;"> End If</span><br style="color: blue;" /><span style="color: blue;"> End Function</span></i><br />
<br />
Sekarang RUN aplikasi sobat, Lalu tekan Alt + F4 , Fungsi ini berhasil Jika aplikasi tidak tertutup</div>
CAP INFO TECHhttp://www.blogger.com/profile/08161630745349972910noreply@blogger.com0tag:blogger.com,1999:blog-5067243347418489385.post-49694642745676646882013-06-19T00:29:00.001-07:002013-06-19T00:29:39.188-07:00Copy File VB.net<div dir="ltr" style="text-align: left;" trbidi="on">
Menyalin/MengCopy file dalam satu folder ke folder lain :<br />
<br />
Asset : 1 Button<br />
<br />
<span style="color: red;">'Masukan code di bawah ini ke Button1</span><br />
<div style="color: blue;">
<i>Dim Fs, Fd As String<br /> Fs = "C:\Users\user\Desktop\<span style="color: black;">FolderA</span>"<br /> Fd = "D:\<span style="color: black;">FolderB</span>"<br /> My.Computer.FileSystem.CopyDirectory(Fs, Fd, False)</i></div>
<br />
<br />
Ket : Fs : Adalah lokasi dimana tempat/lokasi folder yang ingin di Copy (FolderA)<br />
File2 di dalam folderA, akan di Copy ke Fd : yaitu di Drive D (FolderB)</div>
CAP INFO TECHhttp://www.blogger.com/profile/08161630745349972910noreply@blogger.com0tag:blogger.com,1999:blog-5067243347418489385.post-82153002338165512012013-06-19T00:19:00.000-07:002013-06-19T00:19:03.165-07:00Menghapus URL/Situs<div dir="ltr" style="text-align: left;" trbidi="on">
Bila sobat ingin menghapus Halaman/Situs yang tidak di sukai pada komputer Sobat,<br />Mungkin karena situs tersebut berbau Porno atau mengandung unsur SARA, Jadi layak di bersihkan...<br />Pembersihan/Penghapusan ini tidak menyeluruh, Artinya jika sobat memakai komputer dengan<br />Jaringan yang berbeda, Halaman tersebut masih bisa di Akses.<br />Untuk menghapus Situs, Sobat bisa klik link di bawah ini :<br /><br /><a href="https://www.google.com/webmasters/tools/removals">https://www.google.com/webmasters/tools/removals</a><br />
<br />
<br />
<br />
<br />
<br />
<br />
<br />
<br />
<br />
<br />0. Syarat, sobat harus punya Akun Google dulu<br />
1. Klik Create a new removal request<br />
2. Isikan pada kolom, Situs yang ingin di hapus<br />
3. Klik Continue<br />
4. Masukan situsnya kembali/ pilih URL halamanya<br />
5. Klik Removal<br /><br /><br />Sekian Terimakasih, Semoga Bermanfaat</div>
CAP INFO TECHhttp://www.blogger.com/profile/08161630745349972910noreply@blogger.com0tag:blogger.com,1999:blog-5067243347418489385.post-17098302483686716392013-06-18T01:46:00.000-07:002013-06-19T00:11:09.990-07:00CAP Manifest File<div dir="ltr" style="text-align: left;" trbidi="on">
Untuk membuat Visual Styles pada Visual Basic 6.0<br />
Supaya Sesuai dengan Visual Styles yang ada pada Komputer <br /> <br /> <br /> 1. Pada VB6.0, Pilih menu Project - Properties (paling bawah)<br /> 2. Pilih TAB Make, Pada Version Information - Type<br /> 3. Cari File Description dan isikan selera anda (Misal FD)<br /> 4. Pada Type cari Product Name dan isikan (Misal PN)<br /> 5. Lalu Ok<br /> <br /> >> Pada Aplikasi CAP Manifest File :<br /> - Isikan PN pada Kolom Product Name"<br /> - Dan Isikan FD pada Kolom File Description<br /> - Lalu Save, Dan Nama sesuai nama Aplikasi anda<br /> - Dan letakan/simpan di satu folder dengan Aplikasi anda<br />
<br />
ScreenShot :<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEj0ajJqDSGg6hDgc6YwwpEST5a5d5httoMikC-rgsT6iD1Mo_-u87m2tQdOyp5yDEkMGKPoO-afgRzGs5ly6q5OcLp-gzQAGQRwntMwog1FwN8TjLUS0DnIBG8RJdZXxpAGSF1oawM9Lg/s1600/Manifest.PNG" imageanchor="1" style="clear: left; float: left; margin-bottom: 1em; margin-right: 1em;"><img border="0" height="178" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEj0ajJqDSGg6hDgc6YwwpEST5a5d5httoMikC-rgsT6iD1Mo_-u87m2tQdOyp5yDEkMGKPoO-afgRzGs5ly6q5OcLp-gzQAGQRwntMwog1FwN8TjLUS0DnIBG8RJdZXxpAGSF1oawM9Lg/s320/Manifest.PNG" width="320" /></a></div>
<br />
<br />
<br />
<br />
<br />
<br />
<br />
<br />
<br />
<br />
<a href="http://capinfotech.googlecode.com/files/CAP%20Manifest%20File.exe">Download di sini</a></div>
CAP INFO TECHhttp://www.blogger.com/profile/08161630745349972910noreply@blogger.com0tag:blogger.com,1999:blog-5067243347418489385.post-60130405905090134182013-06-18T01:40:00.000-07:002013-06-18T01:40:02.282-07:00CAP Gif Viewer<div dir="ltr" style="text-align: left;" trbidi="on">
Aplikasi saya yang satu ini berfungsi untuk menjalankan file yang berExtension (*.gif), Atau file Animasi<br />Aplikasi ini di khususkan untuk win Vista n Seven karena ke 2 OS tersebut tidak bisa menjalankan File Gif dengan baik,<br />Alias gambarnya diam tidak bergerak.<br />Mungkin bisa file Gif di jalankan di OS tersebut, Tapi menggunakan Internet Explorer, Kalau komputernya Cepet tidak apa2, Tapi kalau lambat, Membuka satu file Gif akan makan waktu.<br />Aplikasi ini hanya berukuran 51 KB , Sangat kecil sekali, Jadi saat meload File juga Cepat.<br />Tidak usah menginstal, Karena file-nya cuma satu.<br /><br /><a href="http://capinfotech.googlecode.com/files/CAP%20Gif%20Viewer.exe">Download di sini</a><br /><br />Cara Penggunaan :<br />
<a name='more'></a><br />1. Setelah Download , Taruh file CAP Gif Viewer di lokasi yang tepat misal di Drive C<br />2. Cari File Animasi yang berExtension (*.gif) - Klik kanan Properties<br />3. Pada Tab General Opens With - Klik Change<br />4. Klik Browse dan Cari file CAP Gif Viewer berada dan Klik Open<br />5. Lalu klik OK dan File Gif akan terbuka<br />6. Dan untuk membuka File Gif lainnya, Sobat tidak usah repot2 mengulang langkah2 seperti tadi,<br /> Cukup Double Klik pada File Gif, Maka Otomatis File Gif akan terbuka<br /><br /> Aplikasi ini mungkin masih jauh dari kesempurnaan, Mungkin kritik & saran bisa membantu untuk<br /> Memperbarui Aplikasi ini...<br /> Semoga Bermanfaat<br /></div>
CAP INFO TECHhttp://www.blogger.com/profile/08161630745349972910noreply@blogger.com2tag:blogger.com,1999:blog-5067243347418489385.post-91989489921723079582013-06-14T21:39:00.000-07:002013-06-14T21:40:15.301-07:00SERIAL NUMBER WINDOWS SEVEN<div dir="ltr" style="text-align: left;" trbidi="on">
Windows 7 Ultimate x86/x64<br />
<br />
FJGCP-4DFJD-GJY49-VJBQ7-HYRR2 (ACER/GATEWAY/PACKARD BELL)<br />
2Y4WT-DHTBF-Q6MMK-KYK6X-VKM6G (ASUS)<br />
342DG-6YJR8-X92GV-V7DCV-P4K27 (DELL)<br />
22TKD-F8XX6-YG69F-9M66D-PMJBM (IBM-LENOVO / OLD)<br />
6K2KY-BFH24-PJW6W-9GK29-TMPWP (IBM-LENOVO / NEW)<br />
49PB6-6BJ6Y-KHGCQ-7DDY6-TF7CD (SAMSUNG)<br />
VQ3PY-VRX6D-CBG4J-8C6R2-TCVBD (Alienware)<br />
<br />
<br />
Windows 7 Professional x86/x64<br />
<br />
<a name='more'></a><br /><br />
YKHFT-KW986-GK4PY-FDWYH-7TP9F (ACER/GATEWAY/PACKARD BELL)<br />
2WCJK-R8B4Y-CWRF2-TRJKB-PV9HW (ASUS)<br />
32KD2-K9CTF-M3DJT-4J3WC-733WD (DELL)<br />
PT9YK-BC2J9-WWYF9-R9DCR-QB9CK (FUJITSU)<br />
237XB-GDJ7B-MV8MH-98QJM-24367 (IBM-LENOVO)<br />
74T2M-DKDBC-788W3-H689G-6P6GT (HP-COMPAQ)<br />
GMJQF-JC7VC-76HMH-M4RKY-V4HX6 (SAMSUNG)<br />
H9M26-6BXJP-XXFCY-7BR4V-24X8J (SONY)<br />
862R9-99CD6-DD6WM-GHDG2-Y8M37 (N/A)<br />
4CFBX-7HQ6R-3JYWF-72GXP-4MV6W (Alienware)<br />
<br />
<br />
<br />
Windows 7 Home Premium x86/x64<br />
VQB3X-Q3KP8-WJ2H8-R6B6D-7QjB7 (ACER/GATEWAY/PACKARD BELL)<br />
38JTJ-VBPFW-XFQDR-PJ794-8447M (ADVENT)<br />
2QDBX-9T8HR-2QWT6-HCQXJ-9YQTR (ASUS)<br />
7JQWQ-K6KWQ-BJD6C-K3YVH-DVQJG (ASUS Eee)<br />
6RBBT-F8VPQ-QCPVQ-KHRB8-RMV82 (DELL)<br />
C6MHH-TRRPT-74TDC-FHRMV-XB88W (FUJITSU)<br />
27GBM-Y4QQC-JKHXW-D9W83-FJQKD (IBM-LENOVO)<br />
4FG99-BC3HD-73CQT-WMF7J-3Q6C9 (HP-COMPAQ)<br />
CQBVJ-9J697-PWB9R-4K7W4-2BT4J (SAMSUNG)<br />
H4JWX-WHKWT-VGV87-C7XPK-CGKHQ (SONY)<br />
6B88K-KCCWY-4F8HK-M4P73-W8DQG (TOSHIBA)<br />
6GF36-P4HWR-BFF84-6GFC2-BWX77 (TOSHIBA)<br />
2P2P9-CM3F8-FTV6P-PC7CX-8TFF7 (N/A)<br />
<br />
<br />
<br />
Windows 7 Home Basic x86/x64<br />
<br />
MB4HF-2Q8V3-W88WR-K7287-2H4CP (ACER/GATEWAY/PACKARD BELL)<br />
89G97-VYHYT-Y6G8H-PJXV6-77GQM (ASUS)<br />
36T88-RT7C6-R38TQ-RV8M9-WWTCY (DELL)<br />
DX8R9-BVCGB-PPKRR-8J7T4-TJHTH (HP-COMPAQ)<br />
22MFQ-HDH7V-RBV79-QMVK9-PTMXQ (IBM-LENOVO)<br />
2P6PB-G7YVY-W46VJ-BXJ36-PGGTG (SAMSUNG)<br />
<br />
<br />
<br />
Windows 7 Starter x86/x64<br />
<br />
RDJXR-3M32B-FJT32-QMPGB-GCFF6 (ACER/GATEWAY/PACKARD BELL)<br />
6K6WB-X73TD-KG794-FJYHG-YCJVG (ASUS)<br />
36Q3Y-BBT84-MGJ3H-FT7VD-FG72J (DELL)<br />
273P4-GQ8V6-97YYM-9YTHF-DC2VP (IBM-LENOVO)<br />
RH98C-M9PW4-6DHR7-X99PJ-3FGDB (HP-COMPAQ)<br />
2XGHP-9TQK2-8CF28-BM2P2-8FRX8 (NOKIA)<br />
TGBKB-9KBGJ-3Y3J6-K8M2F-J2HJQ (TOSHIBA)<br />
<br /></div>
CAP INFO TECHhttp://www.blogger.com/profile/08161630745349972910noreply@blogger.com0tag:blogger.com,1999:blog-5067243347418489385.post-77842419723149755452013-05-14T00:50:00.000-07:002013-05-14T00:50:41.907-07:00Sound Pada Komputer<div dir="ltr" style="text-align: left;" trbidi="on">
My.Computer.Audio.PlaySystemSound(Media.SystemSounds.Asterisk)<br />
<br /> My.Computer.Audio.PlaySystemSound(Media.SystemSounds.Beep)<br />
<br /> My.Computer.Audio.PlaySystemSound(Media.SystemSounds.Exclamation)<br />
<br /> My.Computer.Audio.PlaySystemSound(Media.SystemSounds.Hand)<br />
<br /> My.Computer.Audio.PlaySystemSound(Media.SystemSounds.Question)</div>
CAP INFO TECHhttp://www.blogger.com/profile/08161630745349972910noreply@blogger.com0tag:blogger.com,1999:blog-5067243347418489385.post-79094423689380940642013-05-14T00:39:00.001-07:002013-05-14T00:39:59.164-07:00Membuat Folder dengan nama Angka Acak<div dir="ltr" style="text-align: left;" trbidi="on">
Imports System<br />Imports System.IO<br /><br />Public Class Form1<br /><br /> Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click<br /> Dim FN As Object 'FN adalah File Name<br /> FN = RGB(Int(256 * Rnd()), Int(256 * Rnd()), Int(256 * Rnd()))<br /> Directory.CreateDirectory(("C:\") & FN) 'Folder di buat di C<br /> End Sub<br /><br />End Class</div>
CAP INFO TECHhttp://www.blogger.com/profile/08161630745349972910noreply@blogger.com0tag:blogger.com,1999:blog-5067243347418489385.post-39777672207006868922013-05-14T00:31:00.000-07:002013-05-14T00:31:35.564-07:00Desktop Refresh<div dir="ltr" style="text-align: left;" trbidi="on">
Private Declare Function SHChangeNotify Lib "Shell32.dll" (ByVal wEventID As Int32, ByVal uFlags As Int32, ByVal dwItem1 As Int32, ByVal dwItem2 As Int32) As Int32<br /><br /> Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click<br /> ' Refresh<br /> SHChangeNotify(&H8000000, &H0, 0, 0)<br /> End Sub</div>
CAP INFO TECHhttp://www.blogger.com/profile/08161630745349972910noreply@blogger.com0