خطأ في كود تحديث البيانات عند الاسترجاع

السلام عليكم ..

1. أنت عملت stored procedure واحد تقوم فيه بالــ Insert أو الــ Update و في حالة الــ Insert فإنك تعيد القيمة الجديدة للعمود الــ Identity و في حالة الــ Update لا تعيد شي .
2. الحل : هو فحص القيمة المعادة من ExecuteScalar فإذا كانت null فلا نحولها لــ Integer و إذا لم تكن , نحولها .
3.  Dim val = cmd.ExecuteScalar()
       	Dim id As Integer
       	If val IsNot Nothing Then id = Integer.Parse(val.ToString())