Public Sub SetDataBase() Dim db As New DataClasses1DataContext(ConDataClass.DbConnString) Dim q = From c In db.a, o In db.b Where c.username = texbox1.text and = c.password = textbox2.txt Select c End Sub
Dim db As New DataClasses1DataContext(ConDataClass.DbConnString) Dim q = From c In db.A Join b In db.B On c.AID Equals b.BID Select c
เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง