Discussion :

[osgentleman]

Bonjour,

J'ai commencé à développer une application qui permet de vérifier la compatibilité entre un produit et un autre (ou même avec plusieurs), je dois concevoir cette table de compatibilité sur SQL Server (fichier joint), et créer un form Visual Studio avec deux Combobox pour le choix des produits avec affichage du résultat , True = Is compatible, False = Is not compatible, ainsi une autre option qui peut me permettre de masquer un produit de la dropdownlist quand je désire ( true = is displayed, false = hide).







les compatibilités.xlsx

products.xlsx

[wallace1]

Bonjour,

J'ai commencé à développer une application qui permet de vérifier la compatibilité entre un produit et un autre (ou même avec plusieurs), je dois concevoir cette table de compatibilité sur SQL Server (fichier joint), et créer un form Visual Studio avec deux Combobox pour le choix des produits avec affichage du résultat , True = Is compatible, False = Is not compatible, ainsi une autre option qui peut me permettre de masquer un produit de la dropdownlist quand je désire ( true = is displayed, false = hide).







les compatibilités.xlsx

products.xlsx

Bonjour,

Et ta question elle est où exactement ??

[clementmarcotte]

Bonjour,

Bonjour,

Et ta question elle est où exactement ??

Il veut qu'on lui donne le code pour transférer ses deux fichiers-joints dans une base SQL Server. Cela lui prend juste deux connexions, une avec System.Data.OLEDB pour Excel et une autre classique avec SQL Server. Le reste, c'est un jeu de DataAdapter et de requêtes SQL.

Même qu'il pourra trouver un exemple sur MSDN.

Même qu'il pourrait peut-être s'en tirer rapidement avec SQLBULKCOPY


Mais là j'ai la flemme ce soir. J'en ai déjà sermonné un autre et il est déjà tard. Et puis je n'ai rien à transférer d'Excel à SQL Server actuellement sous la main. Et puis, je suis comme les autres répondeurs du forum Excel, très réticent à ouvrir des pièces jointes, même si les fichiers xlsx ne sont pas supposés contenir de macros.

[osgentleman]

Bonjour tout le monde,

Ce n'est pas que je veux transférer les fichier en base SQL, ma question est comment communiquer entre SQL Server et Visual Studio et réussir à avoir les résultats qui vérifie la compatibilité entre deux produits sélectionnés à partir de la table bdd, et affichés sur un Form comme j'ai indiqué ci dessus.

Voilà le code de la requête que j'ai fait sur SQL server :

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
40
41
42
43
44
45
46
47
48
49
50
51
/*create table COMPATIBILITY_CONNECTION
(
	Id_ProductPin int not null references	CDS_PRODUCTS(Id_Product),
	Id_ProductBox int not null references CDS_PRODUCTS(Id_Product),
	check (Id_ProductPin <= Id_ProductBox),
	primary key (Id_ProductPin, Id_ProductBox)
);
go*/
-- Ce trigger est là pour rendre la contrainte sur l'ordre des produits compatibles non restrictive : si on ne respecte pas l'ordre, le trigger remet tout dans l'ordre
create trigger trg_new_compatibility on COMPATIBILITY_CONNECTION
instead of insert
as
begin
	insert into COMPATIBILITY_CONNECTION (Id_ProductPin, Id_ProductBox)
	select 
		case when Id_ProductPin <= Id_ProductBox then Id_ProductPin else Id_ProductBox end,
		case when Id_ProductPin <= Id_ProductBox then Id_ProductBox else Id_ProductPin end
	from inserted;
end;
go
/*insert into COMPATIBILITY_CONNECTION (Id_ProductPin, Id_ProductBox) values
(18, 18),
(18, 48),
(18, 47),
(47, 47),
(47, 48),
(48, 48),
(39, 39); -- Cette ligne doit être remise dans le bon sens par le trigger "trg_new_compatible"
*/
-- Cette fonction retourne 1 si les produits sont compatibles, 0 sinon
create function dbo.AreCompatibles(@Id_ProductPin int, @Id_ProductBox int)
returns bit
as
begin
	if @Id_ProductPin > @Id_ProductBox
	begin
		return dbo.AreCompatibles(@Id_ProductBox, @Id_ProductPin);
	end
	return (select count(*) from COMPATIBILITY_CONNECTION where Id_ProductPin = @Id_ProductPin and Id_ProductBox = @Id_ProductBox);
end;
 
 
select p1.Id_Product, p2.Id_Product, dbo.AreCompatibles(p1.Id_Product, p2.Id_Product)
from CDS_PRODUCTS p1
inner join CDS_PRODUCTS p2 on p2.Id_Product <> p1.Id_Product
 
select p1.Id_Product, p1.Connection, p2.Id_Product, p2.Connection
from CDS_PRODUCTS p1
inner join COMPATIBILITY_CONNECTION on c.Id_ProductPin = p1.Id_Product or c.Id_ProductBox = p1.Id_Product
inner join CDS_PRODUCTS p2 on p2.Id_Product = case c.Id_ProductPin when p1.Id_Product then c.Id_ProductBox else c.Id_ProductPin end
--where p1.Id_Product = 18

[J@ckHerror]

Bonjour,

Pour le dialogue entre ton programme et ton serveur SQL regarde du coté de SQLCommand, SQLConnexion ...etc
Explore la doc, et surtout inspire toi des exemples, et si ce n'est pas suffisant demande à Google ou un de ces petits frères.
Je te conseil d'isoler ce code d'accès à ton serveur dans une dll réservée, nulle doute que tu t'en resservira.

Regarde la doc et pose des questions sur les points ou tu bloques.

J@ck.

[osgentleman]

Bonjour,

Pour le dialogue entre ton programme et ton serveur SQL regarde du coté de SQLCommand, SQLConnexion ...etc
Explore la doc, et surtout inspire toi des exemples, et si ce n'est pas suffisant demande à Google ou un de ces petits frères.
Je te conseil d'isoler ce code d'accès à ton serveur dans une dll réservée, nulle doute que tu t'en resservira.

Regarde la doc et pose des questions sur les points ou tu bloques.

J@ck.

Bonjour Jack,

J'ai réussi à remplir les deux combobox, maintenant je voudrais bien que ça affiche un résultat (compatible ou non) quand je sélectionne deux produits, j'ai aucune idée comment y procéder :/ :/

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
        Dim connection As New SqlConnection("Server= local ; Database = test ; Integrated Security = true")
 
        Dim command As New SqlCommand("select * from COMPATIBILITY_CONNECTION", connection)
 
        Dim adapter As New SqlDataAdapter(command)
 
        Dim table_PIN As New DataTable()
 
        adapter.Fill(table_PIN)
 
        ComboBox1.DataSource = table_PIN
 
        ComboBox1.DisplayMember = "Id_ProductPin"
 
        ''ComboBox1.ValueMember = "Id"
 
        Dim table_BOX As New DataTable()
 
        adapter.Fill(table_BOX)
 
        ComboBox2.DataSource = table_BOX
 
        ComboBox2.DisplayMember = "Id_ProductBox"
 
        ''ComboBox2.ValueMember = "Id"

merci de m'aider svp!