باز هم سپاسگزارم.دقیقا دستور من همینه در sql2000 درست جواب میده ولی در sql2008R2 جوابم رو false برمیگردونه یعنی تشخیص نمیده فیلدم IDENTITY هست

If rsUpdate(fld.Name).Properties.Item("IsAutoincremen t").Value = True Then
strUpdate = strUpdate + "," + GetFieldValue(fld, rsUpdate)
End If