Perkuliahan sudah dimulai kembali, Bro n sist bisa download jadwalnya..mangga di sedot..

Download Link : Jadwal Kuliah TSI Semester 4 (MS Office 2003 *.xls file type)
Download Link : Jadwal Kuliah TSI Semester 4 (MS Office 2007 *.xlsx file type)

Jadwal bisa sewaktu-waktu berubah tergantung kesepakatan mahasiswa dan dosen, jika terdapat kesalahan didalamnya mohon dikoreksi..

Jadwal kuliah Teknik Informatika Semester 3 STT Wastukancana Purwakarta (TSI Semester 3)

Update 3 September 2009 05:15, klik gambar untuk resolusi lebih besar

File *.xls dan *.xlsx bisa di sedot / download nih http://www.ziddu.com/download/6330673/Jadwal_Kuliah_rev1.zip.html jika ada kesalahan penulisan mohon tulis di komentar atau bisa email ke gandi@dhirenz.com

.

Ini merupakan pelajaran yang sangat menarik bagi saya, dan sudah lama juga saya mencari cara mudah, murah dan ga ribet untuk mencoba praktek dengan mudah membuat aplikasi SMS Gateway dengan Visual Basic 6. Sebenarnya device yang saya gunakan tidak begitu murah bagi saya, namun sangat mudah didapatkan untuk sekarang ini, yaitu saya menggunakan modem Broadband 3G Huawei E156 yang harganya Rp. 550.000,00 (http://www.jakartanotebook.com July 2009), tapi ada juga loh yang harganya 350rb dan bisa anda pakai untuk praktek.

Awalnya saya menggunakan Handphone nokia 7610 untuk praktek namun tidak dapat disisipkan AT-Commands, dan akhirnya saya membeli modem yang awalnya untuk berselancar di dunia internet, namun sempat terpikir untuk mencobanya, karena pada modem tersedia fasilitas Send and receive SMS dengan software bawaannya.

Sebelum anda melangkah ke programming Visual Basic, anda harus mengerti atau tau sedikit dengan perintah-perinta AT, namun anda pasti ingin tahu apa sih dan kenapa disebut “AT” Commands..? AT Commands merupakan perintah yang digunakan pada Hayes-compatible modem. Perintah ini disebut demikian karena pada penulisan perintahnya, kita harus memulainya dengan huruf AT (berasal dari attention).

Mungkin sebaiknya langsung saja pada praktek, masukkan modem anda dan cobalah buka aplikasi HyperTerminal untuk akses Serial Port (Saya menggunakan Settingan 9600,8,n,1 dengan COM2), bagi anda coba cek terlebih dahulu modem anda terdeteksi pada Serial Communication berapa?kemudian bit rate modem anda pun harus sesuai, setelah itu coba untuk “Connect”. Berikut akan saya ulas perintah-perintah yang sering digunakan untuk membuat aplikasi SMS Gateway.

AT

AT
OK

Perintah AT yang berarti Attention, biasanya saya gunakan untuk melakukan pengetesan apakah modem tersebut support AT commands atau tidak, dan modem akan reply pada baris selanjutnya yaitu “OK”.

AT+CMGF=[Message Format]

AT+CMGF=1
OK

Perintah ini sangat penting, karena jika anda tidak mengeksekusi perintah ini secara default (Huawei E156G) sms yang anda baca dengan format 7 bit atau 8 bit atau PDU Mode. Message format sendiri terdapat 2 pilihan yaitu :

0 = PDU Mode (7 bit or 8 bit format)

1 = Text Mode

AT+CMGR=[index]

AT+CMGR=3
+CMGR: Message..

Perintah untuk membaca pesan atau SMS menurut urutan pesan (index)

AT+CSQ=?

Untuk mengetahui Level Signal pada device yang kita gunakan.

AT+CSQ=?

+CSQ: 19,09OK

bentuk format command tersebut adalah +CSQ: (list of supported s), (list of supported ) OK dan berikut kutipan keterangan mengenai parameter http://ww1.freeau.net/freeau/freeau2680.aspx?id=2014

Parameter
Receive level:
0 -113 dBm or less
1 -111 dBm
2…30 -109… -53 dBm
31 -51 dBm or greater
99 not known or not detectable

Bit error rate:
0…7 as RXQUAL values in the table in GSM 05.08
section 8.2.4.
99 not known or not detectable.
To check the bit error rate there must be a call in progress to
obtain realistic values. If no call is set up, there is no BER to be
determined. In this case the indicated value may be 0 or 99,
depending on the SIM card.
Reference
GSM 07.07

To Be Continued..

Sending Message or SMS vb6 Script

Dibawah ini saya berikan contoh script untuk melakukan pengiriman sms :

Private Declare Sub Sleep Lib “KERNEL32″ (ByVal dwMilliseconds As Long)
Private Sub Command1_Click()
With MSComm1
.Settings = “115200,n,8,1″
.CommPort = 3 ‘—sesuaikan dengan COM anda
.PortOpen = True
.Output = “AT+IPR=115200″ + Chr(13)
Sleep 715
.Output = “AT E0″ + Chr(13)
Sleep 990
.Output = “AT+CMGF=1″ + Chr(13)
Sleep 100
txtPhone=”0856244031313” ‘—sesuaikan nomor HP tujuan
.Output = “AT+CMGS=” + Chr$(34) + Trim(Me.txtPhone) + Chr$(34) + vbCr
Sleep 1000 ‘ USE API
.Output = “Ini pesan singkat SMS yang dibuat lewat VB6 saya”+ Chr$(26)
.Output = “AT+CPAS” + Chr(13)

MsgBox “Kirim OK”, vbInformation
End With
End Sub

Sumber :

• http://nds1.nokia.com/phones/files/guides/at_commands.pdf
• http://ww1.freeau.net/freeau/freeau2680.aspx?id=2014

Pertanyaan, Kritik dan saran bisa kirim email ke : gandi@dhirenz.com

]]> http://blogs.dhirenz.com/2009/08/sms-gateway-vb6-programming-basic/feed/ 3 http://blogs.dhirenz.com/2009/06/this-day-has-been-quiet/#utm_source=rss&utm_medium=rss&utm_campaign=this-day-has-been-quiet http://blogs.dhirenz.com/2009/06/this-day-has-been-quiet/#comments Sun, 21 Jun 2009 01:37:21 +0000 admin http://blogs.dhirenz.com/?p=697 End of semester examinations are completed implemented

