Top 50 Popular Supplier
1 100,000D_อินเวอร์เตอร์ 176,798
2 100,000D_มิเตอร์วัดไฟฟ้า 174,171
3 100,000D_อุปกรณ์ไฟฟ้าและอิเลคทรอนิกส์ 173,457
4 100,000D_เครื่องมือช่าง 173,452
5 100,000D_เอซีมอเตอร์ 170,913
6 100,000D_ดีซีมอเตอร์ 170,029
7 100,000D_อุปกรณ์แคมป์ปิ้ง 169,006
8 100,000D_เครื่องดื่มและสมุนไพร 168,295
9 เคอีบี (KEB ) ประเทศไทย 161,146
10 100,000D_เครื่องใช้ไฟฟ้าครัวเรือน 158,818
11 100,000D_ของใช้จำเป็นสำหรับผู้หญิง 158,773
12 100,000D_ขายของเล่นเด็ก 157,973
13 E&L INTERNATIONAL CO., LTD. 68,318
14 T.N. METAL WORKS Co., Ltd. 62,816
15 ฟิลิปส์อิเล็กทรอนิกส์ (ประเทศไทย) จำกัด 51,160
16 บ.ไทนามิคส์ จำกัด 44,053
17 Industrial Provision co., ltd 39,850
18 ลาดกระบัง ทูลส์ แอนด์ ดาย จำกัด 38,798
19 Infinity Engineering System Co.,Ltd 36,713
20 สยาม เอลมาเทค (siam elmatech) 35,041
21 ไทยเทคนิค อีเล็คตริค จำกัด 33,974
22 ฟอร์จูน เมคคานิค แอนด์ ซัพพลาย 32,322
23 เอเชียเทค พาวเวอร์คอนโทรล จำกัด 31,741
24 บริษัท เวิลด์ ไฮดรอลิคส์ จำกัด 31,469
25 โปรไดร์ฟ ซิสเต็ม จำกัด 27,975
26 ซี.เค.แอล.โพลีเทค เอ็นจิเนียริ่ง 26,969
27 P.D.S. Automation co.,ltd 23,347
28 AVERA CO., LTD. 23,102
29 เลิศบุศย์ 22,062
30 ห้างหุ้นส่วนสามัญ เอ-รีไซเคิล กรุ๊ป 20,820
31 เทคนิคอล พรีซิชั่น แมชชีนนิ่ง 20,714
32 Electronics Source Co.,Ltd. 20,327
33 แมชชีนเทค 20,316
34 อีดีเอ อินเตอร์เนชั่นเนล จำกัด 19,576
35 มากิโน (ประเทศไทย) 19,545
36 ทรอนิคส์เซิร์ฟ จำกัด 19,286
37 Pro-face South-East Asia Pacific Co., Ltd. 18,963
38 SAMWHA THAILAND 18,740
39 วอยก้า จำกัด 18,406
40 CHEMTEC AUTOMATION CO.,LTD. 17,978
41 IWASHITA INSTRUMENTS (THAILAND) LTD. 17,824
42 เอส.เอส.บี สยาม จำกัด 17,759
43 ดีไซน์ โธร แมนูแฟคเจอริ่ง 17,725
44 I-Mechanics Co.,Ltd. 17,670
45 ศรีทองเนมเพลท จำกัด 17,602
46 Intelligent Mechantronics System (Thailand) 17,595
47 Systems integrator 17,156
48 เอ็นเทค แอสโซซิเอท จำกัด 17,101
49 Advanced Technology Equipment 16,934
50 ดาต้า เอ็นทรี่ กรุ๊ป จำกัด 16,898
» News » Product Highlight » PLC-HMI-SCADA-Controller
12/01/2553 20:47 น. , อ่าน 9,191 ครั้ง
Bookmark and Share
Radio Frequency Identification Technology (RFIT) คืออะไร
โดย : Admin

 
RFID คืออะไร

 โดย :  Panya       Vongpratanporn     
 <BoMGradE@hotmail.com
 
 
