<% Message = "<HTML>" Message = Message & "<HEAD>" Message = Message & "<meta http-equiv='Content-Type' content='text/html; charset=windows-874'></head>" Message = Message & "<BODY>" Message = Message & "<b>ทดสอบ message body</b></br>" Message = Message & "</BODY>" Message = Message & "</HTML>" sch = "http://schemas.microsoft.com/cdo/configuration/" Set cdoConfig = CreateObject("CDO.Configuration") With cdoConfig.Fields .Item(sch & "sendusing") = 2 'cdoSendUsingPort .Item(sch & "languagecode") = "th" .Item(sch & "smtpserver") = "mail.timco.co.th" .update End With Set cdoMessage = CreateObject("CDO.Message") With cdoMessage Set .Configuration = cdoConfig .From = "[email protected]" .To = "[email protected]" .Subject = "ก" .HTMLBody = Message .Send End With Set cdoMessage = Nothing Set cdoConfig = Nothing %>
<% .BodyPart.Charset = "TIS-620" 'Add %>
เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง