Soru ile ilgili olarak, öncelikle veri türünü otomatiksayı olarak değiştirip sorgunuzu düzeltmeye çalışın, yapamazsanız sorguyu düzeltmeye çalışalım.
bilgi açısından yazıyorum, yazdığınız
strsql = "Insert Into TBLMESLEK ([MESLEK]) values ('" & NewData & "')"şeklindeki kodu
strsql = "Insert Into [TBLMESLEK] ([MESLEK],[meslekid]) values ('" & NewData & "','" & DMax("meslekid", "TBLMESLEK") + 1 & "')"şeklinde değiştirirseniz, tabloya en büyük meslekid değerinin bir fazlasını ekleyerek kaydeder. Ayrıca sayı olan alanın "Sıralı" özelliğini "evet(yineleme yok)" şeklinde değiştirilmesi gerekli. Aynı meslekid'i ikinci defa vermemeli.
