Home..........บทความ..........ผลิตภัณฑ์..........กระดานถามตอบ..........เกี่ยวกับเรา
 
 
       
 
ผู้สนับสนุน
หนังสือดีมีประโยชน์ สามารถ ดาวน์โหลดซอร์สโค้ดได้ที่นี่ อีกด้วยครับ

หนังสือรวมคอนโทรลฟรี สำหรับ VB6

หนังสือเริ่มต้นเขียนโปรแกรมติดต่อ และควบคุมฮาร์ดแวร์ด้วย VB

หนังสือสนุกกับการประยุกต์ใช้ Visual Basic

 
VB Interface Hardware

การติดต่อพอร์ตขนานด้วย Visual Basic

  เนื่องจาก Visual Basic นั้นไม่ได้เน้นการติดต่อกับ ระบบฮาร์ดแวร์ ทำให้มีคอนโทรลที่เกี่ยวข้องกับ การติดต่อ และควบคุม ฮาร์ดแวร์ มีอยู่ค่อนข้างน้อย สำหรับคอนโทรลมาตรฐาน ตัวเดียวที่มีมาให้สำหรับการ ติดต่อกับ ฮาร์ดแวร์ก็คือ MSComm ซึ่งเน้นการการ ติดต่อกับ พอร์ตแบบอนุกรม แต่ พอร์ตขนาน นั้นไม่มีคอนโทรลที่ใช้งานได้โดยตรง ต้องหามาเพิ่มเติมครับ นอกเหนือจากการหาคอนโทรล มาใช้งาน เพื่อติดต่อและ ควบคุมฮาร์ดแวร์ แล้วยังมีอีกแนวทางหนึ่งก็คือ การใช้งานฟังก์ชันควบคุม เหมือนกับที่เราใช้ฟังก์ชันในภาษาซี เพื่อติดต่อ และควบคุมฮาร์ดแวร์ ซึ่งก็มีโปรแกรมเมอร์เก่งๆ และบริษัทซอฟต์แวร์ดังๆ รวบรวมฟังก์ชันต่างๆ เป็นไลบรารีมีให้เลือกใช้งานกัน ทั้งแบบ ที่ต้องเสียเงินซื้อ และแบบที่ใช้ฟรี ในที่นี้ขอแนะนำตัวที่ใช้งานได้ฟรี นั่นคือ Inpout32.dll (ในเวปนี้ผมจะขอกล่าวถึงการใช้งานไลบรารี Inpout32.dll เพียงตัวเดียวเท่านั้นครับ)

Inpout32.dll ไลบรารีพิเศษที่ใช้ในการเขียนโปรแกรมติดต่อพอร์ตขนาน

สำหรับการเขียนโปรแกรมเพื่อควบคุมอุปกรณ์ภายนอกผ่านทาง พอร์ตขนาน ด้วย Visual Basic นั้น ตัว VB เองนั้นก็สามารถทำได้ดี แต่การเขียนโปรแกรมควบคุมอุปกรณ์ภายนอกนั้น Visual Basic ไม่มีฟังก์ชันสำหรับติดต่อกับ Parallel Port ได้โดยตรง แต่สามารถเขียนโปรแกรมให้ติดต่อกับ Parallel Port ได้โดยใช้ฟังก์ชันที่เตรียมมาในรูปของฟังก์ชัน API โดยเราสามารถอ่านข้อมูล และส่งข้อมูล ไปยังพอร์ตที่ต้องการได้ สำหรับไฟล์ Inpout32.dll ที่ผมกล่าวถึงนี้ ผู้อ่านสามารถเข้าไปดาวน์โหลดได้จาก http://www.logix4u.net/inpout32.htm สามารถดาวน์โหลดได้ฟรีครับ

ดาวน์โหลดไฟล์ Inpout32.dll

การติดตั้งไฟล์ Inpout32.dll    

สำหรับการติดตั้งไฟล์ Inpout32.dll นั้นเมื่อเราทำการดาวน์โหลดมาแล้วให้ทำการคลายซิปไฟล์ออกมาก่อน แล้วนำไฟล์ Inpout32.dll ก็อปปี้ลงในโฟลเดอร์ System ของระบบ Windows

  •      ถ้าเป็น Windows 95, 98          ให้ก็อปปี้ไว้ที่โฟลเดอร์ C:\Windows\System
  •      ถ้าเป็น Windows Me, 2000, XP     ให้ก็อปปี้ไว้ที่โฟลเดอร์ C:\Windows\System32 หรือ C:\Winnt\System32

สำหรับไฟล์ที่ผมได้แนะนำให้เข้าไปดาวน์โหลดนั้น หลังจากที่ได้ทำการคลายซิปแล้ว จะเห็นว่าทาง ผู้พัฒนาโปรแกรม ได้แนบตัวอย่างการใช้งานมาด้วย ซึ่งเราสามารถศึกษาและทดลองใช้งานได้ครับ

ฟังก์ชันที่ใช้ในการติดต่อกับ Parallel Port   

     ในไฟล์ Inpout32.dll จะมีฟังก์ชันที่เราสามารถสั่งงานพอร์ตขนานได้ โดยมีฟังก์ชันที่เราจะให้งานดังนี้

          Inp (n)

ย่อมาจาก Input from port เป็นคำสั่งที่ใช้รับข้อมูลทีละ 1 ไบต์จากพอร์ตที่กำหนด ปกติจะใช้คู่กับ Out หมายเลขของพอร์ต คือค่าของ n

          Out portnumber, data

เป็นคำสั่งที่ใช้สำหรับส่งข้อมูลออกทาง Output Port ค่าของ portnumber จะเป็นเลขจำนวนเต็ม และ data จะมีค่าอยู่ระหหว่าง 0 ถึง 255

     สำหรับการเรียกใช้งานฟังก์ชันใน Visual Basic6 นั้นเราจะเรียกใช้งานเช่นเดียวกับการเรียกใช้ฟังก์ชัน Windows API

การประกาศฟังก์ชันเพื่อเรียกใช้ไฟล์ Inpout32.dll ใน Visual Basic

     ในการเรียกใช้งานไฟล์ Inpout32.dll นั้นเราจะต้องทำการประกาศฟังก์ชันที่หน้าต่างของ Code Window เสียก่อนดังนี้ครับ
สำหรับการประกาศฟังก์ชันเพื่อเรียกใช้งานไฟล์ Inpout32.dll สำหรับการรับข้อมูล

Private Declare Function Inp Lib "inpout32.dll" Alias "Inp32" (ByVal PortAddress As Integer) As Integer

สำหรับการประกาศฟังก์ชันเพื่อเรียกใช้งานไฟล์ Inpout32.dll สำหรับการส่งข้อมูล

Private Declare Sub Out Lib "inpout32.dll" Alias "Out32" (ByVal PortAddress As Integer, ByVal Value As Integer)