<% Set objconn=Server.CreateObject("ADODB.CONNECTION") objConn.Open "xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx" %> <% xxx=trim(request.Form("xxx")) xxx=trim(request.Form("xxx")) xxx=trim(request.Form("xxx")) xxx=trim(request.Form("xxx")) xxx=trim(request.Form("xxx")) xxx=trim(request.Form("xxx")) xxx=trim(request.Form("xxx")) strsql=xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx set objrs=server.createobject("ADODB.RECORDSET") objrs.CursorLocation = 3 objrs.CursorType = adOpenStatic objrs.open strsql,objconn Dim XML_TEXT As String = "<?xml version='1.0' encoding='UTF-8'?><XML><STATUS>OK</STATUS><DETAIL>TRAN_ID FOUND</DETAIL><URL>http://www.vitamin.co.th/Member.asp</URL></XML>" Response.Write XML_TEXT set objconn=nothing set objrs=nothing %>
เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง