[سعود]

كود :

Dim cm As New SqlCommand("DBCC CHECKIDENT('pic', RESEED, 0)", con)
        If con.State = ConnectionState.Closed Then
            con.Open()
        End If
        cm.ExecuteNonQuery()

pic = اسم الجدول

[ربيع]

بارك الله فيك الله يعطيك العافيه