[asemshahen5]

PHP كود :

Dim StrSQL as String= "Select IIF(Max(id) Is NULL,1,Max(id)+1) From data"
 Dim da As New OleDbDataAdapter(StrSQL, Con)
 Dim dt As New DataTable
 da.Fill(dt)
 Txt_id.Text=dt.Rows(0)(0).ToString()