Dim sql2 = "select TypeQID from TblQuestion where TypeQID= '" & DropDownList1.SelectedValue & "'" If DropDownList1.SelectedValue = condb.QueryExecuteNonQuery(sql2) Then MessageBox("ข้อมูลซ้ำในฐานข้อมูล") End If
Dim intNumRows As Integer strSQL = "SELECT COUNT(*) FROM customer WHERE CustomerID = '"& Me.txtCustomerID.Text &"' " objCmd = New SqlCommand(strSQL, objConn) intNumRows = objCmd.ExecuteScalar() IF intNumRows > 0 Then Me.pnlAdd.Visible = False Me.lblStatus.Visible = True Me.lblStatus.Text = "CustomerID already exist." Else
เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง