The Widgipedia gallery
requires Adobe Flash
Player 7 or higher.

To view it, click here
to get the latest
Adobe Flash Player.
  • Banyaknya pilihan aplikasi Android yang bisa didownload untuk Tablet dan Smartphonemu secara gratis dan adanya petunjuk cara instalasinya

  • Pelayanan service 24 jam 7 hari penuh memudahkan bagi customer untuk mendapatkan pelayanan perbaikan dan pengiriman yang cepat dan tepat

  • Setiap pembelian dan service mendapatkan dukungan secara online, baik perbaikan perangkat keras dan software Website, Blog dan Aplikasi Premium atau gratis

  • Indonesia negara yang besar, negara agraris negara bahari semua kebudayaan ada disini. Keindahan alamnya tak tertandingi di dunia ini

  • Tersedianya laman jual beli spare part Computer bekas, Anda dapat berpartisipasi dalam melakukan transaksi jual beli dengan mengisi komentar dibawahnya

  • Tentukan lagumu dan mintalah untuk merequestnya di Blog ini, tidak lama Andapun akan mendapatkan lagunya



Postingan ini bersifat sementara untuk membantu rekan-rekan yang sedang dalam kesulitan dalam recover data.

Data Excel yang telah direcover dapat dilihat dan didownload dibah ini :

nama file
Tabungan_siswa-siswi_2013-2014 (PERBAIKAN FILE).xlsx
jenis
Microsoft Excel 2010

nama file
Tabungan_siswa-siswi_2013-2014 (PERBAIKAN FILE).xls
jenis
Microsoft Excel 2003 sampai dengan 2010

Keterangan
Cukup klik 1x pada nama filenya untuk melihat hasilnya dan mendownloadnya

Praat versi 5.3.68

Posted by kurniawan On 17.20 No comments

Praat – yang dalam Bahasa Belanda berarti ‘suara’ – merupakan sebuah freeware yang diciptakan oleh Paul Boersma & David Weenink dari Phonetic Sciences Department University of Amsterdam  (www.praat.org). Dengan slogannya ‘doing phonetics with computer’, Praat merupakan software  untuk melakukan analisis dan rekonstruksi suara secara fleksibel. Praat dapat digunakan untuk  melakukan banyak hal, mulai dari analisis spectrogram hingga rekonstruksi (add, cut, dll) suara itu sendiri.
Aplikasi Praat hanya berjalan di Windows 2000, Vista, Xp, 7 dan 8 baik 32bit atau 64 bit dan untuk Macintosh serta windows selain Xp seperti DOS, Windows 95/98/NT/ME dapat memesan secara khusus dengan mengisi comment dibawah.

Langkah-langkah menginstall Praat di PC / Laptop :
  1. Pastikan Windows mu 32bit atau 64bit (kecuali windows Xp biasanya di Indonesia kebanyakan 90% menggunakan 32 bit) , untuk memastikan windowsmu berapa bit tekan tombol bendera dikeyboard jangan dilepas kemudian tekan tombol pause jika penekanan benar akan tampak gambar seperti berikut (bisa digantikan dengan menu Start - Control Panel - System)
    Lihat tulisan yang diarsir merah menunjukkan Windows yang digunakan Windows 7 64 bit
  2. Download Aplikasi Praat, untuk windows Xp/7/8 32 bit klik disini dan untuk windows Xp/7/8 64 bit klik disini
  3. Apabila sudah di download ekstrak file .ZIP hasil download-tan tadi
  4. Jalankan hasil ekstraknya
Tutorial :

Download tutorial lengkapnya dalam bahasa Inggris 
UsingPraatforLinguisticResearchLatest.PDF
PRAAT_workshop_manual_v421.PDF

Download tutorialnya dalam bahasa Indonesia
Praat Tutorial Indonesia 1.PDF
Unjani-AudioForensika-Revisi-libre.PDF

IDM 6.18 + Patcher v2

Posted by kurniawan On 18.53 No comments
Internet Download Manager (IDM) pasti tidaklah asing bagi orang-orang yang suka browsing internet, fungsinya banyak sekali tetapi fungsi utamanya adalah :

1. Mempercepat proses download
2. Bisa digunakan untuk mendownload di youtube
3. Sebagai pembatas kecepatan download

Adakalanya IDM akan semakin menjadi menjengkelkan apabila telah terblokir oleh pihak pembuat IDM, kalau sudah begini pasti akan selalu tampil kotak peringatan di layar kalau IDM yang terinstall saat ini menggunakan versi bajakan.




















