1.
Private
Sub
Command1_Click()
2.
On
Error
Resume
Next
3.
data2.RecordSource =
"Insert Into Table12 values ('"
& Text1.Text &
"','"
& Text2.Text &
& Text3.Text &
"')"
4.
data2.Refresh
5.
Text4.Text =
""
6.
End
เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง