En VB je veux lier des tables Access. Ca se lie effectivement avec
Transfertdatabase, mais comment les delier avant parce qu'au lieu de
remplacer les tables qui ont le même nom ca fait : nomTable(1), nomTable(2).
Donc je veux les délier avant. Comment faire?
ça , ça pose problème pour les tables liées, car c'est de la structure pure et dure d'une table. je n'ai pas de solution à l'instant.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"La Mouette" a écrit dans le message de news:
ok.. en leur donnant le droit de 'Modifier la structure' ca fonctionne. Mais ce n'est pas très logique je trouve.
Comment empêcher mes utilisateur d'avoir accès aux tables seulement par l'entremise des formulaires? C'est - à - dire ne pas leur donner le droit de voir le petite fenêtre qui énumère tous les objets de la bd.
ça , ça pose problème pour les tables liées, car c'est de la structure pure
et dure d'une table. je n'ai pas de solution à l'instant.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"La Mouette" <LaMouette@discussions.microsoft.com> a écrit dans le message
de news: 69BD7A8C-853E-49E2-A0CE-780B4CA91566@microsoft.com...
ok.. en leur donnant le droit de 'Modifier la structure' ca fonctionne.
Mais
ce n'est pas très logique je trouve.
Comment empêcher mes utilisateur d'avoir accès aux tables seulement par
l'entremise des formulaires? C'est - à - dire ne pas leur donner le droit
de
voir le petite fenêtre qui énumère tous les objets de la bd.
ça , ça pose problème pour les tables liées, car c'est de la structure pure et dure d'une table. je n'ai pas de solution à l'instant.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"La Mouette" a écrit dans le message de news:
ok.. en leur donnant le droit de 'Modifier la structure' ca fonctionne. Mais ce n'est pas très logique je trouve.
Comment empêcher mes utilisateur d'avoir accès aux tables seulement par l'entremise des formulaires? C'est - à - dire ne pas leur donner le droit de voir le petite fenêtre qui énumère tous les objets de la bd.
La Mouette
Merci encore pour ton aide à mes nombreuses questions.
J'ai fini par me débrouiller avec ca pour empêcher de voir la fenêtre de BDD:
End Sub Sub RetireProtection() ModifiePropr "StartupShowDBWindow", dbBoolean, True ModifiePropr "StartupShowStatusBar", dbBoolean, True ModifiePropr "AllowBuiltinToolbars", dbBoolean, True ModifiePropr "AllowFullMenus", dbBoolean, True ModifiePropr "AllowBreakIntoCode", dbBoolean, True ModifiePropr "AllowSpecialKeys", dbBoolean, True ModifiePropr "AllowBypassKey", dbBoolean, True End Sub
Function ModifiePropr(chNomPropriété As String, varTypeProp As Variant, varValeurProp As Variant) As Integer Dim bds As Database, prp As DAO.Property Const conErreurPropNonTrouvée = 3270
Set bds = CurrentDb() ' MsgBox ("Avant on erreur") On Error GoTo Change_Err
bds.Properties(chNomPropriété) = varValeurProp
ModifiePropr = True
Change_Sortie: Exit Function
Change_Err: If Err = conErreurPropNonTrouvée Then ' Propri t non trouv e. Set prp = bds.CreateProperty(chNomPropriété, varTypeProp, varValeurProp) bds.Properties.Append prp Resume Next Else ' Erreur inconnue. ModifiePropr = False Resume Change_Sortie End If End Function
ça , ça pose problème pour les tables liées, car c'est de la structure pure et dure d'une table. je n'ai pas de solution à l'instant.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"La Mouette" a écrit dans le message de news:
ok.. en leur donnant le droit de 'Modifier la structure' ca fonctionne. Mais ce n'est pas très logique je trouve.
Comment empêcher mes utilisateur d'avoir accès aux tables seulement par l'entremise des formulaires? C'est - à - dire ne pas leur donner le droit de voir le petite fenêtre qui énumère tous les objets de la bd.
Merci encore pour ton aide à mes nombreuses questions.
J'ai fini par me débrouiller avec ca pour empêcher de voir la fenêtre de BDD:
End Sub
Sub RetireProtection()
ModifiePropr "StartupShowDBWindow", dbBoolean, True
ModifiePropr "StartupShowStatusBar", dbBoolean, True
ModifiePropr "AllowBuiltinToolbars", dbBoolean, True
ModifiePropr "AllowFullMenus", dbBoolean, True
ModifiePropr "AllowBreakIntoCode", dbBoolean, True
ModifiePropr "AllowSpecialKeys", dbBoolean, True
ModifiePropr "AllowBypassKey", dbBoolean, True
End Sub
Function ModifiePropr(chNomPropriété As String, varTypeProp As Variant,
varValeurProp As Variant) As Integer
Dim bds As Database, prp As DAO.Property
Const conErreurPropNonTrouvée = 3270
Set bds = CurrentDb()
' MsgBox ("Avant on erreur")
On Error GoTo Change_Err
bds.Properties(chNomPropriété) = varValeurProp
ModifiePropr = True
Change_Sortie:
Exit Function
Change_Err:
If Err = conErreurPropNonTrouvée Then ' Propri t non trouv e.
Set prp = bds.CreateProperty(chNomPropriété, varTypeProp,
varValeurProp)
bds.Properties.Append prp
Resume Next
Else
' Erreur inconnue.
ModifiePropr = False
Resume Change_Sortie
End If
End Function
ça , ça pose problème pour les tables liées, car c'est de la structure pure
et dure d'une table. je n'ai pas de solution à l'instant.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"La Mouette" <LaMouette@discussions.microsoft.com> a écrit dans le message
de news: 69BD7A8C-853E-49E2-A0CE-780B4CA91566@microsoft.com...
ok.. en leur donnant le droit de 'Modifier la structure' ca fonctionne.
Mais
ce n'est pas très logique je trouve.
Comment empêcher mes utilisateur d'avoir accès aux tables seulement par
l'entremise des formulaires? C'est - à - dire ne pas leur donner le droit
de
voir le petite fenêtre qui énumère tous les objets de la bd.
End Sub Sub RetireProtection() ModifiePropr "StartupShowDBWindow", dbBoolean, True ModifiePropr "StartupShowStatusBar", dbBoolean, True ModifiePropr "AllowBuiltinToolbars", dbBoolean, True ModifiePropr "AllowFullMenus", dbBoolean, True ModifiePropr "AllowBreakIntoCode", dbBoolean, True ModifiePropr "AllowSpecialKeys", dbBoolean, True ModifiePropr "AllowBypassKey", dbBoolean, True End Sub
Function ModifiePropr(chNomPropriété As String, varTypeProp As Variant, varValeurProp As Variant) As Integer Dim bds As Database, prp As DAO.Property Const conErreurPropNonTrouvée = 3270
Set bds = CurrentDb() ' MsgBox ("Avant on erreur") On Error GoTo Change_Err
bds.Properties(chNomPropriété) = varValeurProp
ModifiePropr = True
Change_Sortie: Exit Function
Change_Err: If Err = conErreurPropNonTrouvée Then ' Propri t non trouv e. Set prp = bds.CreateProperty(chNomPropriété, varTypeProp, varValeurProp) bds.Properties.Append prp Resume Next Else ' Erreur inconnue. ModifiePropr = False Resume Change_Sortie End If End Function
ça , ça pose problème pour les tables liées, car c'est de la structure pure et dure d'une table. je n'ai pas de solution à l'instant.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"La Mouette" a écrit dans le message de news:
ok.. en leur donnant le droit de 'Modifier la structure' ca fonctionne. Mais ce n'est pas très logique je trouve.
Comment empêcher mes utilisateur d'avoir accès aux tables seulement par l'entremise des formulaires? C'est - à - dire ne pas leur donner le droit de voir le petite fenêtre qui énumère tous les objets de la bd.
