Giao tiếp RS232 trên PC bằng Visual Basic.
1 Attachment(s)
Chào các bạn.
Mình mở luồng này để hướng dẫn các bạn lập trình giao tiếp RS232 bằng phần mềm Visual Basic 6.0 của Microsoft. Do site tailieuvietnam.net đang có vấn đề về nhỏ nên mình không upload file lên đó được. Tuy nhiên mình vẫn upload chương trình viết bằng VB để các bạn tham khảo. Giao diện của chương trình như sau: http://i36.photobucket.com/albums/e4...t/PVN_0112.gif Hình 1: Giao diện chương trình đơn giản thứ 1 dùng VB. Chương trình này là một ví dụ nhỏ bạn truyền một loạt byte rùi nhận về (mình nối 2 chân 2 và 3 để test chương trình). Các bạn có thể ứng dụng nó trong mạng truyền thông dùng các giao thức truyền khác nhau. Trong ví dụ của mình truyền đi 11 byte gồm 1 byte start, 8 byte dữ liệu, 1 byte CRC, 1 byte stop. Chúc các bạn thành công. |
Bạn có thể nói rõ hơn một chút về cách tính CRC trong VB cho tớ được không? Thanks.
|
Luồng mới hay wa. Tớ muốn hỏi về truyền, nhận theo khung truyền dùng giao thức Modbus? Tức là cần tính mã kiểm lỗi của khung nhận được và so sánh mã kiểm lỗi của khung truyền. Nếu giống thì truyền tiếp, còn ko thì gửi yêu cầu truyền lại. Thanks.
|
Trích:
Rất cảm ơn sự quan tâm của bạn đến chủ đề này. Việc lập trình truyền nhận theo một giao thức nhất định rất có ích cho các dự án về Mạng truyền thông công nghiệp hay tự động hoá toà nhà,... Tuy nhiên, mình chưa lập trình xử lý kiểm soát lỗi CRC trong VB. Mình sẽ xem xét help MSDN rùi trao đổi với các bạn sau. Bạn nào nghiên cứu trong VB rùi xin post lên để cho mọi người cùng tham khảo học tập. Mình xin đưa ra một vài thông tin về mã kiểm lỗi CRC: Đầu tiên các bạn chọn một đa thức phát G được qui ước dưới dạng nhị phân tức các hệ số của nó chỉ có giá tri 1 hoặc 0 tương ứng với các chữ số trong một dãy bit. Ví dụ: Dạng đa thức: G = x^7 + x^6 + x^5 + (0x^4 + 0*x^3) + x^2 + (0*x^1) + 1 Dạng nhị phân: G = 1 1 1 0 0 1 0 1 Nguyên tắc cơ bản của phương pháp mã hoá CRC: Trích:
Dựa trên nguyên tắc này các bạn có thể tạo ra ý tưởng cho việc lập trình của mình đó. Chúc các bạn thành công. |
Crc
1 Attachment(s)
Theo như một bài tớ được bít thì mã kiểm lỗi CRC có thể dùng bảng để tra giá trị thay vì phải tính toán. Bảng CRC thì có rất nhiều trên mạng. Đây là một ví dụ về cách dùng bảng CRC trong VB. Bạn nào có ý kiến hay thì đưa lên nhé.Thanks.
|
Crc
Gởi Anh Hải Bắc!
Em Muốn dùng phương pháp kiểm tra lỗi CRC, Em có hiểu phương pháp này nhưng thực sự không biết cách chọn đa thức sinh, Anh có thể chỉ không? em muốn dùng 1 byte cho CRC |
Chào em.
Đa thức sinh em có thể chọn tùy ý mà em. Quan trọng là 2 bên truyền và nhận phải cùng kiểu mã hóa CRC để việc kiểm lỗi là đúng em ạ. Em dùng CRC 1 byte thì chọn G là đa thức bậc 8. Chúc em thành công. |
Mấy hôm nay Em thi nên không lên mạng được, Cảm ơn Anh Hải Bắc nhiều!
|
may dai ca! em dang lam do an dieu khien dco buoc co giao tiep may tinh xai VB, co su phu nao lam rui chi giup em voi! Hix, em dang gap lam. co file up len cho em thi cang tot. Xin da ta!!!!
|
Cac anh co kinh nghiem lam viec voi ca 2 phan mem VB 6 va Visual C++ roi co the chi cho toi biet giua 2 phan mem co diem gi khac nhau, uu nhuoc diem trong dieu khien? Nen hoc phan mem nao de co the dap ung khi di lam ngoai thuc te? Thanks
|
1 ứng dụng access cần giúp đỡ 1 đoạn vb giao tiếp rs232
1 Attachment(s)
các bạn thân :
cả tháng qua tui theo dõi cái mục này rùi áp dụng vào cái chương trình của tui mà sao giờ này nó vẫn chưa chạy oải wá trời đành phải nhờ các bạn code dùm thui chư mò chắc tới tết nguyên đán wá ... tui viết code vb trong access ...sử dụng mscomm32.ocx đã đăng ký ổn cáp từ thiết bị ngoại vi xuất từ com 25 pins vào máy ở com 9pins các bạn code dùm mình đưa số liệu vào ô "chisocan" trong form "nhap" nhé .. mình thực sự đắp chiếu .com rùi sau đây là cái đoạn code dở hơi của mình : Code:
xin chân thành cám ơn tiger bể đã tài trợ chương trình này hihihihhiiiiii |
thực sự là một chuyên mục rất thú vị của bác ngohaibac
|
Chào bạn controlufo.
Chương trình của bạn như thế là hoàn toàn không ổn rùi. Các thông số thiết lập cho MSCOMM thì bạn phải thiết lập ngay từ đầu chứ. Còn dữ liệu nhận từ RS232 bạn nên viết trong hàm ngắt. Chứ tự nhiên bạn inputstring = MSComm1.Input thì dữ liệu ở đâu mà nhận nhỉ :D. Với lại setting cho đối tượng mscomm đó cũng không đúng. Chương trình đơn giản khác bạn xem tại đây: http://dientuvietnam.net/forums/showthread.php?t=5281 Chúc bạn thành công. |
thua rùi manager ngohaibac ui
1 Attachment(s)
tui sưu tầm các hướng dẫn của mr maneger(ngohaibac) đem áp dụng sài không được trong form access
form nhap texbox vao tui có gửi file access kèm theo mong manager box """"design"""" lại dùm ....giúp tui đi tui chuyển sang dề tài khác ngâm cứu chứ cái vụ này lấy của tui mất hơn 1 tháng rùi ngohaibac ui... Code:
Dim x As Variant mong hồi âm xin chân thành cám ơn....chúc công việc vui vẻ |
Code:
Forms!nhap!vao = x Nếu là editbox thì phải gán vào thuộc tính text của nó chứ nhỉ ? Bạn xem lại nhé. Sao bạn k upload của project của bạn lên để mình xem chứ. Đề nghị viết tất cả code trong tag code cho dễ nhìn nhé. Chúc bạn thành công. |
Múi giờ GMT. Hiện tại là 05:55 AM. |
Tên diễn đàn: vBulletin Version 3.8.11
Được sáng lập bởi Đoàn Hiệp.
Copyright © PIC Vietnam