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 :

Test création base ACCESS [Débutant]


Sujet :

VB.NET

  1. #1
    Membre confirmé
    Homme Profil pro
    Inscrit en
    Août 2011
    Messages
    103
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Vosges (Lorraine)

    Informations forums :
    Inscription : Août 2011
    Messages : 103
    Par défaut Test création base ACCESS
    Bonjour
    Je désire créer une base de données au 1er lancement de l'appli, je test donc si l'appli existe ou pas mais le code reconnait quand l'appli n'est pas crée mais pas l'inverse
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    Try
                If (("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & My.Application.Info.DirectoryPath & "\Film.accdb") Is Nothing) Then
                    MsgBox("Base existante")
                Else
                    MsgBox("Base inexistante")
                    MsgBox("Création de la base de données : FILM", MessageBoxIcon.Information, MessageBoxButtons.OK)
                    db.Create("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & My.Application.Info.DirectoryPath & "\Film.accdb")
                    MsgBox("Base créer")
                End If
     
            Catch
     
            End Try
    Merci

  2. #2
    Membre expérimenté
    Homme Profil pro
    Inscrit en
    Février 2003
    Messages
    2 193
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 44
    Localisation : Belgique

    Informations forums :
    Inscription : Février 2003
    Messages : 2 193
    Par défaut
    pourquoi ne pas faire un simple File.Exists(path)?

  3. #3
    Membre confirmé
    Homme Profil pro
    Inscrit en
    Août 2011
    Messages
    103
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Vosges (Lorraine)

    Informations forums :
    Inscription : Août 2011
    Messages : 103
    Par défaut
    Oui exact, je viens de trouvé la solution

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
     
    If System.IO.File.Exists("film.accdb") Then
                MsgBox("oui")
    Else
                MsgBox("non")
    End If
    Pas bessoins de mettre c: en faite, code testé

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

Discussions similaires

  1. [AC-2010] Création base Access avec DBVersion40 et réparation à l’ouverture
    Par Brasileiro dans le forum VBA Access
    Réponses: 4
    Dernier message: 28/06/2012, 00h23
  2. Création Base Access
    Par frogs dans le forum VBA Access
    Réponses: 2
    Dernier message: 02/10/2008, 15h17
  3. Création base access
    Par manpel dans le forum Access
    Réponses: 1
    Dernier message: 29/08/2007, 17h53
  4. VBScript : création base Access pour import fichier XML
    Par abertaud dans le forum VBA Access
    Réponses: 3
    Dernier message: 02/04/2007, 14h35
  5. VBScript : création base Access pour import fichier XML
    Par abertaud dans le forum VBScript
    Réponses: 1
    Dernier message: 02/04/2007, 14h34

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