<% response.buffer = true '--------PRODUCTS (P1 - P4)--------- qrystr = "select top 4 * from products where (ProductStatus like 'p%') ORDER BY ProductStatus" set rs = conn.execute(qrystr) do while (not rs.eof) select case rs("ProductStatus") case "p1" P1_ID = rs("ProductID") P1_Name = rs("ProductName") P1_Model = rs("ProductModel") P1_Shortdetail = rs("ProductShortdetail") P1_Pict = rs("ProductHomePict") case "p2" P2_ID = rs("ProductID") P2_Name = rs("ProductName") P2_Model = rs("ProductModel") P2_Shortdetail = rs("ProductShortdetail") P2_Pict = rs("ProductHomePict") case "p3" P3_ID = rs("ProductID") P3_Name = rs("ProductName") P3_Model = rs("ProductModel") P3_Shortdetail = rs("ProductShortdetail") P3_Pict = rs("ProductHomePict") case "p4" P4_ID = rs("ProductID") P4_Name = rs("ProductName") P4_Model = rs("ProductModel") P4_Shortdetail = rs("ProductShortdetail") P4_Pict = rs("ProductHomePict") end select rs.movenext : loop '--------PRODUCTS (P1 - P4)--------- '--------PRODUCTS (Feature Product)--------- qrystr = "select productid from products" set rs = conn.execute(qrystr) ProdCount = rs.recordcount randomize timer ProdIndex = fix(rnd() * ProdCount) + 1 qrystr = "select * from products" set rs = conn.execute(qrystr) if not (rs.eof) then rs.pagesize = 1 rs.absolutepage = ProdIndex Pf_ID = rs("ProductID") Pf_Name = rs("ProductName") Pf_Shortdetail = rs("ProductShortdetail") Pf_Pict = rs("ProductPict") end if '--------PRODUCTS (Feature Product)--------- '--------NEWS--------- qrystr = "select top 1 * from news ORDER BY NewsID DESC" set rs = conn.execute(qrystr) if not (rs.eof) then NewsID = rs("NewsID") NewsHead = rs("NewsHead") NewsDetail = rs("NewsDetail") NewsPict = rs("NewsPict") end if '--------NEWS--------- '--------ACTIVITIES--------- qrystr = "select top 1 * from activities ORDER BY ActivityID DESC" set rs = conn.execute(qrystr) if not (rs.eof) then ActivityID = rs("ActivityID") ActivityHead = rs("ActivityHead") ActivityDetail = rs("ActivityDetail") ActivityPict = rs("ActivityPict") end if '--------ACTIVITIES--------- '--------JOBS--------- qrystr = "select top 5 JobPosition from jobs ORDER BY JobID DESC" set rs = conn.execute(qrystr) JobData = "" do while (not rs.eof) JobData = JobData & " - " & rs("JobPosition") & "
" rs.movenext : loop '--------JOBS--------- %> Cho Thavee Dollasien Co., LTD.
 



Since 23 December 1999 has been one of the most exciting days in the company history at Cho Thavee Dollasien CO.,LTD... Why? Would there come any famous Hollywood movie star and visit their factory? No, but they might become the stars themselves by passing the ISO9001 final audit by RWTUV of Germany. The result? What a thrill and hapiness it was among all the workers when it was announced on 24 December 1999 that CTV-DOLL is now ISO9001:2000 certified manufacturer! and 04 June 2003, We are presently with the start since June 4, 2003 working on to gain the ISO ISO9001:2000! The Certificate is valid until 18 January 2009

จาก 23 ธันวาคม 2542 โรงงาน ช.ทวีฯ ได้เริ่มศึกษาระบบคุณภาพมาตรฐานของทั้งโรงงาน ที่ครอบคลุมทุกกระบวนการออกแบบ ผลิต ทุกผลิตภัณฑ์ ตามข้อกำหนดของระบบคุณภามาตรฐาน ISO9001 จนปัจจุบันโรงงานเราได้รับการรับรองระบบคุณภาพมาตรฐาน
ISO9001:2000 จากสถาบัน RWTUV ประเทศเยอรมัน โดยใบรับรองมีผลถึง 18 มกราคม 2552 ภายใต้นโยบายคุณภาพ

"ช.ทวี มีใจที่มุ่งมัน
จะสร้างสรรค์พัฒนาอย่างต่อเนื่อง
เพื่อลูกค้าพอใจ เรารุ่งเรือง
เรื่องล้อเลื่อน และรถพ่วงเราคือ โปร
ร่วมกันโชว์ ควอลิตี้ โก อินเตอร์"

  Search    
 
 
CHO THAVEE DOLLASIEN CO., LTD
Khon Kaen : 265 Moo 4 Muangkhao, Muang, Khon Kaen 40000 TH Tel : +66 43 261319-21, 341414-18 FAX : +66 43 261464, 341419 Email : info@ctvdoll.co.th
Bangkok : 96/25 Vibhavadirangsit Road, Bangkhen, Laksi, Bangkok 10210 THAILAND Tel : +66 2 9734382-4 FAX : +66 2 9734385 Email : ctvbkk@ctvdoll.co.th
  Copyright © 2002 ctvdoll.co.th