% Set FileObject = Server.CreateObject("Scripting.FileSystemObject") Dir = Request.ServerVariables("SCRIPT_NAME") Dir = StrReverse(Dir) Dir = Mid(Dir, InStr(1, Dir, "/")) Dir = StrReverse(Dir) HitsFile = Server.MapPath(Dir) & "\hitcounter\hits_aerobic_suansiam.txt" On Error Resume Next Set InStream= FileObject.OpenTextFile (HitsFile, 1, false ) OldHits = Trim(InStream.ReadLine) NewHits = OldHits +1 Set OutStream= FileObject.CreateTextFile (HitsFile, True) OutStream.WriteLine(NewHits) %>
ครอบครัวสุขสันต์ รวมพลังสร้างสุขภาพ วันดอกไม้งาม ที่สวนสยาม
เล่าให้ฟังโดย.. รุจิรา-Kai.com วันเสาร์ที่ 17 ส.ค. 45 เดินทางออกจากบ้านประมาณ 3 โมงเย็น ไปสวนสยามเพื่อเก็บภาพบรรยากาศงานนี้เพราะมีการเต้นแอโรบิค ด้วย และเป็นกิจกรรมที่ดีมากงานหนึ่ง เป็นการรณรงค์ถึงความสำคัญของการส่งเสริมสุขภาพ (เพื่อสนับสนุนนโยบายของรัฐบาลที่กำหนดให้ปี พ.ศ.2545 เป็นปีแห่งการสร้างสุขภาพ และเฉลิมฉลองเดือนสิงหาคม เดือนแห่งครอบครัวสุขสันต์ หนึ่งในโครงการเที่ยวทั่วไทยไปได้ทุกเดือน ของการท่องเที่ยวแห่งประเทศไทย ) งานนี้ฟรี ผู้ที่มาร่วมเต้นแอโรบิกทุกท่าน จะได้รับคูปองแลกอาหารและเครื่องดื่มมูลค่า 50 บาท เสื้อยืดฟรีคนละ1ตัว และสวนสยามได้มอบบัตรเชิญ เที่ยวสวนสยามฟรี 1 ท่าน ใช้ลดค่าผ่านประตู 50% สำหรับผู้ติดตาม 5 ท่าน หมดเขต 30 ธันวาคม 2545 ส่วนเราไปในนามเวปไซต์ Thairunning.com เป็นสื่อบนอินเตอร์เน็ต และสื่อมวลชนจากหนังสือพิมพ์ต่างๆ จะได้เป็น พวงกุญแจ fuji film 2002 Fifa World Cup Korea Japan และบัตรพลาสติค SI-AM PASS เที่ยวสวนสยามฟรี 1 ท่านผู้ติดตาม5ท่านลด 50 % บัตรหมดอาย 31 มี.ค46 มูลค่า 390 บาท บรรยากาศภายในสวนพฤกษชาติสวนสยาม คึกคักไปด้วยนักเต้นแอโรบิคสาวๆเต็มไปหมด ต่างทะยอยกันมาเพราะจะเริ่มเต้นประมาณ 5 โมงเย็น เราไปถึงสวนสยามก่อน 4 โมงเย็น เดินตรงไปเก็บภาพกิจกรรมต่างๆในการรณรงค์กำจัดยุงลาย (งานนี้เป็นความร่วมมือกันระหว่าง กระทรวงสาธารณสุข การท่องเที่ยวแห่งประเทศไทย และบริษัทอมรพันธุ์นคร-สวนสยามจำกัด ) เด็กๆต่างสนุกสนานกับเกมกำจัดยุงลาย ซึ่งมีรางวัลมาดึงดูดใจเด็กให้สนใจหาความรู้เรื่องยุงลายตอบถูกมีรางวัลให้ นอกจากนั้นจะนำดาราวัยรุ่นน้องฟิล์ม นางเอกละครโก๋ตี๋กี๋หมวย มาร่วมเกมยุงลาย บนเวทีรณรงค์เรื่องยุงลายก็มีวงดนตรีขนาดใหญ่ ไว้ให้ชมคอนเสริ์ต ยุงลายจ๋าลาก่อน โดยกรมควบคุมโรคติดต่อ นอกจากนั้นยังมีวงโยธวาทิต เพื่อบรรงเลงเพลงมหาฤกษ์ เมื่อประธานในพิธี คือท่านรัฐมนตรีสุดารัตน์ เกยุราพันธุ์ เดินทางมาถึงเมื่อเวลาประมาณ 17.00 น งานนี้มีท่านผู้มีเกียรติมาร่วมงานในครั้งนี้หลายท่าน อาทิเช่น บิ๊กหอย- ธวัชชัย สัจจกุล ท่านผู้กำกับ สน.โคกคราม พ.ต.อ.สันต์ ประสงค์ นพ.รณภพ ปัทมะดิษ คุณเจียรนัย ฯลฯ ทุกๆท่านหน้าตายิ้มแย้ม สมกับงานครอบครัวสุขสันต์ทั้งเจ้าภาพและแขกที่มาร่วมงานจะเห็นภาพเจ้าของสวนสยามนายไชยวัฒน์ เหลืองอมรเลิศ สวมเสื้อลายดอกไม้สดใสพร้อมลูกสาวน่ารักๆช่วยกันต้อนรับแบบกันเอง บิ๊กหอยใส่เสื้อสีสวยสดใสดูเด่นสะดุดตา ทำเอาสาวๆขอถ่ายรูปคู่กับท่านเป็นแถว บางสาวขอให้ท่านโอบกอดซะด้วยนะ นี่ถ้าเป็นลูกตุ้ยสงสัยถูกสาวๆหอมแก้ม ส่วนท่านผู้กำกับสันต์ ก็มาในชุดเครื่องแบบตำรวจเต็มยศ แต่หน้าตายิ้มแย้มใจดีเป็นมิตรกับประชาชน เมื่อไก่ขอถ่ายภาพท่านแล้วท่านย้ำแล้วย้ำอีกมีอะไรเชิญนะครับ ยินดีรับใช้ อย่างนี้ประชาชนก็อุ่นใจ ส่วนท่านรัฐมนตรีสุดารัตน์ เมื่อแนะนำว่าเราเป็นเวปวิ่งเพื่อสุขภาพและรณรงค์ให้ประชาชนสนใจออกกำลังกาย ท่านรีบขอนามบัตร บอกว่าจะส่งข่าวสารเพื่อสุขภาพมาให้ช่วยประชาสัมพันธ์ด้วย เรายินดีประชาสัมพันธ์ให้เต็มที่ค่ะ และแล้วเวลาเต้นแอโรบิคก็มาถึงเมื่อเสียงเพลงดังขึ้น ช่างกระหึ่มเร้าใจเสียจริงๆ เหล่า ครูนำเต้นแอโรบิคก็ก้าวขึ้นบนเวทีรวดเดียว 7 คน เรียกเสียงกริ๊ดดังลั่นเพราะแต่ละท่านอยากเต้นเต็มทนแล้วหลังจากที่ได้อุ่นเครื่องไปก่อน 10 นาที ช่วงที่รอรัฐมนตรีมาเปิดงาน มีนักเต้นแอโรบิคมาจากชมรมต่างๆเช่นสวนพฤกษ์ ,รามฯ งานนี้มีนักเต้นร่วม 500 คน ทุกคนต่างใส่อารมณ์กันสุดสวิงริงโก้ วาดลวดลาย ยักย้ายส่ายสะโพก ยกแขน ยกขา ไปตามลีลา และจังหวะอันเร้าใจ อีกทั้งท่าเต้นที่มากด้วยอารมณ์มันส์ๆของพวกครูแอโรบิกซึ่งล้วนแต่เป็นหนุ่มสาววัยโจ๋ มันส์แค่ไหน ต้องถามบิ๊กหอยยังแอบไปยืนขยับแข้งขาข้างเวที และ เมื่อ Kai.com ถ่ายภาพได้มากแล้วก็ลงไปแจมเต้นกับเขาด้วยช่วง 10 นาที สุดท้าย เครื่องกำลังติด ว้า หมดเวลาซะแล้วฝนเริ่มลงเม็ดเปาะแปะอีกต่างหาก และแล้วงานก็จบลง ด้วยความประทับใจ และประสบผลสำเร็จ เพราะสังเกตุจากประชาชนที่มาเที่ยวงานสวนสยาม ก็มามุงดูนักเต้นแอโรบิคจำนวนมาก เป็นการจุดประกายให้อีกหลายคนให้หันมาออกกำลังกายได้ดีทีเดียว งานนี้ดีจัดได้ดีมากยิ่งใหญ่ตระการตาโดยเฉพาะ ภูเขาน้ำตกอลังการ เมื่อแหงนหน้าขึ้นไปมองบนยอดภูเขาจำลองจะเห็น ตัวอักษร ครอบครัวสุขสันต์ รวมพลังสร้างสุขภาพ วันดอกไม้งาม ช่างเป็นภาพที่สวยงามสุดแสนประทับใจจริง โปรดรอชมภาพบรรยากาศงานนี้ได้เร็วๆนี้
|
ผู้เยี่ยมชมตั้งแต่วันที่17ส.ค.45<% L=Len(NewHits) i = 1 For i = i to L num = Mid(NewHits,i,1) Display = Display & "" Next Response.Write Display %>