Home - Komunitas - Panduan - Kontak
Indonesian Gadgeteers
Forum Diskusi:
Main Index | Search | Panduan | Aturan | Kontak  ·  Tanpa registrasi: cukup isi nama
>> Forum Innovative
hengki_w
(Anggota)
15/05/04 12:12
🙂 bagaimana seh caranya clear buffer pada mscomm
teman temin , aku tanya dong bagaimana caranya meng clear kan buffer yang sudah dipakai di mscomm
contoh
dim buffer as string
mscomm1.commport=1
mscomm1.settings="19200,8,N,1
mscomm1.inputlen=0
mscomm1.portopen=true
mscomm1.output="AT+CMGL=4"+chr(13)
do
buffer=buffer&mscomm1.input
loop until 20 detik
hasilnya :
+cmgl:bla...bla..

lalu variable buffer tersebut ingin diclear kembali untuk digunakan yang lain , tapi kok masih ikut ya.. hasil dari looping yang pertama

mscomm1.output="ATE1"&chr(13)
hasilnya:
at+cmgl=4
<isinya>
ATE1<enter>
OK
agar at+cmgl=4 tidak ikut pada looping berikutnya gimana caranya, saya harus mengunakan syntax/ property apa

mohon penyegaran dong.
Post Extras: 🖨️ Cetak
onobudi
(Pendatang Baru)
15/06/04 14:19
😐 Re: bagaimana seh caranya clear buffer pada mscomm
menurut saya itu karena Anda memakai:
buffer=buffer&mscomm1.input
dan besihkannya cukup buffer=""

coba kalau begini:
dim skr as Date
' loop pertama
skr = Now
mscomm1.output="AT+CMGL=4" & chr(13)
do
DoEvents
buffer=buffer & mscomm1.input
Loop Until InStr(buffer, "OK") Or InStr(buffer, "ERROR") Or skr > DateAdd("s", 20, waktu)
' buffer diclear lagi
buffer=""
' looping kedua.. sama seperti pada looping pertama..
Post Extras: 🖨️ Cetak
🔒 Topik lama, hanya bisa dibaca. Isinya diambil dari forum Forum Ponsel yang dulu: tautan, nomor telepon, dan alamat email sudah disembunyikan. Ingin kiriman ini dihapus atau dikoreksi? Hubungi kami dan sebutkan alamat halaman ini. Ingin membahas topik serupa? Buat topik baru di Forum Innovative.
Isi forum adalah pendapat pengirimnya. Kiriman diperiksa sebelum tampil. © Forum Ponsel · Privasi · Syarat · Aturan forum