Bukan berarti tidak ada solusinya, untuk mengembalikan IDM ke dalam keadaan sediakala ikuti langkah-langkahnya sebagai berikut :


  1. Download IDM versi 6.18 Klik disini
  2. Jika sudah terdownload klik dua kali hasil downloadtannya, maka akan tampak seperti gambar dibawah 

  3. Klik dua kali file idman618.exe, kemudian klik (apabila Windows yang digunakan Windows Vista atau 7) jawab dengan yes dan akan tampak gambar di bawah dan klik Next

  4. Klik Next kembali

  5. Klik Next kembali 

  6. Sekali lagi klik Next dan tunggu beberapa saat IDM akan mulai diinstall ke Komputer / laptop

  7. Akhiri dengan mengklik Finish

  8. Sekarang akan tampil pesan error abaikan saja dengan mengklik Ok
  9. Langkah selanjutnya meng crack IDM yang telah terinstall, kembali lagi ke file yang telah terdownload tadi, extract file IDM 6.18 Patcher v2.exe ke drive selain C
  10. Jika sudah ter-extract jalankan file IDM 6.18 Patcher v2.exe nya apabila ada pertanyaan jawab dengan yes, maka akan tampil seperti gambar di bawah
    Perhatikan baik-baik gambar ini, lihat dan baca kalimat yang terarsir dengan warna biru. Artinya apabila windows yang digunakan menggunakan 32bit pastikan hasil pacth nya di pindah atau dicopy ke folder c:\program files\Internet Downlod Manager tapi sebaliknya kalau windows yang digunakan 64 bit maka pastikan hasil pacth nya di pindah atau dicopy ke folder c:\program files (x86)\Internet Downlod Manager.
  11. Klik Patch dan tunggu sesaat, apabila sudah selesai klik Exit
  12. Kembali ke folder tempat hasil extract IDM 6.18 Patcher v2.exe akan terlihat file baru bernama IDMan.Exe copy atau pindahkan file ini seperti keterangan gambar nomer 10
  13. Wuihhhh... agak ribet tapi alhamdulillah sudah selesai sekarang jalankan IDM dengan mengklik Start
    lalu All Programs klik Internet Download Manager dan klik Internet Download Manager
Sebagai catatan, setelah IDM telah terinstall pastikan Mozilla firefox dan Google Chrome telah aktif extension IDM nya. Lagi-lagi ini caranya untuk mengaktifkan extention IDM di Google Chrome he he he.....

Ikuti langkah ke-1 s.d ke-3 seperti tampak gambar diatas

Jika tahapannya sudah benar akan tampak gambar sebagai berikut

Pastikan telah terlihat IDM Integrator Module dan cawang Enabled nya, selesai dan restart ulang Google chrome nya.




@wifi.id Telkom pada Modem ADSL+ Wireless, bisa menjadi ancaman keamanan internet/intranet

Penjelasan tentang program @wifi.id bisa dilihat disini
Hanya saja sangat disayangkan, promosi dan distribusi jaringan @wifi.id ini dilakukan oleh Telkom dengan memanfaatkan modem Speedy ADSL+ Wireless pengguna/pelanggan telepon rumah  yang umumnya tanpa sepengetahuan dan izin dari pelanggan. Modem ADSL+Wireless ini didapat dari TELKOM saat akan berlangganan Internet SPEEDY. Modem ADSL+Wireless ini sudah dimodifikasi firmware dan rom-nya oleh pihak Telkom, sehingga selain memancarkan sinyal wireless khusus pengguna (nama wireless/SSID dapat di ubah/setting sendiri oleh pengguna), tetapi juga memancarkan sinyal wireless untuk publik lainnya dengan nama jaringan wireless atau SSID @wifi.id, beberapa modem juga pernah memancarkan SSID lainnya spt GROOVIA, @Speedy dan bahkan Hidden SSID..
Terus apa saja permasalahannya ? Hmm, yang pasti banyak! Saya coba jelaskan beberapa hal diantaranya:
  1. Bandwidth internet tidak dapat maksimal  digunakan oleh pelanggan Speedy
    Bandwidth line ADSL yang pengguna terima umumnya terbatas, sekitar 1-1.3Mbps (setidaknya data ini untuk pengguna ADSL yang saya amati, meskipun mungkin ada pelanggan yang berlangganan 3Mbps), jika line ADSL ini digunakan bersama antara pengguna SSID private (pemilik/pelanggan) dengan pengguna umum lain (SSID @wifi.id), maka otomatis bandwidth yang seharusnya diterima oleh pelanggan Speedy akan terkurangi oleh pengguna lain.
  2. Jumlah user wireless terbatas.
    Modem ADSL+Wireless yang didistribusikan (dimodifikasi) oleh Telkom kepada pengguna umumnya ber-merk TP-Link seperti yang ada disini. Secara umum modem wireless tersebut memiliki keterbatasan maksimal client yang terhubung bersamaan. Dari datasheet dan informasi faq disebut hanya sekitar maksimal 24 client secara simultan. Bayangkan jika lokasi jaringan wireless Speedy Anda ternyata berada dekat dengan keramaian (pusat perbelanjaan/pertokoan atau bahkan kos-kosan/dll), ini akan membuat jaringan wireless kita menjadi tidak reliable, apalagi jika kita memiliki banyak pengguna sendiri.
  3. Menjadi ancaman keamanan intranet/internet.
    Konfigurasi wireless dengan Multi-SSID, tanpa adanya pengelolaan VLAN ID yang benar (biasanya dapat dikombinasikan dengan switch manageable), maka memungkinkan kesalahan managemen broadcast domain jaringan. Seperti konfigurasi multi-SSID yang digunakan pada Modem ADSL Wireless yang didistribusikan oleh Telkom. Jaringan Wireless dengan SSID @wifi.id yang bersifat open network dan tidak memiliki proteksi enkripsi, maka setiap client public (umum) yang terhubung ke SSID @wifi.id, maka otomatis sudah masuk ke internal jaringan Modem Wireless itu sendiri , karena dalam satu broadcast domain (VLAN). Sehingga akses ke sistem otentikasi administrasi Modem ADSL + Wireless bisa dilakukan, seperti akses web administration http, telnet, tftp dst yang memang dapat diakses dari LAN. Jika tidak dilakukan proteksi yang baik (seperti password yang aman/tidak mudah ditebak/tidak ada dikamus, disable tftp, disable FTP atau TELNET dst) maka para hacker dapat dengan mudah mendapatkan akses administrative ke modem tersebut. Bahkan memungkinkan juga untuk mengakses jaringan intranet jaringan dengan SSID yang dibuat oleh pengguna/pelanggan.Jika pernah membaca tulisan saya sebelumnyadisini  tentang backdoor account yang dibuat oleh pihak Telkom serta resikonya, maka tidak tertutup kemungkinan juga akses administrasi ke modem lebih mudah.Untuk menanggulangi atau menonaktifkan/mengubah konfigurasi modem wireless sehingga tidak memancarkan SSID yang dibuat pihak telkom (spt @wifi.id dll) dan kemungkinan adanya backdoor lain dapat mengikuti langkah langkah dibawah ini.
