IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VB.NET Discussion :

Controler une table dans access [Débutant]


Sujet :

VB.NET

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé
    Profil pro
    Inscrit en
    Septembre 2008
    Messages
    625
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Septembre 2008
    Messages : 625
    Par défaut Controler une table dans access
    bonjour,
    apres recherches dans differents forum je n' ai pas trouver de réponses a mes questions.
    et il possible de restreindre le nombre d'enregistrements d'une table access a partir de vb net( limiter la table à 10 enregistrements, si tentative de depassement = message d'alerte).
    via access voici le code,est il possible de l'adapter pour vb net:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    if Me.CurrentRecord > 10 Then
        MsgBox "enregistrement autorisé atteint"
        Cancel = True
    End If
    peut on afficher avant enregistrement dans une table le nombre actuel d'enregistrement?

    merci

  2. #2
    Membre Expert Avatar de _Ez3kiel
    Homme Profil pro
    Développeur .NET
    Inscrit en
    Janvier 2013
    Messages
    836
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 33
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : Développeur .NET
    Secteur : Administration - Collectivité locale

    Informations forums :
    Inscription : Janvier 2013
    Messages : 836
    Par défaut
    Et avec un Select Count(*) avant ta requête d'insertion ? Et tu testes que le résultat soit inférieur/égale à 10 ...

    (Pourquoi vouloir faire ça en Vb.NET et pas dans la BDD ? )

  3. #3
    Membre éclairé
    Profil pro
    Inscrit en
    Septembre 2008
    Messages
    625
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Septembre 2008
    Messages : 625
    Par défaut
    j'ai essaye cela mais cela n'a pas l'air de fonctionné est ce que j'aurrai oublié quelquechose?
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    Dim enregistrement As integer = ("select count(*) from  {0}"), basdef)
                If enregistrement > 10 Then
                    MsgBox("enregistrement atteint")
                End If
                SQLstr = String.Format("INSERT INTO  {0} (ChmAcc,Etiq) VALUES ('" & Recherche_AVI.Text & "','" & isole_nom(Etiq) & "') ", basdef)
     
                cnn.Close()

    merci

  4. #4
    Membre Expert Avatar de _Ez3kiel
    Homme Profil pro
    Développeur .NET
    Inscrit en
    Janvier 2013
    Messages
    836
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 33
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : Développeur .NET
    Secteur : Administration - Collectivité locale

    Informations forums :
    Inscription : Janvier 2013
    Messages : 836
    Par défaut
    Citation Envoyé par chuspyto Voir le message
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    Dim enregistrement As integer = ("select count(*) from  {0}"), basdef)
                If enregistrement > 10 Then
    Je ne comprend pas trop la syntaxe que tu utilises ...

    Dans le doute je te propose plutôt celle que je connais (plus ou moins) ...

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
                Dim req As SqlCommand = New SqlCommand("select count(*) from " & basedef, cnn)
                Dim nbEnregistrement As Integer = CInt(req.ExecuteScalar)
     
                If nbEnregistrement > 10 Then
                    MsgBox("enregistrement atteint")
                Else
                    'ton traitement que je ne comprend pas : 
                    SQLstr = String.Format("INSERT INTO  {0} (ChmAcc,Etiq) VALUES ('" & Recherche_AVI.Text & "','" & isole_nom(Etiq) & "') ", basdef)
     
                End If
     
                cnn.Close()

    Et je réitère pourquoi traiter cela au niveau de l'appli et pas de la BDD ?

  5. #5
    Membre éclairé
    Profil pro
    Inscrit en
    Septembre 2008
    Messages
    625
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Septembre 2008
    Messages : 625
    Par défaut
    Dans la base de données je me retrouve avec des messages d erreur,pour cela que j'ai voulu essayé cela en vb net.
    Pour info basdef prend le nom d une table en fonction de certaines condition(cases à cocher)

  6. #6
    Membre Expert Avatar de _Ez3kiel
    Homme Profil pro
    Développeur .NET
    Inscrit en
    Janvier 2013
    Messages
    836
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 33
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : Développeur .NET
    Secteur : Administration - Collectivité locale

    Informations forums :
    Inscription : Janvier 2013
    Messages : 836
    Par défaut
    Je me doute mais c'est la notion de remplacement de {0} par basedef que je ne connais pas... et le Dim enregistrement As integer = ("select count(*) from {0}"), basdef)

    Mais j'insiste sur le fait que c'est à Access de traiter ca, lorsque tu auras plus de 10, il sortira une erreur, que tu catcheras dans ton appli pour informer l'user qu'il y a 10 enregistrements dans la table.

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Mise à jour d'une table dans access avec un dataset
    Par San Soussy dans le forum ADO.NET
    Réponses: 2
    Dernier message: 15/04/2014, 11h56
  2. [Débutant] Comment afficher ligne x colonne Y d'une table dans access avec vs2012
    Par JetLibre dans le forum VB.NET
    Réponses: 2
    Dernier message: 04/08/2013, 22h23
  3. Duplication d'une table dans access
    Par Chourouk2012 dans le forum Access
    Réponses: 2
    Dernier message: 10/08/2012, 09h22
  4. [AC-2007] importer une table dans access
    Par titi57 dans le forum Requêtes et SQL.
    Réponses: 1
    Dernier message: 09/01/2010, 10h32
  5. Creation d'une table dans ACCESS avec le composant TADOTABLE ?
    Par QAYS dans le forum Bases de données
    Réponses: 2
    Dernier message: 08/10/2008, 17h39

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo