<?=iconv_substr("ข้อความของฉันที่จะตัด",0,320, "UTF-8")."...";?>
Dim stm: Set stm = CreateObject("ADODB.Stream") stm.CharSet = "utf-8" stm.Open stm.LoadFromFile(file.Path) Dim str: str = stm.ReadText() ..... ..... .....
เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง