Discussion :

[Poulain]

Bonjour à tous.

voilà mon problème, je fais un programme de gestion des média, pour l'instant il est individuel, c'està dire que j'ai un prog et une base par personne. Je passerais au client serveur quand cette version fonctionnera correctement.

Bref, voici mon problème, je n'arrive pas a avoir un connectionstring qui fonctionne et pour les SQL server et pour les SQL server express.

Car, la subtilité, c'est :
- pour sql on a datasource = Nomduserver
-pour sql express on a Nomduserver\SQLexpress

Alors j'ai essayé de faire un code mais ça ne marche pas.
Et je suppose qu'à chaque fois, le server a le nom du pc.

Voici ce que j'ai fait:

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
Public Sub configconnectionstring()
        Dim key As Microsoft.Win32.RegistryKey = My.Computer.Registry.LocalMachine.OpenSubKey("Software\Médiathèque", True)
        If key Is Nothing Then
            Dim ar As DataTable
            ar = Sql.SqlDataSourceEnumerator.Instance.GetDataSources
            Dim computername As String = My.Computer.Name
            Dim datasource As String = ""
            For Each row As DataRow In ar.Rows
                If row.Item(0).ToString = computername Then
                    If row.Item(1).ToString <> "" Then
                        datasource = computername + "\" + row.Item(1).ToString
                    Else
                        datasource = computername
                    End If
                    Exit For
                End If
            Next
 
            Dim rc As Microsoft.Win32.RegistryKey = My.Computer.Registry.CurrentUser.OpenSubKey("Software", True).CreateSubKey("Médiathèque")
            rc.SetValue("Connectionstring", "Data Source=" & datasource & ";AttachDbFilename=|DataDirectory|\Médiathèque.mdf;Initial Catalog=;Integrated Security=True;User Instance=True")
            ar.Dispose()
        End If
    End Sub

et le problème de cette technique c'est que c'est long...

[LefortLudovic]

Ne pourrais tu pas mettre une connectionString dans ton fichier de config de l'application et la modifier suivant que l'application tourne sur SQL 2005 ou SQL 2005 express ?

[olsimare]

Bonjour.

Est-ce qu'on ne pourrait différencier à partir de la Version fournit via Sql.SqlDataSourceEnumerator.Instance.GetDataSources() ?

Je n'ai pas SQL Server Express donc je ne peux pas tester.

Cdt.

[Poulain]

en effet on peut savoir si c'est express ou pas.

avec

Code :

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

1
2
3
Dim ar As DataTable
            ar = Sql.SqlDataSourceEnumerator.Instance.GetDataSources
            ar.rows.items(1)

[Poulain]

Enfin, on peut le savoir, mais je n'arrive pas a le faire fonctionner correctement, en plus, ça prend du temps et ça fait planter mon appli, si on ouvre la fenetre principale trop tot, car mon appli se lance, et il n'y a qu'un icon en bas qui s'affiche.

Bref, chez moi ça marche, ça me met: datasource='nomdemonpc\SQLEXPRESS'
Et chez un autre qui a SQL serverur, ça met : datasource=''

Alors, je ne vois psa trop comment faire...

[Kropernic]

Bonjour,

Je sais pas si c'est possible mais on pourrait également imaginer quelqu'un qui ait SQL Server et SQL Server Express sur sa machine. Quelle version choisir dans ce cas ?

Si jamais ce cas peut se présenter mais bon, fallait bien y passer ^^.

Griftou.