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
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
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
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
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()
Partager