หลายๆ ท่านอาจยังไม่รู้จักว่า RFID คืออะไร
 
RFID คือ
 
1. ส่วนตัวเครื่องส่งสัญญาณคลื่นความถี่
2. ตัวบัตรหน่วยความจำ
Radio Frequency Identification Technology เป็นผลิตภัณฑ์ใหม่ที่เข้ามาช่วยในการจัดเก็บข้อมูลลงในรูปแบบของบัตรหรือเหรียญขนาดเล็กซึ่งสามารถอ่านและเขียนข้อมูลลงไปใน Tag ได้หลายครั้งโดยการใช้คลื่นความถี่ในการอ่านและเขียนข้อมูล ส่วนประกอบของ RFID มีด้วยกัน 2 ส่วนคือ
 
 
 

การใช้งานส่วนใหญ่

การเขียนโปรแกรมบนคอมพิวเตอร์เพื่อควบคุมและจัดเก็บข้อมูลที่อ่านและเขียนจาก RFID โดยใช้ VB นั้นไม่ยาก
ครับ เพียงแต่เราต้องรู้หลักการเบื้องต้นและมีคู่มือการรับส่งสัญญาณของอุปกรณ์ที่เราต้องการติดต่อ ในที่นี้ผมจะใช้ชุดทดลองของ ออมรอน

 
 
ขั้นตอนที่ 1
    ผมได้นำชุดทดลอง RFID มาเสียบต่อผ่านทาง USB พอร์ตของเครื่องคอมและเซ็ตคอมพอร์ตตามที่เครื่องจัดไว้ให้ หรือจะเซ็ตเอาเองก็ได้ ดังรูป
 





 
 
 ตัวส่งสัญญาณจะทำการส่งสัญญานออกไปเมื่อมีบัตรเข้ามาอยู่ในระยะที่สัญญาณไปถึงโดยที่ทั้งสองส่วนไม่จำเป็นต้องอยู่ติดกันบัตรจะถูกอ่านค่าข้อมูลที่บันทึกอยู่ในบัตรออกมาแสดงผล ระยะของการอ่านค่าก็ขึ้นอยู่กับตัวส่งสัญญาณคลื่นความถี่ถ้ายิ่งใหญ่มากสัญญาณก็ยิ่งส่งได้ไกลมากขึ้น ซึ่งเราสามารถแก้ไขข้อมูลรวมถึงเพิ่มเติมข้อมูลโดยการเขียนข้อมูลกลับลงไปใน Tag ได้ในเวลาเดียวกัน    จะใช้เก็บข้อมูลการผลิตสินค้ารายละเอียดต่างๆ ของสินค้าเพื่อใช้ในการอ้างอิงและเรียกดูข้อมูลได้โดยง่าย        ในรูปคอมพอร์ตของผมเป็น Com 5 ดังนั้นถ้าผมต้องการติดต่อกับ RFID ผมต้องเปิดพอร์ตเป็น Com 5 เพื่อให้ตรงกับที่เครื่องคอมพิวเตอร์กำหนดให้หลังจากนั้นก็ให้เปิดโปรแกรม VB ขึ้นมาเลือกไปที่ Standard EXE


     2. ให้คลิกขวาที่ Tool box เลือก Componentจากนั้นให้เลือก Microsoft Comm Controll 6.0 เพื่อใช้งาน Comport เพื่อติดต่อกับอุปกรณ์ภายนอก



 
 
   จะได้ไอคอนปรากฏที่ Toolbox ดังรูป จากนั้นก็ดับเบิ้ลคลิกที่รูปเป็นการเรียกใช้ MsCom control การกำหนดค่าต่างๆ ให้กับ mscom กำหนดได้ดังต่อไปนี้ให้ดับเบิ้ลคลิกที่ Form เพื่อเข้าสู่โหมดเขียนโค้ดของ VB
 
 


 
 
