<%set conn = server.CreateObject("ADODB.CONNECTION") conn.open "provider=microsoft.jet.oledb.4.0;data source="&server.MapPath("kingsong.mdb") sub closedb() rs.close conn.close set rs = nothing set conn = nothing end sub %> <%sql ="select * from song where number="&request("number") set rs = server.CreateObject("ADODB.RECORDSET") rs.open sql , conn%> เพลงพระราชนิพนธ์ลำดับที่ <%=rs("number")%> เพลง <%=rs("thai")%> / <%=rs("eng")%>
บทเพลงพระราชนิพนธ์ ลำดับที่ <%=rs("number")%>
ชื่อเพลง : <%=rs("thai")%>
ทำนอง : พระบาทสมเด็จพระเจ้าอยู่หัว ภูมิพลอดุลยเดช
คำร้อง : <%=rs("tcompose")%>
ปี : <%=rs("year")%>
ฟัง : <%=rs("th")%>
เนื้อเพลง : <%=rs("tlyrics")%>

=== ภาษาอังกฤษ ===

ชื่อเพลง : <%=rs("eng")%>
ทำนอง : พระบาทสมเด็จพระเจ้าอยู่หัว ภูมิพลอดุลยเดช
คำร้อง : <%=rs("ecompose")%>
ปี : <%=rs("year")%>
ฟัง : <%=rs("en")%>
เนื้อเพลง : <%=rs("elyrics")%>

เกร็ดเพลงน่ารู้

<%=rs("his")%>
ลิขสิทธิ์เพลงเป็นของ พระบาทสมเด็จพระเจ้าอยู่หัว ภูมิพลอดุลยเดช
Create by Powadol Kumphun : Faculty of Education
(ED COMM. TECHNO) # 11 (2549)