<% Set conn = Server.CreateObject("ADODB.Connection") conn.open "kidsquare","","" sql="SELECT * FROM hunt where id = 1 order by score " Set rs = Server.CreateObject("ADODB.Recordset") rs.Open sql, conn, 3, 3 score = 10000 name = "kids" if rs.fields("score") > 0 then if request("namewin2") <> "" and request("newhieght") <> "" and request("newhieght") > rs.fields("score") then sql = "UPDATE hunt SET name ='" & request("namewin2") & "' ,score=" & request("newhieght") if request ("email") <> "" then sql = sql & " ,email='" & request("email") & "'" else sql = sql & " ,email='webmaster@kidsquare.com'" end if sql= sql & " WHERE id=1" response.write sql Conn.Execute(sql) end if score = rs.fields("score") name = rs.fields("name") end if rs.close set rs = nothing Conn.close set conn =nothing %> Kidsquare.com--GAMES--


เกม Photo Hunt ที่ไซท์อื่น มีเยอะแยะเลยครับ เลือกกันตามใจชอบเลยครับ

ส่งเมล์บอกเพื่อน (Tell a friend) :

 

Click Here!

HOME | NEWS | FUN | GAMES | PARENTING | SHOPPING | ADVERTISE
 Copyright and disclaimer 1999-2008, Kids Square Co.,Ltd. Tel.(662) 886-4080
Best view with Internet Explorer 5.0 Any suggestion click here  

เว็บไซต์ www.kidsquare.com ของบริษัท คิดส์สแควร์ จำกัด
ซึ่งเป็นผู้ประกอบการพาณิชย์อิเล็กทรอนิกส์ ได้ดำเนินการจดทะเบียนพาณิชย์ต่อกรมพัฒนาธุรกิจการค้า
กระทรวงพาณิชย์แล้ว เมื่อวันที่ 21 กรกฎาคม 2546 ทะเบียนเลขที่ 7100403001240
eXTReMe Tracker