thaiall logomy background
coding : intro. function.asp.
my town
Source : Perl | PHP | ASP | JSP | HTML | HTML5 | JavaScript | Java | COBOL | C++ | MS Access | VBNet | VB | Python | โค้ดดี
File : function.asp. ID : 2102
Skin : Default | Sons-of-obsidian | Sunburst | Highlighter | Full
<body><form action=function.asp target=_blank method=post>
<select name=opt size=7>
<option value=1 selected>asc(textbox.chr)
<option value=2>chr(textbox.num)
<option value=3>day("31/12/1900")
<option value=4>lcase(textbox.str) ucase(textbox.str)
<option value=5>mid(textbox.str,3,2)
<option value=6>left(textbox.str,3) right3
<option value=7>relace(textbox.str,"A","a")
<option value=8>rnd(textbox.num) randomize
<option value=9>typename(textbox)
<option value=0>soon
</select><input type=text name=textbox value=65>
<input type=submit value=process></form><hr>
<%
dim opt, val, result
opt = request.form("opt")
textbox = request.form("textbox")
if (len(opt) = 0) then opt = 0
select case opt
case 1 : result=asc(textbox)
case 2 : result=chr(textbox)
case 3 : result=day("31/12/1900")
case 4 : result=lcase(textbox)+" - "+ucase(textbox)  
case 5 : result=mid(textbox,3,2)
case 6 : result=left(textbox,3)+" - "+right(textbox,3)
case 7 : result=replace(textbox,"A","a")
case 8 
  randomize 
  result=rnd(cint(textbox))
case 9 : result=typename(textbox)
case 0 : result="Nothing in textbox"
end select
response.write("[" & result & "]")
%>
</body></html>
จำนวน : 36 บรรทัด
าษาเฮชทีเอ็มแอล (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