[asemshahen5]

PHP كود :

       Dim StrSQL As String = "Select IIF(Count(ID) Is NULL,1,Count(ID)+1)As ID From TableName"
        Dim cn As New SqlClient.SqlConnection("Server =(local);database=ALASEM0;integrated security=true")
        Dim da As New SqlClient.SqlDataAdapter(StrSQL, cn)
        Dim dt As New DataTable
        da.Fill(dt)
        Txt_ID.Text = Today.Year & "-" & dt.Rows(0)("ID").ToString()