Private Sub Form_Load() ‘
If MSComm1.PortOpen = False Then ‘
MSComm1.Settings = "9600,e,8,1" ‘
ข้อมูล
MSComm1.CommPort = 5 ‘
MSComm1.PortOpen = True ‘
End If
End Sub
ส่วนของการอ่านข้อมูล RFID
 
 

 

 
ในฟอร์มโหลดเช็คค่าของคอมพอร์ตก่อนว่ามีการเปิดไว้หรือเปล่ากำการส่งและรับค่าข้อมูลให้กับ Com port ที่จะใช้ในการรับส่งกำหนดคอมพอร์ตเปิดคอมพอร์ตให้ใช้งานได้กลับมาที่ฟอร์ม ลาก Text box กับ botton มาวางบนฟอร์ม
 
ดับเบิ้ลคลิกที่ปุ่ม
Read Data เพื่อเขียนโค้ดดังนี้
 
Private Sub Command1
MSComm
MSComm
_Click()1.Output = "313100FFFF" + Chr$(13) ส่งคำสั่งอ่านข้อมูลไปยัง RFID1.InputLen = 1 ‘ให้รับข้อมูลจาก RFID ทีละตัว
 
Do
X = MSComm1.Input ‘
showval = showval & X ‘
Loop While X <> Chr$(
รับคำข้อมูลจาก RFID มาทีละตัวมาเก็บไว้ยังตัวแปร Xนำค่าที่ได้จากตัวแปร X มารวมกับค่าของตัวแปร showval13) ‘ให้วนลูปไปเรื่อยๆ จนพบคำสั่ง Chr(13) ซึ่งเป็นคำสั่งจบการทำงาน
 
Text1.Text = showval ‘
End Sub
ส่วนของการเขียนข้อมูลไปยัง RFID
 
 

 

 
นำข้อมูลที่ได้จากตัวแปร showval มาแสดงผลใน Textbox    ลาก Textbox กับ Botton มาวางบนฟอร์ด ดังรูป
จากนั้นเขียนโปรแกรมที่ปุ่มดังนี้
Private Sub Command2_Click()ตั้งค่าตัวแปรเป็น integer64" ‘ตั้งค่าเริ่มต้นให้ตัวแปร totalLen เพื่อเช็คค่าของตัวอักษร
wval = Text2.Text ‘
รับค่าจาก textbox ใส่ในตัวแปรชื่อ wval
vSp = 0 ‘ตั้งค่า vSp ให้เท่ากับ 0 เพื่อนำไปใช้ในส่วนคำนวณตัวอักษร
If Len(wval) > 64 Then ‘เช็คว่าตัวอักษรที่รับเข้ามาจาก textbox มีจำนวนกี่ตัวอักษร
wval = Left(wval, 64)’ถ้าเกินจาก 64 ตัวอักษรให้ตัดเอามาแค่ 64 ตัวอักษร
End If
vSp = totalLen - Len(wval) ‘เช็คจำนวณของตัวอักษรที่ขาดเพื่อจะใส่ตัวอักษรให้ครบ
For i = 1 To vSp ‘เริ่มใส่ตัวอักษร
wval = wval + " " ‘รวมจำนวนตัวอักษรเข้ากับตัวอักษรเดิมที่มีอยู่แล้วเพื่อให้ครบ 64 ตัวอักษร
Next
MSComm1.Output = "323100FFFF" + wval + Chr$(13) ‘เขียนข้อมูลลงใน Tag จำนวน 64 ตัวอักษร
End Sub
คำอธิบายเพิ่มเติม
MSComm1.Output = "323100FFFF" + wval + Chr$(13)
MSComm1.Output = “คำสั่งที่ต้องใช้ในการอ่าน/เขียนข้อมูล”
คำสั่งการเขียน/อ่านข้อมูลของ RFID โดยสามารถดูได้จาก manual ของรุ่นนั้นๆ
 
 
 
Dim i, vSp As Integer ‘
totalLen = "
 
 

========================================================

 

 

23 November 2024
:: MEMBER LOGIN
E-mail Account
Password
:: OUR SPONSORS
LZD
LZD
LZD
LZD
LZD
LZD
LZD
LZD
LZD
LZD