Satu bulan kebelakang saya tidak sempat posting di blog ini karena kesibukan saya, ditempat kerja dan di kampus. Akhirnya UAS sudah selesai sekarang tinggal tunggu kabar nilai, kayaknya sih banyak yang drop nilainya. Absensi kuliah yang berantakan, sebagian mata kuliah ada yang belum UTS karena waktu itu terhalang dengan pekerjaan.

Hari tenang ini dibumbui dengan rasa kecewa dengan program HYIP luar yang kebanyakan saya ikuti menjadi SCAM, diantaranya woip system, majorbarter, etc. Kebanyakan uang saya di invest diprogram tersebut, dan akhirnya sekarang tabungan saya sudah low limits. Namun ada beberapa HYIP yang masih saya jalani diantaranya Onis Group, dan poplans. Kemungkinan untuk kedepannya saya akan fokus ke program investasi lokal yang berbentuk MA (Management Account) dengan sistem Sharing Profit dan mencoba untuk live trading, doakan saja semoga berhasil .

1. Variabel Global adalah variabel yang ada di dalam algoritma utama
2. Variabel lokal adalah variabel yang ada di dalam procedure

Nama-nama (tetapan, perubah, type data, dll) yang dideklarasikan di dalam bagian deklarasi procedure hanya dikenal didalam badan procedure yang bersangkutan yang bersifat local. Sedangkan nama-nama yang di deklarasikan di dalam algoritma utama dikatakan bersifat global.

Contoh :


Procedure hitung_rata_rata{ Menghitung rata-rata N buah bilangan bulat yang dibaca dan piranti masukan}Deklarasi

Algoritma

Definisi : Bagian/pecahan dari program dengan tujuan untuk memperjelas program, membuat program menjadi bagian-bagian kecil dan mendeteksi kesalahan program

Untuk membuat modul program, di daam program pascal disediakan fasilitas pilihan yaitu :

1. Procedure
2. Function

Procedure adalah bagian dari algoritma program yang berdiri sendiri dan di panggil sewaktu-waktu jika diperlukan. Pada dasarnya struktur dasar procedure sama dengan struktur dasar algoritma yaitu ada bagian :

• Judul (Header) Procedure
• Deklarasi
• Descripsi

Notasi algoritma yang digunakan untuk mendefinisikan procedure (tanpa parameter) adalah:

Procedure Nama_procedure
{Bagian Komentar yang menjelaskan tentang keterangan procedure}
Declaration
{Semua nama/variabel yang digunakan di dalam procedure dan hanya variabel local}
Description
{Badan procedure, berisi kumpulan instruksi-instruksi}

Contoh Algoritma hitung luas segitiga

• Alas
• Tinggi
• Luas

algoritma procedure hitung luas

Procedure Hitung_luas_segitiga

{Ini adalah bagian/modul program yang berisi sekumpulan intruksi untuk enghitung luas segitiga}

Deklarasi

alas : integer {Variabel input alas}

tinggi : integer {Variabel input tinggi}

luas : real {Perubah hitung luas}

Descripsi

Read(alas,tinggi)

luas :=(alas * tinggi)

write(luas)

Pemanggilan Procedure

Precedure bukan program yang berdiri sendiri, jadi tidak dapat di eksekusi secara langsung. Ini berarti instruksi-instruksi pada procedure baru dapat dilaksanakan jika procedure tersebut diakses/dipanggil. Procedure dapat diakses dengan cara memanggil nama prosedure nya dari program pemanggil.