# telnet 192.168.1.1 # ip modem/router/gateway biasanya 192.168.1.1
Password: ***** # masukkan password admin cpe, defaultnyaadmin jika belum diganti
Copyright (c) 2001 – 2012 TP-LINK TECHNOLOGIES CO.,LTD.
TP-LINK>
# Note 1. :
( Beberapa perintah-perintah berikutnya dibawah ini merupakan perintah-perintah yang diperoleh dari dokumen bersifat rahasia (confidential) dari produsen chipset modem/wireless)
Untuk menampilkan konfigurasi wireless SSID pertama (ke-1) merupakan SSID wifi yang disetup pengguna/pelanggan , konfigurasi SSID ini juga dapat di ubah lewat GUI (Web Based) modem wireless.
TP-LINK>  rt rtdisplay 1
 ** Wlan Info  
 Ssid Wireless-Rumxxx
 Channel 1  
 Auth Mode Wpa2psk  
 Encryp Type tkipaes  
 Active 1  
 Rts Threshold 2347  
 Fragment Threshold 2346  
 Default Key   2  
 WPA-PSK Key xxxxxxxxxx  
 DtimPeriod   1  
 BeaconPeriod 100  
 AccessControlList.Policy [0]=DISABLE [1]=ALLOW [2]=REJECT    :0  
 WlanExt->Active 1  
 WlanExt->securityOptions 0  
 WlanExt->AuthMode 7  
 WlanExt->EncryMode  8  
 WlanExt->EncryKeyId  0  
 WlanExt->EncryOnOff  0  
 WlanExt->rtsThreshold  2347  
 WlanExt->fraThreshold  2346  
 WlanExt->channId   0  
 WlanExt->ssid  Wireless-Rumxxx 
 WlanExt->dtim  1  
 WlanExt->bgProtection  144  
 WlanExt->BeaconInterval  100  
 WlanExt->FilterEnable  0  
 WlanExt->FilterMethod  0  
 WlanExt->magic_num  3390  
 WlanExt->(wmm)  Enable  
 QID_AC_BE=0 
 QID_AC_BK=0 
 QID_AC_VI=0 
 QID_AC_VO=0 
 WMM  Enable  
 IGMP Snoop  Disable  
 WlanExt->(wmm)  Enable  
 WlanExt->(igmpsnoop)  Disable  
 MAC Address  647002ac87f8 
 WscEnrolleePinCode: xxxxx007
 MacTab.fAnyStationInPsm=FALSE 
 MacTab.McastPsQueue #=0 
