برقراری ارتباط با COM

[arash67]

با سلام
من قصد یک سری اطلاعات را از پورت کام دریافت کنم و اونو داخل یک Text نمایش بده اما نمیدونم به چهشکلی باید این کارو انجام بدم لطفا منو راهنمایی کنید
با تشکر

[t3r!p3000]

اینها رو یه نگاه بنداز :

http://www.iranled.com/forum/showthread.php?tid=12119

http://www.iranled.com/forum/showthread.php?tid=18367

[arash67]

مهندس من همه اینها رو دیدم اما من میخوام بدونم به چه شکلی میشه زمانی میکرو یک متنی رو ارسال میکنه اونو تو VB توی یک TEXT نمایش بده!
در ضمن من تونستم ارتباط اونو از طریق ویژوال بیسک برقرار کنم اما ارتباط من فقط یک طرفه هستش!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
لطفا کمکم کنید

[kimiafars]

خوب از میکرو به ویبی تو میکرو بنویس print"kimiafars"
توی وی بی هم اینو بنویس



text1.text=mscomm1.input

متنو میتونی تو وی بی مشاهده کنی

[arash67]

این کارم انجام دادم باز هم نشد
آیا تنظیمات خاصی رو باید انجام بدم؟

[arash67]

اینو ببین مهندس مشکلش کجایه؟

[kimiafars]

$crystal =8000000
بذار
Config Serialout
Recive = inkey()
برای فرستادن عدد با وی بی $chr(22)
کازکتز عدد رو بفرست بعدشم print debug بذاز

[arash67]

خوب مهندس منظورت از print debug چیه؟
چیکار میکنه؟
در ضمن من میخوام که یک سری از اطلاعات را از میکرو تو VB نمایش بده منظورم اینه...

[kimiafars]

اونو بیخیال شو اصلا چیزی تو تکست باکست نشون میده ؟

---

عزیزم اولا مهنس خودتی
همون کیمیا کافیه
بعدش با این کدی که نوشتی جوا نخواهی گرفت
یک بار پورتت رو باز کن دیگه نبندش
تو فرم لود
MSComm1.CommPort = 1
MSComm1.Settings = "9600,n,8,1"
MSComm1.PortOpen = True
اینا رو بنویس
بعد یه تایمر با اینتر 11 درست کن این و توش بذار
Text1.Text = MSComm1.Input
دقیقا کا رمیکنه
بالاخره یه چیز مینویسه اگه اراجیف نوشت اونوقت مرحله دوم دیباگ شروع میشه
شما مخیای هی پورت رو باز میکنی و میبندی بعد توقع داری چی به وی بی برسه
بعد با تامر بگیر نه با چنج

[milson]

با سلام
من قصد یک سری اطلاعات را از پورت کام دریافت کنم و اونو داخل یک Text نمایش بده اما نمیدونم به چهشکلی باید این کارو انجام بدم لطفا منو راهنمایی کنید
با تشکر

با جاوا مثل آب خوردنه(البته بعد افطار) یه نگاه بنداز :
http://www.iranled.com/forum/showthread.php?tid=18528
اگه چیزی از جاوا نمی دونی بگو پروژه چیه من قسمتی که قراره اطلاعات رو بخونه نشون بده رو درست می کنم واست!

[kimiafars]

Private Sub Timer1_Timer()
Text1.Text = MSComm1.Input
End Sub

---

Private Sub Form_Load()
Dim Send As String * 10
MSComm1.CommPort = 1
MSComm1.Settings = "9600,n,8,1"
MSComm1.PortOpen = True
End Sub

---

RE: برقراری ارتباط با COM
(ديروز ۱۰:۴۲:۵۲)
arash67 نوشته :
با سلام
من قصد یک سری اطلاعات را از پورت کام دریافت کنم و اونو داخل یک Text نمایش بده اما نمیدونم به چهشکلی باید این کارو انجام بدم لطفا منو راهنمایی کنید
با تشکر
با جاوا مثل آب خوردنه(البته بعد افطار) یه نگاه بنداز :
http://www.iranled.com/forum/showthread.php?tid=18528
اگه چیزی از جاوا نمی دونی بگو پروژه چیه من قسمتی که قراره اطلاعات رو بخونه نشون بده رو درست می کنم واست!

عزیزم این سوال وی بی هست میخوای با جاوا جواب بدی کارت خیلی درسته
پلتت رو بذار شاید بدرد بخوره