 Private Sub Command3_Click()
Si el registro esta listo para ser guardado, se actualiza el registro, y se
establece la bandera Ssaved (Pendiente de guardar) a falso
    If SSaved = True Then
       dbHoteles.Recordset.Update
       dbHoteles.Refresh
    End If
    SSaved = False
End Sub
