bonjour,
j'ai un tableau deviss2011(id,DEV_NUM,date,nom....)
je veux le résultat suivat
id DEV_NUM nom date
2010OP1 1 k 2010
2011OP10 10 x 2011
2011OP1 1 k 2011
je veux afficher dans une textbox l année+"OP"+le max de (DEV_NUM) de l'année actuelle

voici mon code
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
  Try
            cmd = New SqlCommand("select max(DEV_NUM) as num from DEVISS2011 where year(DEV_DAT_CREA)='" & Date.Now.Year & "'", con)
            con.Open()
            dr = cmd.ExecuteReader
            While dr.Read
                My.Forms.DEVIS.TXT_NUMD.Text = (Date.Now.Year & "OP") & (dr("num") + 1)
            End While
            dr.Close()
 
        Catch ex As Exception
            MsgBox("Exception :" & ex.Message)
        End Try
        con.Close()
        My.Forms.DEVIS.MdiParent = Me
        My.Forms.DEVIS.Show()
        MonthCalendar1.Hide()
et voici l'erreur:
la connexion n'est pas fermé l'état actuelle de la connexion est ouvert
merci d'avance