Txd index[0] has 63 free 
Txd index[1] has 63 free 
Txd index[2] has 63 free 
Txd index[3] has 63 free 
Free Mgmt number = 127 
0 Rxd has been used!
polling_interrupt_mode = 1  (1 :interrupt mode; 0: Polling mode 

WLANEthernetQueue Lenth = 0 
Driver version-2.5.0.2
Untuk menampilkan konfigurasi wireless SSID kedua (ke-2) merupakan SSID “@wifi.id” yang dicreate oleh Telkom, konfigurasi SSID ini tidak dapat dilihat atau diubah melalui GUI (Web Based) modem wireless karena firmwarenya sudah di modifikasi.
TP-LINK>  rt rtdisplay 2 
 ** Wlan Info  
 Ssid @wifi.id  
 Channel 1  
 Auth Mode open  
 Encryp Type none  
 Active 1  
 Rts Threshold 2347  
 Fragment Threshold 2346  
 Default Key   1  
 WPA-PSK Key   
 DtimPeriod   1  
 BeaconPeriod 100  
 AccessControlList.Policy [0]=DISABLE [1]=ALLOW [2]=REJECT    :0  
 WlanExt->Active 1  
 WlanExt->securityOptions 0  
 WlanExt->AuthMode 0  
 WlanExt->EncryMode  1  
 WlanExt->EncryKeyId  0  
 WlanExt->EncryOnOff  0  
 WlanExt->rtsThreshold  2347  
 WlanExt->fraThreshold  2346  
 WlanExt->channId   6  
 WlanExt->ssid  @wifi.id  
 WlanExt->dtim  1  
 WlanExt->bgProtection  0  
 WlanExt->BeaconInterval  100  
 WlanExt->FilterEnable  0  
 WlanExt->FilterMethod  0  
 WlanExt->magic_num  3390  
 WlanExt->(wmm)  Enable  
 QID_AC_BE=0 
 QID_AC_BK=0 
 QID_AC_VI=0 
 QID_AC_VO=0 
 WMM  Enable  
 IGMP Snoop  Disable  
 WlanExt->(wmm)  Enable  
 WlanExt->(igmpsnoop)  Disable  
 MAC Address  647002ac87f9 
 WscEnrolleePinCode: 13070007
 MacTab.fAnyStationInPsm=TRUE 
 MacTab.McastPsQueue #=0 
Txd index[0] has 63 free 
Txd index[1] has 63 free 
Txd index[2] has 63 free 
Txd index[3] has 63 free 
Free Mgmt number = 127 
0 Rxd has been used!
polling_interrupt_mode = 1  (1 :interrupt mode; 0: Polling mode 

WLANEthernetQueue Lenth = 0 
Driver version-2.5.0.2 
Untuk menampilkan konfigurasi wireless SSID ketiga dan keempat dapat menggunakan perintah:
TP-LINK> rt rtdisplay 3
TP-LINK> rt rtdisplay 4
Umumnya SSID ke-3 dan ke-4 masih kosong, tetapi pada beberapa modem wireless, SSID ke-3 ada yang berstatus mode hidden (SSID tersembunyi).
Cara lain untuk menampilkan konfigurasi multi-SSID sekaligus dapat merubah setting masing masing SSID sbb:
Untuk menampilkan SID pertama (ke-1) merupakan SSID wifi yang disetup pengguna/pelanggan , konfigurasi SSID ini juga dapat di ubah lewat GUI (Web Based) modem wireless.
TP-LINK> rt node index 1 
TP-LINK> rt node display
WLAN index:1 
WLAN CountryRegion:1 
WLAN CountryChannel:40 
WLAN SSID:Wireless-Rumxxxxx
WLAN WirelessMode(0-11b/g mixed,1-11b only,4-11g only,6-11n_2_4G,7-11gn mixed,9-11bgn_mixed,11-11n_5G):9 
WLAN txRate:0 
WLAN channel:0 
WLAN BeaconPeriod:100 
WLAN BGProtection(0-Auto,1-Always on,2-Always off):0 
WLAN TxPreamble:(0-Long Preamble,1-Short Preamble,2-Auto)0 
WLAN RtsThresh:2347 
WLAN FragThresh:2346 
WLAN TxBurst(0-disable,1-enable):0 
WLAN NoForwarding(0-disable,1-enable):0 
WLAN Max Station Number :0 
WLAN bHideSsid(0-disable,1-enable):0 
WLAN ShortSlot(0-disable,1-enable):1 
WLAN OpMode:6 
WLAN Auth Mode wpa2psk  
WLAN Encryp Type tkipaes  
WLAN DefaultKeyId:2 
WLAN key 1 0x  
WLAN key 2 0x  
WLAN key 3 0x  
WLAN key 4 0x  
Rekey Method (0-time,1-pkt,2-disable):2
Rekey Interval :0xe10
WLAN policy(0-disable,1-allow,2-reject):0 
WLAN AccessControlList:
WLAN wpapsk:xxxxxxxxxxxxx
WLAN StaIdleTimeout:300
TP-LINK>
Untuk menampilkan konfigurasi SSID ke-2 (@wifi.id) dst
TP-LINK> rt node index 2 
TP-LINK> rt node display
WLAN index:2 
WLAN CountryRegion:1 
WLAN CountryChannel:40 
WLAN SSID:@wifi.id 
WLAN WirelessMode(0-11b/g mixed,1-11b only,4-11g only,6-11n_2_4G,7-11gn mixed,9-11bgn_mixed,11-11n_5G):9 
WLAN txRate:0 
WLAN channel:0 
WLAN BeaconPeriod:100 
WLAN BGProtection(0-Auto,1-Always on,2-Always off):0 
WLAN TxPreamble:(0-Long Preamble,1-Short Preamble,2-Auto)0 
WLAN RtsThresh:2347 
WLAN FragThresh:2346 
WLAN TxBurst(0-disable,1-enable):0 
WLAN NoForwarding(0-disable,1-enable):0 
WLAN Max Station Number :0 
WLAN bHideSsid(0-disable,1-enable):0 
WLAN ShortSlot(0-disable,1-enable):1 
WLAN OpMode:0 
WLAN Auth Mode open  
WLAN Encryp Type none  
WLAN DefaultKeyId:1 
WLAN key 1 0x  
WLAN key 2 0x  
WLAN key 3 0x  
WLAN key 4 0x  
Rekey Method (0-time,1-pkt,2-disable):2
Rekey Interval :0xe10
WLAN policy(0-disable,1-allow,2-reject):0 
WLAN AccessControlList:
WLAN wpapsk: 
WLAN StaIdleTimeout:300 
Untuk merubah SSID yang ke-2 dst
TP-LINK> rt node index 2 
TP-LINK> rt node ? 
index           countryregion   countrychannel  ssid               
wirelessmode    txrate          channel         beaconperiod       
bgprotection    txpreamble      rtsthreshold    fragthreshold      
dtimperiod      txburst         noforwarding    maxstanum          
hidessid        shortslot       authmode        encryptype         
defaultkeyid    key             rekeymethod     rekeyinterval      
accesspolicy    acladdentry     wpapsk          save               
display         shortcut               
TP-LINK> rt node ssid “SSID-Baru”                # Mengubah SSID @wifi.id menjadi SSID-Baru
TP-LINK> rt node authmode wpapsk
TP-LINK> rt node encryptype 
Usage: rt node enc <none|wep64|wep128|tkip|aes>
TP-LINK> rt node encryptype  aes
TP-LINK> rt node wpapsk <passphrase>     #Kunci untuk masuk SSID-Baru
TP-LINK> rt node save  # Simpan konfigurasi ke rom
TP-LINK> rt node display # Verifikasi konfigurasi
Beberapa perintah lainnya 
TP-LINK> rt disableap  # Disable Wireless 
TP-LINK> rt enableap  # Enable Wireless 
TP-LINK> rt node index <1-4> # select WLAN configuration
TP-LINK> rt node display # display selected index configuration
TP-LINK> rt node hidessid <0/1> (GUNAKAN PERINTAH INI UNTUK MENGHIDDEN SSID @wifi.id)
TP-LINK> rt node wirelessmode <0-11> # (0-11b/g mixed,1-11b only,4-11g only,6-11n_2_4G,7-11gn mixed,9-11bgn_mixed,11-11n_5G)
TP-LINK> rt node authmode <wepauto|open|shared|wpapsk|wpa2psk|wpa|wpa2|wpa1wpa2|wpapskwpa2psk|waicert|waipsk>
TP-LINK> rt node encryptype <none|wep64|web128|tkip|aes|tkipaes>
TP-LINK> rt node wpapsk 
TP-LINK> rt node accesspolicy <0-2> # ACL for this SSID (0-disable,1-allow following MACs,2-reject following MACs)
TP-LINK> rt node acladdentry ma:ca:dd:re:ss:01;ma:ca:dd:re:ss:02;… # set the ACL (full replace, not add), to empty use “”
TP-LINK> rt node save # save modified config
Sebagai catatan selalu gunakan perintah untuk menyimpan rt node save setelah semua pekerjaan telah selesai.

Perintah-perintah selengkapnya dapat didownload disini  (berhubung dokumen ini katanya bersifat confidential, sementara hanya saya izinkan download untuk kalangan terbatas, silahkan request ke email saya yang tercantum pada halaman kontak. Hendaknya menggunakan Nama Asli dan info lainnya yang  menunjukkan identitas asli spt email kantor, website/blog pribadi untuk merequest dokumen tersebut, jika menggunakan nama samaran tidak akan dilayani)
Demikian sedikit tulisan tentang hebohnya @wifi.id pada modem ADSL Wireless dan cara merubah konfigurasi modem wireless didapat dari Telkom tersebut, sehingga tidak perlu kuatir adanya penyalahgunaan akses ke modem kita yang memang tidak kita inginkan diakses oleh kalangan lain.
Selain cara manual (dengan telnet) merubah konfigurasi diatas, cara lain yang tidak kalah efektif disini
adalah mengganti firmware dan rom bawaan modem dengan firmware yang disediakan oleh vendor (TP-Link), bisa di download 

UNTUK DOKUMENTASI VERSI PDF nya bisa didownload klik disini
Jika ada pertanyaan atau komentar silahkan mengisi pesan dibawah.
Semoga bermanfaat. Terimakasih.

"SEMOGA TELKOM tidak selalu berbuat curang dan culas. Kalau gak punya uang untuk membangun infrastruktur jangan dipaksain dong,  bukankah TELKOM sudah memaksa para pelanggan SPEEDY nya untuk memasang fixed telephone yang dibebani dengan biaya bulanan (abonmen), Dasar BUMN Kucing Garong"
Mempertajam pencarian kata dalam kalimat atau Database

Masih ingatkah dengan perintah :

  • Locate for
  • Seek
  • Find
ketiga perintah diatas adalah perintah pencarian dengan rumus sebagai berikut :


LOCATE [FOR lExpression1]   [Scope]   [WHILE lExpression2]   [NOOPTIMIZE]





SEEK eExpression   [ORDER nIndexNumber | IDXIndexFileName
    | [TAG] TagName [OF CDXFileName]    [ASCENDING | DESCENDING]]
   [IN nWorkArea | cTableAlias]




Hmmmm.... rupanya untuk Find telah tergantikan dengan Seek


Cobalah sekarang buatlah sebuah database dengan nama master_brg.dbf dengan format sebagai berikut :

Nama Field
Jenis
Panjang
Kode_brg
Character
15
Nama_brg
Character
35
Stock
Numeric
8

Isi databasenya seperti berikut :
Kode_brg
Nama_brg
Stock
111111111
Baterai ABC Alkaline AAA
15
222222222
Nutrive Benecol 75ml.
35
333333333
Susu Ultra UHT 110ml.
8
444444444
ABC Saos Pedas Botol 200ml.
75
555555555
Susu Indomilk strwbry 100ml.
25
666666666
Indomilk susu kaleng cokelat
150
777777777
ABC kecap manis botol
55
888888888
Rokok Sampoerna A Mild
10
999999999
Frisian Flag Milk kotak 95ml.
24
Sekarang buatlah form dengan nama Cari_data.scx dengan bentuk dan format sbb. :
Property Form1 
Caption 
Membuat Form Pencarian Kata

Procedure Init 
SELECT 1
USE master_brg
SET FILTER TO

Procedure Destroy
SELECT 1
USE
SET FILTER TO

Property Label1 
Caption
Kode Barang

Property Command1
Caption
Tampilkan semua

Procedure Click
SET FILTER TO 
GO TOP
thisform.grid1.Refresh 


Property Text1
Procedure InteractiveChange
SELECT 1
SET FILTER TO ALLTRIM(UPPER(thisform.text1.Value))$ALLTRIM(UPPER(nama_brg))
GO TOP
thisform.grid1.Refresh()

Sekarang jalankan formnya, dan isikan kalimat ABC jika dalam pengisian koding Anda benar maka akan tampak seperti berikut



Daftar Harga Laptop-Tablet 23 April 2013

Posted by kurniawan On 18.47


Untuk rekan-rekan yang me-nginginkan daftar harga laptop, netbook dan tablet Android bisa dilihat dan didownload pada tabel dibawah ini. File dokumen ini berupa Microsoft Excel yang telah saya edit ke Microsoft Excel 2010 tapi saya kira rekan-rekan bisa membukanya di Microsoft Excel 2007.



Oh iya bagi rekan-rekan yang berkeinginan untuk order, harga diatas murni dari main dialer jadi akan dikenakan biaya tambahan sebesar 75 ribu tanpa install, jika diinginkan penginstallan secara penuh akan dikenakan biaya tambahan lagi sebesar 75 ribu.

Perlu saya beritahukan barang diatas merupakan PI (Paralel import) kenapa saya memilih PI bukan original :
  1. Faktor pelayanan, di PI rekan-rekan tidak akan direpotkan dengan kuitansi dan nota pembelian disaat mengalami kerusakan. Semua serba computerisasi tinggal klik data barang akan tampak dilayar berikut tanggal pembeliannya dan siapa yang beli.
  2. Online, setiap barang yang mengalami kerusakan dan sedang dalam perbaikan rekan-rekan bisa melihat perkembangannya secara on line di websitenya.
  3. Penggantian spare part, yakinlah saat barang masih bergaransi spare part akan langsung diganti jadi gak perlu lemot lah (alias gak pake lama).
  4. Garansi yang prima, garansi lebih panjang sekitar 3th (1th. pertama full garansi dan 2th. berikutnya garansi service) lumayan masih ada tanggung jawabnya
  5. Ketahanan, mutu jangan kawatir sama persis dengan yang original.
  6. Jaringan service dan garansi berada diseluruh pelosok Indonesia.
Apa yang minus dari PI
  • Karena PI rekan-rekan tidak bisa membawanya ke autorized service resminya disaat barang tersebut mengalami kendala atau rusak.
  • Barang tidak memiliki garansi secara Internasional, jadi kalau ada kendala atau rusak di luar sono rekan-rekan mesti membawanya kembali ke Indonesia.

Program KASIR

Posted by kurniawan On 09.53

Program Kasir ini adalah program jual beli seperti yang biasa kita lihat di Indomaret atau Alfamart.

Program ini sangat berguna untuk :
  1. memudahkan perhitungan pembelian barang dengan satuan apapun kilogram, kaleng, biji, strip, slop, tablet, botol dsb.
  2. Kemudahan dalam perhitungan Barang rusak, hilang dan prive
  3. Perhitungan yang akurat
  4. Laporan Rugi Laba, Kas Bank, Hutang dagang dsb.
  5. Layanan 24 jam
  6. Gratis update software
  7. Garansi sepanjang masa
  8. Adjustmen Inventory
  9. Barang Konsinyasi
  10. Laba dapat langsung terlihat
  11. Dapat disesuaikan dengan kebutuhan diperusahaan (sesuai dengan kesepakatan)
Spesifikasi perangkat keras yang dibutuhkan :
  1. Processor intel Dual Core 1.6GHz.
  2. Memory / RAM 1Gb.
  3. Hard disk ada space 2Gb.
  4. Layar terserah minimal resolusi 1024x768 (sangat disarankan menggunakan LCD)
  5. UPS plus AVR built-in
  6. Barcode reader
  7. Printer Kasir
Optional perangkat keras :
  1. Printer Kasir
  2. Barcode Reader
  3. Printer Laser untuk membuat barcode
  4. Printer Ink-jet untuk mencetak Laporan


Support program dapat Anda klik di sini

Program Kasir dapat dipesan untuk semua wilayah provinsi di seluruh Indonesia, cukup dengan membayar Rp. 2.500.000,- Anda akan mendapatkan banyak kelebihan dan keuntungan.

Kesepakatan dan lain-lain dapat menghubungi :

Kurniawan (SURYA ABADI COMPUTER)
PERUM Permata Candiloka Q1 No.2 Sidoarjo
Phone dan Whats app +6281553713001
Yahoo Messenger kurniawan433@yahoo.com
email iwankrnwn433@gmail.com

Pesan Sekarang



Suka-suka merubah format Videomu

Posted by kurniawan On 19.35
Any Video Converter 3.5.8
Software yang satu ini selain gratis fungsinya sangat powerfull untuk merubah format Video, misal video format flv (dari youtube) mau dirubah ke MP4 agar bisa di play di semua perangkat gadget atau sebaliknya dari MP4 ke flv wah pokoknya lengkap banget. Bahkan software ini bisa untuk mengambil backsoundnya lumayan bisa buat MP3 atau ringtone smartphonemu wkwkwkwk....

Kebutuhan minimal software Any Video Converter agar berjalan dengan baik tanpa hambatan :
  1. Processor Intel Pentium 4 3GHz.
  2. Memory 1 Gb. (makin besar maik bagus)
  3. Kapasitas sisa minimal Hard disk 100mb. untuk instalasi dan tempory file disesuaikan dengan besar kapasitas video yang akan diconvert formatnya
  4. VGA card minimal 256mb. On board (makin besar makin bagus kualitas video yang dihasilkan)
Catatan : Makin besar spek PC/Laptopmu, maka makin cepat pula proses konversinya

Software ini dapat kamu download disini Any Video Converter 3.5.8

Sedangkan untuk proses instalasinya ikuti langkah berikut ini
  • Pastikan kamu telah mendownloadnya, klik 2x hasil downloadtannya
  • Pada kotak dialog Select Setup Language klik OK
  • Klik Next, akan ada pertanyaan persetujuan jangan diapa-apain langsung aja Next
  • Pertanyaan berikutnya hilangkan semua cawang, diantaranya : pertanyaan Install AVG..... , Set and Maintain AVG..... , Set and Maintain my homepage... kemudian klik Next
  • Klik Next kembali
  • Nah yang ini Next lagi
  • Cawan Create a Destop icon kemudian Next
  • Klik Install dan tunggu sesaat hingga selesai
  • Klik Finish
  • Selesai, coba lihat sekarang di Desktopmu
Bagaimana Mengkoneksikan Visual Foxpro dengan Camera?


Ingat pembuatan E-KTP, jepret tampil di layar dan cetak jadi dech KTP nya. Gimana aplikasinya? Wah terlalu berat kalau diomongin logika pembuatannya tapi dengan Visual Foxpro semuanya jadi mudah tapi sayang modul di bawah ini hanya bisa untuk windows Xp tapi jangan bersedih dulu kamu bisa mengakalinya dengan cara sebagai berikut.

  1. Install dulu CyberLink YouCam 5 di Windows 7 mu
  2. Masukkan perintah di bawah ini pada MODIFY COMMAND


  3. LOCAL oForm
    oForm = CREATEOBJECT("Tform")
    oForm.Show(1)
    * end of main

    DEFINE CLASS Tform As Form
    #DEFINE WM_CAP_START 0x0400
    #DEFINE WM_CAP_DRIVER_CONNECT (WM_CAP_START+10)
    #DEFINE WM_CAP_DRIVER_DISCONNECT (WM_CAP_START+11)
    #DEFINE WM_CAP_DRIVER_GET_CAPS (WM_CAP_START+14)
    #DEFINE WM_CAP_SET_PREVIEW (WM_CAP_START+50)
    #DEFINE WM_CAP_SET_OVERLAY (WM_CAP_START+51)
    #DEFINE WM_CAP_SET_PREVIEWRATE (WM_CAP_START+52)
    #DEFINE WM_CAP_GET_STATUS (WM_CAP_START+54)
    #DEFINE WM_CAP_GRAB_FRAME (WM_CAP_START+60)

    Width=340
    Height=310
    Autocenter=.T.
    Caption="Kamera"
    MinButton=.F.
    MaxButton=.F.
    Controlbox=.F.
    ShowWindow=1
    Windowtype=1
    ShowTips=.T.
    BorderStyle=1
    hWindow=0
    hCapture=0
    capWidth=0
    capHeight=0
    capOverlay=0

    ADD OBJECT cmdGetFrame As CommandButton WITH Default=.T.,;
    Left=12, Top=264, Height=27, Width=90, Caption="\<Jepret",;
    Enabled=.F., Tooltiptext='Ambil gambar foto'

    ADD OBJECT cmdPreview As CommandButton WITH Default=.T.,;
    Left=106, Top=264, Height=27, Width=100, Caption="\<Video",;
    Enabled=.F., Tooltiptext='Memulai hidupkan Camera'

    ADD OBJECT cmdClose As CommandButton WITH Cancel=.T.,;
    Left=250, Top=264, Height=27, Width=70, Caption="\<Batal",;
    Tooltiptext='Tutup'


    PROCEDURE Activate
    IF THIS.hWindow = 0
    DECLARE INTEGER GetFocus IN user32
    THIS.hWindow = GetFocus()
    THIS.CreateCaptureWindow
    THIS.DriverConnect
    ENDIF

    PROCEDURE Destroy
    THIS.ReleaseCaptureWindow

    PROCEDURE cmdClose.Click
    ThisForm.Release

    PROCEDURE cmdGetFrame.Click
    ThisForm.GetFrame

    PROCEDURE cmdPreview.Click
    ThisForm.StartPreview

    PROCEDURE GetFrame
    THIS.msg(WM_CAP_GRAB_FRAME, 0,0)
    #DEFINE WM_CAP_FILE_SAVEDIB (WM_CAP_START + 25)

    LOCAL lcFile
    lcFile = "" && File name to create
    lcFile = "c:\sample.jpg"

    THIS.msg(WM_CAP_GRAB_FRAME, 0,0)
    THIS.msg(WM_CAP_FILE_SAVEDIB, 0, lcFile,1)

    PROCEDURE CreateCaptureWindow
    #DEFINE WS_CHILD 0x40000000
    #DEFINE WS_VISIBLE 0x10000000

    DECLARE INTEGER capCreateCaptureWindow IN avicap32;
    STRING lpszWindowName, LONG dwStyle,;
    INTEGER x, INTEGER y,;
    INTEGER nWidth, INTEGER nHeight,;
    INTEGER hParent, INTEGER nID

    THIS.hCapture = capCreateCaptureWindow("",;
    WS_CHILD+WS_VISIBLE,;
    10,8,320,240, THIS.hWindow, 1)

    PROCEDURE DriverConnect
    THIS.msg(WM_CAP_DRIVER_CONNECT, 0,0)
    IF THIS.IsCaptureConnected()
    THIS.GetCaptureDimensions
    STORE .T. TO THIS.cmdGetFrame.Enabled,;
    THIS.cmdPreview.Enabled
    THIS.Caption = THIS.Caption + ": connected, " +;
    LTRIM(STR(THIS.capWidth)) + "x" +;
    LTRIM(STR(THIS.capHeight))
    ELSE
    THIS.Caption = THIS.Caption + ": failed to connect"
    ENDIF

    PROCEDURE DriverDisconnect
    THIS.msg(WM_CAP_DRIVER_DISCONNECT, 0,0)

    PROCEDURE ReleaseCaptureWindow
    IF THIS.hCapture <> 0
    THIS.DriverDisconnect
    DECLARE INTEGER DestroyWindow IN user32 INTEGER hWnd
    = DestroyWindow(THIS.hCapture)
    THIS.hCapture = 0
    ENDIF

    PROCEDURE msg(msg, wParam, lParam, nMode)
    IF THIS.hCapture = 0
    RETURN
    ENDIF

    IF VARTYPE(nMode) <> "N" Or nMode=0
    DECLARE INTEGER SendMessage IN user32;
    INTEGER hWnd, INTEGER Msg,;
    INTEGER wParam, INTEGER lParam
    = SendMessage(THIS.hCapture, msg, wParam, lParam)
    ELSE
    DECLARE INTEGER SendMessage IN user32;
    INTEGER hWnd, INTEGER Msg,;
    INTEGER wParam, STRING @lParam
    = SendMessage(THIS.hCapture, msg, wParam, @lParam)
    ENDIF

    FUNCTION IsCaptureConnected
    * analyzing fCaptureInitialized member of the CAPDRIVERCAPS structure
    #DEFINE CAPDRIVERCAPS_SIZE 44
    LOCAL cBuffer, nResult
    cBuffer = Repli(Chr(0),CAPDRIVERCAPS_SIZE)
    THIS.msg(WM_CAP_DRIVER_GET_CAPS, Len(cBuffer), @cBuffer, 1)
    THIS.capOverlay = buf2dword(SUBSTR(cBuffer,5,4))
    nResult = Asc(SUBSTR(cBuffer, 21,1))
    RETURN (nResult<>0)

    PROCEDURE GetCaptureDimensions
    * reading uiImageWidth and uiImageHeight members
    * of the CAPSTATUS structure
    #DEFINE CAPSTATUS_SIZE 76
    LOCAL cBuffer
    cBuffer = Repli(Chr(0), CAPSTATUS_SIZE)
    THIS.msg(WM_CAP_GET_STATUS, Len(cBuffer), @cBuffer, 1)
    THIS.capWidth = buf2dword(SUBSTR(cBuffer,1,4))
    THIS.capHeight = buf2dword(SUBSTR(cBuffer,5,4))

    PROCEDURE StartPreview
    THIS.msg(WM_CAP_SET_PREVIEWRATE, 30,0)
    THIS.msg(WM_CAP_SET_PREVIEW, 1,0)
    IF THIS.capOverlay <> 0
    THIS.msg(WM_CAP_SET_OVERLAY, 1,0)
    ENDIF

    PROCEDURE StopPreview
    THIS.msg(WM_CAP_SET_PREVIEW, 0,0)
    ENDDEFINE

    FUNCTION buf2dword(lcBuffer)
    RETURN Asc(SUBSTR(lcBuffer, 1,1)) + ;
    BitLShift(Asc(SUBSTR(lcBuffer, 2,1)), 8) +;
    BitLShift(Asc(SUBSTR(lcBuffer, 3,1)), 16) +;
    BitLShift(Asc(SUBSTR(lcBuffer, 4,1)), 24)


    Ingat pada procedure PROCEDURE GetFrame kamu bisa ganti nama file foto yang akan di capture
  4. Simpan PRG mu sekarang
  5. Runing PRG nya, jika ada pilihan capture camera maka pilih Cyberlink youcam
  6. Semoga bermanfaat
Oh iya jangan lupa gunakan variable public untuk mendapatkan nama file yang kamu inginkan, so selamat berkarya sob......
Nah setelah di runing hasilnya seperti ini


Tinggal Klik Video, cari sesi yang baik lalu Klik command button Jepret

Site search