Dim strSQL As String Connection = "Database=account ;Data Source=localhost;User Id=root;Password=root;Allow Zero Datetime=true" strSQL = "UPDATE account_num SET " & _ "User = '" & Me.User.Text & "' " & _ ",Password = '" & Me.Password.Text & "' " & _ "WHERE User = '" & Me.User.Text & "' " objConn = New MySqlConnection(Connection) objConn.Open() With objCmd .Connection = objConn .CommandText = strSQL .CommandType = CommandType.Text End With Me.User.Visible = False Try objCmd.ExecuteNonQuery() Me.User.Text = " บันทึกข้อมูลของคุณเเล้ว" Me.User.Visible = True Catch ex As Exception MessageBox.Show("Error while inserting record on table..." & ex.Message, "Insert Records") Finally End Try objConn.Close() objConn = Nothing
เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง