1.
string
SqlQueryString =
"Select Max([ID]) + 1 As [ID] From [MyTable]"
;
01.
Cls.Con.Close()
02.
Cls.Con.Open()
03.
04.
Sql =
"SELECT max(id)+1 as id FROM ชื่อตารางที่จะดึง "
05.
Dim
Cmd
As
New
SqlCommand(Sql, Cls.Con)
06.
Rs
SqlDataReader = Cmd.ExecuteReader
07.
If
Rs.Read
Then
08.
textbox1.text= Rs(
"id"
)
09.
endif
เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง
