masih di VB, terkadang pada pemrograman database kita membutuhkan beberapa file yang harus dibuka, namun file tersebut terletak di folder lain. biasanya kita memasukkan perintah lengkap yang menuju ke file tersebut, contoh : jika filenya ada di C:\Database\Data\Dbs.mdb maka diketik lengkap seperti itu. namun akan menjadi kendala jika program ini sudah jadi dan diinstal di folder atau partisi laen, karna perintah VB akan mencari ke alamat tersebut.
supaya bisa tetap terlacak, ketikkan perintah berikut (liat yg warna kuning yak...) :
Dim path as string
Private sub form_load
path=app.path & "\"
data1.databasename(path & _ "\data\dbs.mdb")
.... --> isikan baris selanjutnya (inikan contoh :b)
End sub
jadi tiap kali akan memanggil file tertentu cukup pake Path & _ "nama file"
good luck!!
Wednesday, February 28, 2007
Membuat jam digital bergerak pada VB
pada VB, sebenarnya ada perintah untuk menampilkan jam, tapi hasilnya selalu jam saat ini dan tidak bergerak kecuali program direstart. ada beberapa program untuk menampilkan jam bergerak sesuai kondisi saat ini tapi terlalu panjang listing programnya.
setelah otak-atik ternyata jam digital bergerak bisa dibuat dengan baris perintah yang singkat. caranya buat 1 buah Label kemudian beri Name-nya lbl_time. kemudian tambahkan object Timer, set interval time-nya menjadi 1000. kemudian ketik baris perintah berikut :
private sub timer1_timer()
if lbl_time.caption <> CStr(Time) then lbl_time.caption=now()
endif
End sub
good luck!!
setelah otak-atik ternyata jam digital bergerak bisa dibuat dengan baris perintah yang singkat. caranya buat 1 buah Label kemudian beri Name-nya lbl_time. kemudian tambahkan object Timer, set interval time-nya menjadi 1000. kemudian ketik baris perintah berikut :
private sub timer1_timer()
if lbl_time.caption <> CStr(Time) then lbl_time.caption=now()
endif
End sub
good luck!!
Tuesday, February 27, 2007
Akses Internet pake Modem CDMA
tergiur iklan dan komentar yang sering muncul seputar teknologi CDMA, akhirnya pengen juga ikutan nyoba. awal taon 2007 mulai nyari-nyari info. karna disini baru ada Flexy dan StarOne, jadi pemilihannya rada mudah. survey dimulai... lakukan perbandingan produk... bandingkan feature... bandingkan harga... bandingkan kualitas... bandingkan pelayanan..., akhirnya diputuskan untuk memilih StarOne (punya IndoSat, kebetulan kantornya sebelahan sama kantor gw :b...).
terima paket bundling StarOne ama handsetnya ZTE, katanya sebulan bayarnya Rp.75.000,- selama 1 taon, lewat 1 taon handset jadi milik pribadi n tarifnya kembali normal.
karna handsetnya gak dukung buat internet, terpaksa nyari lagi alat yang bisa dipake buat internet. bingung milih antara ganti handset ato beli modem CDMA aja, setelah disurvey, dilacak, dipertimbangkan akhirnya diputuskan tuk beli modem CDMA aja.bingung lagi negh nyari modem CDMA yang cuocok....
feuw... dapet juga alatnya HUWAEI EC325 USB Modem harganya 1jt-an lumayanlah belinya di www.fastncheap.com. segera install drivernya pasang modemnya n... wow mantap nih, bisa sms-an, terima n buat panggilan, dan yang paling penting bisa buat internetan. setingnya gampang buanget, tinggal masukin setingan internet StarOne, selesai dah.
nyoba dial... cepet juga langsung konek... akses pake Mozilla... mantap euy, stabil g pake acara putus-putus, modem tetep anget... cepat lagi.
karna handsetnya dah gak ke pake, akhirnya disimpen aja (jelek pula handsetnya, bisa dijual gak yak?).
sekarang No.StarOne ngendon di Modem gak dicabut-cabut lagi ampe sekarang, moga-moga kualitasnya gak turun deh...
terima paket bundling StarOne ama handsetnya ZTE, katanya sebulan bayarnya Rp.75.000,- selama 1 taon, lewat 1 taon handset jadi milik pribadi n tarifnya kembali normal.
karna handsetnya gak dukung buat internet, terpaksa nyari lagi alat yang bisa dipake buat internet. bingung milih antara ganti handset ato beli modem CDMA aja, setelah disurvey, dilacak, dipertimbangkan akhirnya diputuskan tuk beli modem CDMA aja.bingung lagi negh nyari modem CDMA yang cuocok....
feuw... dapet juga alatnya HUWAEI EC325 USB Modem harganya 1jt-an lumayanlah belinya di www.fastncheap.com. segera install drivernya pasang modemnya n... wow mantap nih, bisa sms-an, terima n buat panggilan, dan yang paling penting bisa buat internetan. setingnya gampang buanget, tinggal masukin setingan internet StarOne, selesai dah.
nyoba dial... cepet juga langsung konek... akses pake Mozilla... mantap euy, stabil g pake acara putus-putus, modem tetep anget... cepat lagi.
karna handsetnya dah gak ke pake, akhirnya disimpen aja (jelek pula handsetnya, bisa dijual gak yak?).
sekarang No.StarOne ngendon di Modem gak dicabut-cabut lagi ampe sekarang, moga-moga kualitasnya gak turun deh...
Cara ngubah fat32 jadi ntfs
sempet ubek-ubek di goggle, akhirnya dapet juga. tapi dalam bahasa inggris, jadi translate sndiri ya...
1. Click Start, point to All Programs, point to Accessories, and then click Command Prompt.
2. At the command prompt, type the following, where drive letter is the drive that you want to convert: convert drive letter: /fs:ntfs
For example, type the following command to convert drive E to NTFS: convert e: /fs:ntfs
Note If the operating system is on the drive that you are converting, you will be prompted to schedule the task when you restart the computer because the conversion cannot be completed while the operating system is running. When you are prompted, click YES.
3. When you receive the following message at the command prompt, type the volume label of the drive that you are converting, and then press ENTER:
The type of the file system is FAT.
Enter the current volume label for drive drive letter
4. When the conversion to NTFS is complete, you receive the following error message at the command prompt:
Conversion complete
5. Quit the command prompt.
JANGAN LUPA BACKUP DATA DULU ...
good luck !!!
1. Click Start, point to All Programs, point to Accessories, and then click Command Prompt.
2. At the command prompt, type the following, where drive letter is the drive that you want to convert: convert drive letter: /fs:ntfs
For example, type the following command to convert drive E to NTFS: convert e: /fs:ntfs
Note If the operating system is on the drive that you are converting, you will be prompted to schedule the task when you restart the computer because the conversion cannot be completed while the operating system is running. When you are prompted, click YES.
3. When you receive the following message at the command prompt, type the volume label of the drive that you are converting, and then press ENTER:
The type of the file system is FAT.
Enter the current volume label for drive drive letter
4. When the conversion to NTFS is complete, you receive the following error message at the command prompt:
Conversion complete
5. Quit the command prompt.
JANGAN LUPA BACKUP DATA DULU ...
good luck !!!
Shortcut & Menu Start Hilang
pernah ngalamin nih, setelah basmi virus brontok, shortcut & menu start jadi hilang :(
cara ngatasinnya :
pada saat Login masuk n yg tampil cuman wallpaper doank tekan tombol pamungkas CRTL+ALT+DEL
terus klik File>New Task terus ketik explorer.exe atau langsung REGEDIT aja kali ya... :)
supaya menu start jadi permanen, ubah di regedit
HKLM/Software/Microsoft/WindowsNT/CurrentVersion/WinLogon
cari key Shell dikolom sebelah kanan dan ganti Valuenya jadi
"c:\windows\explorer.exe" ---> lengkap dgn tanda " "
(knapa begini?? karna brontok mengubah explorer.exe menjadi explorasi.exe)
RESTART
good luck !!!
cara ngatasinnya :
pada saat Login masuk n yg tampil cuman wallpaper doank tekan tombol pamungkas CRTL+ALT+DEL
terus klik File>New Task terus ketik explorer.exe atau langsung REGEDIT aja kali ya... :)
supaya menu start jadi permanen, ubah di regedit
HKLM/Software/Microsoft/WindowsNT/CurrentVersion/WinLogon
cari key Shell dikolom sebelah kanan dan ganti Valuenya jadi
"c:\windows\explorer.exe" ---> lengkap dgn tanda " "
(knapa begini?? karna brontok mengubah explorer.exe menjadi explorasi.exe)
RESTART
good luck !!!
Subscribe to:
Posts (Atom)