[atefkhalf2004]

اولا استخدم الكود من خلال الفيجوال
المشروع هو اللي مرفوع من قبل  windowsapplication1
ثانيا :  هذا هو الكود المستخدم
 Dim SavInto77 As New SqlCommand
        If conn.State = ConnectionState.Open Then conn.Close()
        SavInto77.Connection = conn
        SavInto77.CommandType = CommandType.Text

        'SavInto77.CommandText = "ALTER TABLE  moneys    DROP   KEYPK_moneys"
        'conn.Open()   '''''moncod     PK_moneys
        'SavInto77.ExecuteNonQuery()
        'conn.Close()


        SavInto77.CommandText = "ALTER TABLE  items    DROP column  itcod  "
        conn.Open()   '''''moncod     PK_moneys
        SavInto77.ExecuteNonQuery()
        conn.Close()
        SavInto77.CommandText = "ALTER TABLE  items    ADD  itcod int NOT NULL IDENTITY (1,1) PRIMARY KEY"
        conn.Open()
        SavInto77.ExecuteNonQuery()
        conn.Close()
        'Catch
        '    MsgBox("88888")
        'End Try
ثالثا  :   من خلال التغيير اليدوي  من السكول اقوم بالضغط علي وضع التصميم للجدول
           وعند الخاصية    identity sepcifacation   اغير is identity االي yes  تتحول   الي المطلوب


اي ارغب في ذلك من خلال الكود
وللعلم حضرتك انا اضطررت الي هذا الكود 
لكن المطلوب الصحيح   والذي  ارغب فيه حتي لا افقد البيانات  انني  احول الخاصية     is identity االي yes 

وشكرا