thaiall logomy background
coding : displaynews.asp.
my town
Source : Perl | PHP | ASP | JSP | HTML | HTML5 | JavaScript | Java | COBOL | C++ | MS Access | VBNet | VB | Python | โค้ดดี
File : displaynews.asp. ID : 4206
Skin : Default | Sons-of-obsidian | Sunburst | Highlighter | Full
<! version 2.24July46 by burin rujjanapan from yonok.ac.th>
<%
dim connect, rs, sql, tots, i, j, k, l, nextl, max
set connect = server.createobject("ADODB.Connection")
%><!--#include file="connectnews.asp"--><!--#include file="header.asp"-->
<center><font color=red size=4>
<%
if len(request.querystring("niddtl")) > 0 then
  sql = "select * from news where nid=" & request.querystring("niddtl")
  set rs = server.createobject("ADODB.recordset")
  rs.open sql,connect,1,3
  tots = rs.recordcount
  if tots > 0 then
    response.write("<table width=98% align=center border=0 cellpadding=1 cellspacing=1 bgcolor=black>")
    response.write("<tr><td width=60 colspan=2 align=right><font color=white>หัวข้อ :</td><td bgcolor=#ffffdd>")		
    response.write("<font color=blue size=4>"&rs("nshort")&"</font></td></tr><tr><td width=5></td><td colspan=2 bgcolor=white>")
    response.write("<table width=100% height=100% border=0 cellpadding=1 cellspacing=1 bgcolor=#808080><td bgcolor=white><font size=4><ul><br><dd>")
	response.write(rs("ndetail")&"<div align=right><font color=red>:: "&rs("showdate")&" ::</div></ul></td></table>")
	response.write("</td></tr><tr bgcolor=#808080><td colspan=3 align=right><font color=white>")
	response.write("วันที่กรอกข้อมูล : "& rs("ndate"))  
    response.write("</td></tr></table>")	
  else
    response.write("<br>ขอโทษ และโปรดติดต่อเจ้าหน้าที่ ที่เกี่ยวข้อง<br>เพราะไม่พบข้อมูลที่ท่านต้องการ")
    response.write("<br>เหตุการณ์แบบนี้ไม่น่าเกิดขึ้น .. ข้อมูลที่ท่านต้องการอาจหมดอายุ")	
  end if
else
  response.write("<br>ขอโทษ ท่านยังไม่ได้ระบุรหัสข้อมูลที่ต้องการ")
end if
connect.close
set rs = nothing
set connect = nothing
%></font>
<!--#include file="footer.asp"-->
จำนวน : 33 บรรทัด
าษาเฮชทีเอ็มแอล (HTML = HyperText Markup Language) คือ ภาษาคอมพิวเตอร์ที่ออกแบบมาเพื่อใช้ในการสร้างเว็บเพจที่เรียกดูผ่านทางเว็บเบราว์เซอร์ (Web Browser) เริ่มพัฒนาโดย ทิม เบอร์เนอรส์ ลี (Tim Berners Lee) ในปัจจุบัน HTML ล่าสุดคือ รุ่น 5 เป็นมาตรฐานหนึ่งของ ISO ซึ่งจัดการโดย World Wide Web Consortium (W3C) ในปัจจุบัน ทาง W3C ผลักดัน รูปแบบของ HTML แบบใหม่ ที่เรียกว่า XHTML รุ่นแรกคือ 1.0 (ม.ค.2543) ซึ่งมีโครงสร้างเป็นแบบ XML (eXtensible Markup Language)
ตัวอย่าง Hello World
ปรับปรุงโปรแกรม source.pl : 2565-07-24
Thaiall.com