récupération des champs VB.NET

Bonjour,

je suis débutant en .NET (VB)

Je me connecte à une base de données SQL Server.

J'ai une interface qui contient deux zones de textes. Je veux quand j'entre une valeur dans la premiere zone faire une recherche dans la base et voir si ce que j'ai entrer corresponds à un enregistrement (un ID) puis charger un autre formulaire qui va contenir tout les champs de text associé à cet ID mais je ne sais pas comment faire pour la vérification puis l'affichage ( Je suis habitué travailler avec VB6 et les contrôles liés) :(

P.S : Je travaille en mode déconnecté avec DATASET et DATAADAPTER.

Merci d'avance

il est possible de lier les controles à la base de données facilement sous .net
voir bindings ou databindings

Merci sperot51 pour ta réponse.

Je vais voir ça (même si je suis un peu pressé) et vous tenir au courant.

sinon il faut utiliser un datareader pour faire une requete dans la base de données (le datareader est ptete plus simple à comprendre que les bindings bien qu'à mon avis les bindings sont plus rapide à mettre en place une fois qu'on connait)

http://plasserre.developpez.com/vsommair.htm ici y a plein de choses interressantes, pour se lancer en .net c'est bien d'etre au courant de ce qui existe pour éviter de chercher, les bindings y sont surement expliqué tout comme le datareader

(et t'as réussi à utiliser le code d'impression de l'autre fois ?)

je ne trouve pas en suffisance une documentation de Binding et dataBinding.

Et j'ai avancé assez dans l'application en DataSet et Adapter.

Pourriez vous m'éguiller pour faire cette recherche?

J'ai trois formulaires.
- Form1 : pour rechercher l'id.
- Form2 : une datagrid si le nombre d'enregistrement est > 0
je séléctionne puis j'affiche ensuite (en cliquant sur suivant) les infos associés.
- Form3 : je passe directement à cette form si le nombre d'enregistrement est = 1 , sinon si le nombre d'enregistrement est = 0 , j'envois à message à l'utilisateur.

Merci d'avance

En fait, pas tout le code d'impression, mais j'ai trouvé l'Objet que je cherchais en faisant référence à partir du menu Projet.

Merci

l'utilisateur entre une valeur dans la zone de texte, ensuite je pense qu'il faut un bouton pour ouvrir la fenetre

au clic du bouton, tu utilises un datareader
pour sql server instancier un sqlconnection et un sqlcommand
le sqlconnection, il faut lui dire la chaine de connexion, le sqlcommand tu lui donnes un commandtext style "SELECT count(*) from matable where monchamp = @valeurentree"
avec un sqlparameter dans lequel tu mets la valeur qui est dans le textbox

ensuite tu fais executescalar dans le sqlcommand et tu auras le nombre d'enregistrement

ensuite tu appelles telle ou telle fenetre en lui passant en paramètre la valeur saisie

(le sqldatareader est utile pour executereader, pour avoir toutes les lignes, executescalar retourne la valeur de la première colonne de la première ligne, suffisant ici)

(pour access, il faut des oledbconnection et oledbcommand je crois)

Merci.

Je vais tout refaire en DataReader.

Une question, Le DataSet est plus compliqué que le DataReader?

le sqlcommand sert à executer des requete (insert, update, delete via l'instruction executenonquery)
le datareader fourni par l'instruction executereader du sqlcommand sert à faire des select, il permet de lire les valeurs retournées par le select "à la main"

le dataset sert à faire un select simplement et à permettre les modifications automatiques
il peut etre lié à un controle type listbox ou datagrid sans trop écrire de code

donc pour le reste de ton appli, tu peux garder le dataset, mais pour lire une valeur, le sqlcommand est plus adapté

OK, je traite tout d'abord ces forumulaires et je vous tiens au courant.

Dim cnx As SqlConnection = New SqlConnection("Data Source=XXXXXXX;Integrated Security=SSPI;Initial Catalog=xxxxxxx")

Dim cmd As SqlCommand = cnx.CreateCommand()

cmd.CommandText = "SELECT * FROM ARTICLES WHERE IDARTICLE ='" & txtSKU.Text & "'"

cnx.Open()

Dim myReader As SqlDataReader = cmd.ExecuteReader()

'ici je veux recupérer l'ID et et charger le liste de fournisseurs, mettre ca dans une grille, puis quand je séléctionne une ligne passer à une autre form qui va m'afficher dans des zonne de text et des combos les resultats de ce que j'ai récupéré, mais je ne sais pas vraiment comment passer un parametre


frmListeFournisseurs.Show()


myReader.Close()


cnx.Close()

End Sub

pour faire ca, un dataset est mieux

Ok, je vais te montrer le code en dataset.

Juste, selon la méthode que tu m'a expliqué, je ne ne sais pas comment passer un paramètre à une form. Comment fait-on ?

Sinon le code du DataSet est le suivant :

Code:

---

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

'Paramétrage de la connexion cnx = New SqlConnection cnx.ConnectionString = "Data Source=XXXXXX;Integrated Security=SSPI;Initial Catalog=xxxxxxx" cnx.Open() If txtSKU.Text <> "" Then 'Passage de la requête au DataAdapter AdapterArticles = New SqlDataAdapter("SELECT * FROM ARTICLES WHERE IDARTICLE ='" & txtSKU.Text & "'", cnx) Else AdapterArticles = New SqlDataAdapter("SELECT * FROM ARTICLES WHERE ACODE ='" & txtCodePiece.Text & "'", cnx) End If 'Instancier le DataSet DtSet = New DataSet 'Remplir le DataSet AdapterArticles.Fill(DtSet, "ARTICLES") 'Declaration(DataTable) Dim tableArticles As DataTable tableArticles = DtSet.Tables("ARTICLES") Select Case DtSet.Tables.Count Case Is = 0 MsgBox("Aucun enregistrement trouvé", MsgBoxStyle.Exclamation, "xxxxxx-v2.0") Exit Sub Case Is = 1 Me.Hide() frmAfficheRechercheSKU.Show() frmAfficheRechercheSKU.lblSKU.Text = txtSKU.Text frmAfficheRechercheSKU.lblCode.Text = 'ICI JE ME BLOQUE POUR LA RECUPRATION DES CHAMPS CORRESPONDANTS A CET ID ET LES AFFICHER Case Is > 1 Me.Hide() frmListeFournisseurs.Show() 'ICI AUSSI BIEN SUR End Select

---

il y a des balises sur le forum pour que le code soit lisible comme dans visual studio


pour passer un paramètre à une fenetre, plusieurs méthode, comme la surcharge du new

Code:

---

1 2	public sub new (param as integer) end sub

---

et pour l'appeler

Code:

---

dim f as new maform(valeurduparam)

---

prend le temps de lire le lien vers le cours vb que je t'ai donné, plutot que de poser les questions au fur et à mesure que tu avances dans ton prog

Bah oui, prendre le temps qui me manque un peu là :?
Normalement c'est un travail qu'il a fallu valider hier par mon responsable.
Je travaille assez sous pression pour résoudre ce probème.

Merci pour tes réponses sperot51.

prendre le temps d'apprendre permet d'en gagner pendant le développement ...
et faut faire des heures sinon :lol:

Salut,

Comment on récupère l'enregistrement courant d'un DataRow?

Merci