Dim myString As String = "TH001|2125|2125|05/21/2002|SMR|9517538460|2|1|1|21|SG" Dim myArr As Array = Split(myString, "|") Dim i As Integer Do While i <= UBound(myArr) Response.Write(": " & myArr(i) & "<br>") i += 1 Loop
เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง