Discussion :

[Massigne]

Salut j'ai créé une application en VB.net sous visual studio 2015 une application de gestion d'une usine de production. Mais lorsque j'installe l'application sur un poste ne contenant pas sql server, la partie crystal report pour l'affiche des mes données m'affiche la page suivante


Voila la chaine de connexion

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
Imports System.Data.SqlClient
Imports System.IO
Module Procedure
    Public con As New SqlConnection
    Public cmd As New SqlCommand
    Public da As New SqlDataAdapter
    Public ds As New DataSet
    Public dt As New DataTable
    Public bs As New BindingSource
    Public dr As SqlDataReader
    Public i As Integer
    Public a As New OpenFileDialog
    Public Sub connecter()
        Try
 
            con.ConnectionString = "Data Source=(LocalDB)\MSSQLLocalDB;AttachDbFilename='" & GetpathOfDatabase() & "';Integrated Security=True"
 
            con.Open()
            MsgBox("Connection réussit")
        Catch ex As Exception
            MsgBox("Echec de la connection")
        End Try
 
    End Sub
    Function GetpathOfDatabase() As String
        For Each ee As String In My.Computer.FileSystem.GetFiles(".\")
            If ee.Contains(".mdf") Then
                Return ee
            End If
        Next
        Return Nothing
    End Function

Et le Code pour l'affiche d'un état est le suivant:

Code :

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

1
2
3
4
 Dim r As New CarteProf
        r.SetDataSource(ds)
        Form7.CrystalReportViewer1.ReportSource = r
        Form7.Show()

Sur mon ordinateur, l'application fonction très bien mais lorsque j'installe sur un autre ordinateur, la partie crystal Report ne fonctionne plus. Aider moi je vous prie