Google

Selasa, 24 Juni 2008

akses internet telkomsel unlimited

sampai hari ini kira2 1 minggu sudah saya pakai internet telkomsel paket unlimited 125rb/bulan.lumayan kira-kira mungkin uda nyampe 2gb(perkiraan aja dengan menghitung besarnya file2 yg didownload)kecepatan download kurang lebih 10-23kbps tergantung lokasi file nya yg kita download.jadi sampai hari ini lumayanlah,belum ada komplain :>

Rabu, 11 Juni 2008

Paket Telkomsel Flash unlimited

hari ini saya baru tahu kalau ada paket akses internet unlimited dari telkomsel.info yg dikutip dari http://www.telkomsel.com/web/hot_offering
selama ini saya pakai telkomsel flash,kecepatannya tidak mengecewakan, untuk download sekitar 30-35 kbps.(dengan catatan HP3G dengan sinyal indicator 3G tampil di indicator HP kita.saya pake nokia N73).mudah mudahan dengan paket unlimited ini tidak mengurangi kecepatan browsing dech.stabil terus.semoga sukses selalu Telkomsel.

Sabtu, 07 Juni 2008

Membuat Aplikasi Dasar VB Penjumlahan

Setelah membaca posting saya terdahulu.mari kita mulai dengan aplikasi dasar penjumlahan.
1. Jalankan visual basic6
2. (Pilih) file-new project-(pilih) standard.exe
3. Click and drag pada form1,ambil textbox sebanyak 3 textbox,berturut-turut 1 command button 1 line, 1 label.
4. click pada masing masing control(text1 dst) dan ganti properties name dari :text1 =>txt1, text2=>txt2, text3=>txt3 (ket: => menjadi)
ganti properties name commandbutton menjadi cmdj.
5. Atur sesuai gambar.



6. Copy paste kan code dibawah ini .

Private Sub cmdj_Click()
on error goto salah 'ini adalah code perangkap kesalahan

Dim j1 As Integer
Dim j2 As Integer
Dim j3 As Integer
Dim j4 As Integer

j1 = txt1
j2 = txt2
j4 = txt3

j3 = j1 + j2

If j4 = j3 Then
MsgBox "Jawaban Benar Jose", vbOKCancel, "HEBAT"

Else
MsgBox "Jawaban Salah Jose", vbOKCancel, "ERROR"
txt3 = ""
End If

txt3.SetFocus

exit sub
salah: msgbox err.description

End Sub

Private Sub txt1_KeyPress(KeyAscii As Integer)

If KeyAscii = 13 Then 'ini adalah kode berpindah ke control berikut apabila tombol "enter " 'ditekan(seperti text box,command
' button yg memiliki properties tabstop=true)
txt2.SetFocus
End If

End Sub

Private Sub txt2_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
txt3.SetFocus
End If
End Sub


7. Tekan F5 untuk menjalankan program. (run - start)
8. Selamat mencoba semoga bermanfaat.

rumah citra raya surabaya





Rabu, 05 Maret 2008

Link download E-book Computer

ftp://ftp.uar.net/pub/e-books/

semoga bermanfaat

Kamis, 06 Desember 2007

Menghemat Bandwidth Internet



tips ini untuk menghemat pemakaian internet terutama yg berlangganan dengan system kuota(dibatasin upload and downloadnya).coba kunjungi www.toonel.com
langkah 1.Karena software toonel ini dibuat berdasarkan program java makanya sebelum dijalankan kita harus install java runtime dulu.ini ada link untuk downloadnya java.sun.com/javase/downloads/index_jdk5.jsp (sekitar 15mb mungkin lebih).Setelah didownload install-restart komputer.
2.download program toonel (200kb)
3.setting browser (saya pakai firefox 2.0.0.7).Masuk Tools-Option-advanced-network-setting-pilih manual proxy configuration-isi http proxy dengan 127.0.0.1 port 8080 terus OK
4.tutup firefox terus buka lagi dan jalankan toonel.siap untuk dial up (saya pake cdma starone 1gb) ternyata hasilnya lumayan.browsing lebih hemat(karena apa yg kita sent & received dikompresi oleh toonel)

Mari Belajar Visual Basic dari Awal







Langkah I: Installation
1a.Install Visual basic standar atau proffesional edition(pilih typical installation aja)
1b.Install crystal report bawaan dari vb 6 (ada di folder Common\Tools\Vb\CRYSREPT\
jalankan CRYSTL32.EXE untuk install crystal report versi 4.
1c.Copy file2 berikut ke folder windows\system32 (bila OS winXP) (untuk Win98 copy ke Windows\system\) : DBGRID.REG,DBGRID32.DEP,GRID32.OCX,DBGRID32.OCX ada di folder Common\Tools\Vb\Controls
1d.Setelah dicopy jalankan dbgrid.reg untuk registrasi ocx nya ke system windows
1e.Install Visual Studio service pack 5/6 (kalau tidak punya bisa hub.email saya(cikasayang@hotmail.com)
1f.Program Siap dipakai.

Langkah II. Buat Program Pertama Anda
2a.Jalankan vb6 pilih standar Exe
2b.di sebelah kiri windows vb ada tab general pilih "commandbutton"click and drag di form1
2c.klik 2 kali pada commandbutton maka muncul"


Private Sub Command1_Click()

End Sub

tulis didalamnya perintah sbb:
Private Sub Command1_Click()
MsgBox "Selamat datang di Visual Basic Program", vbOKOnly, "Pertama"
End Sub

tekan F5 untuk jalankan program yg anda sudah buat.klik command1 maka message box akan muncul.Jadi Fungsi commandbutton adalah melakukan perintah yg kita tulis didalamnya bila tombolnya diklik.Lakukan prosedur simpan project yang anda sudah buat.Klik File-SaveProject As-masukkan nama form anda di folder yg sudah dibuat sebelumnya-simpan project nya juga.Selesai.Jadi setiap kali kita mau memanggil project ini pilih nama projectnya saja (extension .vbp).atau dari vb pilih File-OpenProject.
Selamat mencoba coba dengan control lain seperti text box,label,dll