ใส่ความเห็น

VB 6.0 : การใช้งานพอร์ทขนาน


เนื่องจาก 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 ก็อปปี้ลงในโฟลเดอร์ System ของระบบ Windows

ถ้าเป็น Windows 95, 98 ————–> ให้ก็อปปี้ไว้ที่โฟลเดอร์ C:WindowsSystem
ถ้าเป็น Windows Me, 2000, XP ————–> ให้ก็อปปี้ไว้ที่โฟลเดอร์ C:WindowsSystem32 หรือ C:WinntSystem32

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

ฟังก์ชันที่ใช้ในการติดต่อกับ 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)

ข้อมูลอ้างอิงจาก http://www.vbthailand.com/modules.php?name=Content&pa=showpage&pid=1

 

 

ใส่ความเห็น

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / เปลี่ยนแปลง )

Twitter picture

You are commenting using your Twitter account. Log Out / เปลี่ยนแปลง )

Facebook photo

You are commenting using your Facebook account. Log Out / เปลี่ยนแปลง )

Google+ photo

You are commenting using your Google+ account. Log Out / เปลี่ยนแปลง )

Connecting to %s

แปลเพลง VB 6.0 VB 2010 source code

VB2010 แปล แปลเพลง เนื้อเพลง VB 6.0 โหลดเพลงฟรี โหลดเพลง โหลด Mediafire เพลงลูกทุ่ง เพลงใหม่ เพลงลูกทุ่งมาใหม่ เพลงมันส์ โหลดเพลง free เพลงสตริง สตริง

Pathrix's Blog

journal and other stories

%d bloggers like this: