Discussion :

[sebasti1-88]

bonjour,

j'ai un programme que je fais sous visual basic express 2010 qui utilise la base de données local (sql server compact 3.5).

voila mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
Dim conn As SqlCeConnection = Nothing
 
conn = New SqlCeConnection("Data Source = instruction.sdf")
 
conn.Open()
 
Dim cmd As SqlCeCommand = conn.CreateCommand()
cmd.CommandText = "CREATE TABLE " & nom_table & " (ID INTEGER NOT NULL PRIMARY KEY, duree INTEGER) "
cmd.ExecuteNonQuery()
 
conn.Close()

Ca ne me met pas d'erreur, mais ça ne créer pas ma table.

Quelqu'un a t il une idée,
merci

[Pol63]

est-ce que le code est dans l'évènement Form_Load ?

[sebasti1-88]

non, je l'execute en cliquant sur un bouton.

[YodaOne]

Essaie peux être de le mettre dans une instruction de type

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
try
        cmd.ExecuteNonQuery()
        lblResults.Text = “Table Creer.”
 
      catch SqlCeException as sqlexception
        MessageBox.Show(sqlexception.Message, “Erreur Sql Serveur.”, 
        MessageBoxButtons.OK, MessageBoxIcon.Error)
 
      catch ex as Exception
        MessageBox.Show(ex.Message, “Erreur.”, MessageBoxButtons.OK, 
        MessageBoxIcon.Error);
      finally
        conn.Close()
End Try

Ce bout de code te permettra déjà de vérifier si une exception est levée.

[Pol63]

si une exception était levée, même sans try catch il serait au courant

essaye de déplacer ton .sdf ailleurs et te mettre le chemin complet dans le connectstring

[Sadar]

Bonjour,

J'ai testé et ceci fonctionne très bien :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
Imports System.Data.SqlClient
 
Public Class Form1
 
    Dim _NomTable As String = "Cust"
 
 
    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Using _cnx As New SqlClient.SqlConnection("Data Source=.\sqlexpress; Integrated Security=SSPI;Initial Catalog=Customer")
            Try
                Dim _cmd As New SqlCommand("CREATE TABLE " & _NomTable & _
                                                     " (ID INTEGER NOT NULL PRIMARY KEY, duree INTEGER) ", _cnx)
 
                _cmd.Connection.Open()
                _cmd.ExecuteNonQuery()
 
                MessageBox.Show("Table crée avec succès !!!", "SQL SERVER", _
                                                    MessageBoxButtons.OK, _
                                                    MessageBoxIcon.Asterisk)
 
            Catch SqlCeException As SqlException
                MessageBox.Show(SqlCeException.Message, _
                                                    "Erreur Sql Serveur.", _
                                                    MessageBoxButtons.OK, _
                                                    MessageBoxIcon.Error)
 
            Catch ex As Exception
                MessageBox.Show(ex.Message, _
                                "Erreur.", MessageBoxButtons.OK, _
                                MessageBoxIcon.Error)
            Finally
                _cnx.Close()
            End Try
 
        End Using
 
 
    End Sub
End Class

Si la table existe, l'utilisateur est prévenu et également s'il y a une erreur quelconque.

Il suffit de modifier la connexion si le fichier est en différé.

Je suis d'accord avec Pol63, il manque le chemin.

[Abdellah2010]

Je pense que le problème vient de la chaine de connexion qui n'est pas complète
essayez la syntaxe suivante :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
      Dim Mycon As New SqlConnection("Data source=.; Initial catalog=MaBaseDonnees; Integrated security=true")
        Dim Mycommand As New SqlCommand("Create Table Matable(.....mettez les colonnes et les propriétés....)", Mycon)
        If Mycon.State = ConnectionState.Closed Then
            Mycon.Open()
        End If
        Mycommand.ExecuteNonQuery()

[Bluedeep]

Je pense que le problème vient de la chaine de connexion qui n'est pas complète

Je pense que tu devrais examiner le contenu d'une chaine de connexion SQL CE avant de poster.