salut
j est crée un application qui permet de vérifier existence code d'Equipement
1) vérifier ce code dans ma base oracle
2) si il existe il faut l 'afficher avec leur caractéristique
1) Imports System.Data.OracleClient
Public Class Form3
Dim dr As OracleDataReader
Dim rsql As String
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim ad As New connecter.reader
rsql = "select cod_rq ,famil_eq , marque_eq from EQUIPEMENT "&val(dat.text)
ad.chargerreader(rsql, dr)
If dr.HasRows() Then
MsgBox("le code " & dat.Text & " existant")
Else
MsgBox("le code " & dat.Text & " inexistant")
End If
End Sub