| |
การใช้งาน ASP กับ Mysql ผ่าน ODBC
มีสมาชิกหลายท่านแนะนำมาเกี่ยวกับการเขียน ASP ร่มกับ Mysql ซึ่งปกติแล้วมันก็ไม่ต่างอะไรกับ ASP กับ Access
หรือว่า ASP กับ SQL Server เพีบงแต่สามารถติดต่อผ่าน Driver ของ ODBC ซึ่งการกำหนด DSN Name ให้กับ Mysql
ต้องทำการติดตั้งโปรแกรม My ODBC ซึ่งเป็นโปรแกรมที่ทำมาในกรณีต้องการติดต่อกับ Mysql ผ่าน ODBC ครับ
Downloads โปรแกรม My ODBC ได้ที่นี่
Downloads
ที่เว็บไซต์ http://www.mysql.com
หลังจาก Downloads แล้วให้ทำการติดตั้งโปรแกรมได้เลยครับ
การติดตั้งก็ไม่มีอะไรมากมายครับ คลิก Next Next ก็เป็นอันเสร็จครับ
มาดูตัวอย่างกันหน่อยนะครับ
ขั้นแรกสุดน่าจะเป็นขั้นของการเตรียมพร้อมของฐานข้อมูล
ให้ทำการ Start Mysql พร้อมกับสร้างฐานข้อมูล ซึ่งมีรายละเอียดดังนี้
ขั้นที่ 1 การสร้างฐานข้อมูลและตาราง
ชื่อฐานข้อมูล : mydatabase
Dump ตารางและข้อมูลดังนี้
CREATE TABLE `member` (
`id` int(5) NOT NULL auto_increment,
`user` varchar(20) NOT NULL default '',
`pass` varchar(20) NOT NULL default '',
PRIMARY KEY (`id`)
) TYPE=MyISAM AUTO_INCREMENT=5 ;
INSERT INTO `member` VALUES (1, 'win', '001');
INSERT INTO `member` VALUES (2, 'onizuka', '002');
INSERT INTO `member` VALUES (3, 'Sun', '003');
INSERT INTO `member` VALUES (4, 'Max', '004');
ขั้นที่ 2 การสร้าง ODBC เพื่อ Set DNS Name
ให้เปิด Data Sources (ODBC)
ถ้าเป็น Window XP,NT,200x จะอยู่ใน Control Panel Administrative Tools
ถ้า Win95,98,Me จะอยู่ใน Control Panel
เลือกขั้นตอนดังรูป และเลือก Driver ของ Mysql ODBC ซึ่งเป็น Driver ที่เราได้ทำการติดตั้งเพิ่มขึ้นมา
คลิกที่ Test Data Source เพื่อทดสอบ
ถ้าแสดงดังรูปแสดงว่าการสร้างสำเร็จครับ เลือก OK เพื่อยืนยันการสร้าง
ขั้นที่ 3 ขั้นตอนการเขียน Code เพื่อเรียกข้อมูลในตารางมาใช้งาน
สำหรับการติดต่อกับ Mysql ผ่าน ODBC รูปแยยคำสั่งจะเหมือนกับ ASP+Access หรือ ASP+Sql Server
เพียงแต่เป็นการเรียกจาก Data Source Name ซึ่งสามารถดูและศึกษาส่วนอื่น ๆ ได้จากหัวข้อ บทเรียน ASP
รูปแบบการติดต่อกับ Mysql
Set Conn=Server.Createobject("ADODB.Connection")
Conn.Open "DSN-Name","Mysql-User","Mysql-Password"
เช่น
Set Conn=Server.Createobject("ADODB.Connection")
Conn.Open "mysample","root",""
เรามาลองกับฐานข้อมูลและตารางที่ได้สร้างขั้นมา
Sample.asp
<%
Set Conn=Server.Createobject("ADODB.Connection")
Conn.Open "mysample","root",""
sql ="Select * From member"
Set Rs = Conn.Execute(sql)
If Rs.EOF Then
%>
ไม่มีข้อมูลในตาราง !
<%Else%>
<table width="139" border="1">
<tr bgcolor="Silver">
<td>id</td>
<td>barcode</td>
</tr>
<% While Not Rs.EOF%>
<tr>
<td><%= Rs("user")%></td>
<td><%= Rs("pass")%></td>
</tr>
<% Rs.MoveNext
Wend
Rs.Close
Conn.Close
End If
%>
</table>
ผลลัพธ์ที่ได้
เพิ่มเติม
นอกจาก ASP แล้ว Mysql ยังสามารถใช้ร่วมกับภาษาอื่น ๆ ได้ เช่น
VB,VB.NET,ASP.NET,Java และอื่น ๆ ที่มีการเรียกผ่าน ODBC
|
|