Private Sub Command2_Click()
Si el registro ha sufrido alguna modificacin, se deshace los cambios
If SSaved = True Then
   dbHoteles.Recordset.CancelUpdate
Else
Si el registro no ha sufrido alguna modificacin, se borra el registro
   dbHoteles.Recordset.Delete
End If
dbHoteles.Refresh
SSaved = False
End Sub
