با سلام خدمت تمامی دوستان گرامی
آیا کسی با پورت سریال کار کرده است؟
می خواهم بدانم چگونه می شود از آن پورت اطلاعات دریافت کرد؟ یا اینکه تشخیص داد که آیا از آن پورت اطلاعاتی می آید یا خیر؟
با احترام - خدانگهدار
Printable View
با سلام خدمت تمامی دوستان گرامی
آیا کسی با پورت سریال کار کرده است؟
می خواهم بدانم چگونه می شود از آن پورت اطلاعات دریافت کرد؟ یا اینکه تشخیص داد که آیا از آن پورت اطلاعاتی می آید یا خیر؟
با احترام - خدانگهدار
تا آنجا که من میدانم در خود وی بی تابعی برای این کار وجود ندارد پس باید دنبال فایلهای دی ال ال یا کنترلهای اکتیوایکس باشید
:roll:
mscom32.ocx
با سلام خدمت دوستان گرامی
با تشکر از دوستان که راهنمایی کردند. بالاخره خودم روشش رو یاد گرفتم. من می خواستم بارکد ارسالی توسط بارکدخوان را که یک عدد بود، بخوانم و بارکدخوان هم به پورت سریال وصل بود.
برای این کار یک TextBox و Microsoft Comm Control و Timer به فرم اضافه کردم.
TextBox: برای نمایش عدد بارکد
Microsoft Comm Control: برای اتصال به پورت و خواندن از آن
Timer: برای چک کردن دوره ای مولفه Microsoft Comm Control که آیا کارت کشیده شده یا نه
کد زیر را برای آماده کردن خواندن از پورت نوشتم
Private Sub Form_Load()
If MSComm1.PortOpen = False Then MSComm1.PortOpen = True
' 12 is the length of barcode
MSComm1.InputLen = 12
Timer1.Enabled = True
End Sub
و کد زیر نیز برای نوشتن داده های خوانده شده توسط بارکدخوان در TextBox
Private Sub Timer1_Timer()
s = MSComm1.Input
If Len(Trim$(s)) > 0 Then
Text1.Text = Text1.Text + s + vbCrLf
End If
End Sub
در پایان یادآور می شوم متغیر s از نوع رشته ای می باشد و باید در سطح فرم تعریف شود، یعنی در خارج از کدهای قسمتی که در بالا نوشته ام.
امیدوارم مفید فایده واقع شده باشد.
با احترام- خدانگهدار
آقا Ruhollah جالب بود .
:D
سلام
در اینجا طول 12 را برای چی معین میکنیم و در ضمن اگر بخواهیم اطلاعاتی را روی پورت بفرستیم چیکار میکنیم
mscomm1.output = "amir"
--------------------
نیازی به معین کردن طول هم برای خواندن نیست
اگه بخوایم با پرت پرینتر کار کنیم چه طوری هستش ؟ ممنون اگه این هم توضیح بدین
یه فایل DLL می خوای به نام IO.DLL با اون می تونی راحت کار کنی
میشه در موردش بیشتر توضیح بدید ؟ یا یک مثال بذارید ؟
این یه sample هست.نقل قول:
نوشته شده توسط r_o_o_z_y
تشکر فراوان از روح الله عزیز موفق باشی./
اگر جوابشو گرفتید ایتجا هم بذارید منم نیاز دارم
مرسی