حامد فراست
شنبه 15 دی 1386, 08:04 صبح
با سلام
من یه جدول دارم به اسم "pic" که توش عکس ذخیره میکنم
ستون id اونم بصورت "AutoIncrement" انتخاب کردم
مشکل امن اینجاست که وقتی میخوام داده ای در جدول ذخیره کنم (چه بصورت Update ویا به صورت Insert) این پیام خطا رو میده:
Cannot insert explicit value for identity column in table 'pic' when IDENTITY_INSERT is set to OFF.
کدی من نوشتم به صورت زیر
If Me.OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
Me.PicPictureBox.Image = System.Drawing.Image.FromFile(Me.OpenFileDialog1.F ileName.Trim)
If Len(Me.OpenFileDialog1.FileName) > 0 Then
Dim fs As New System.IO.FileStream(Me.OpenFileDialog1.FileName, IO.FileMode.OpenOrCreate, IO.FileAccess.Read)
Dim img_byt(fs.Length) As Byte
fs.Read(img_byt, 0, CInt(fs.Length))
fs.Close()
Dim newrow As _sh_rajayi1DataSet.picRow
newrow = Me._sh_rajayi1DataSet.pic.NewpicRow
newrow.pic = img_byt
newrow.P_Code = CChar(TextBox10.Text)
Me._sh_rajayi1DataSet.pic.Rows.Add(newrow)
Me.PicTableAdapter.Update(Me._sh_rajayi1DataSet.pi c)
MsgBox("success")
End If
End If
البته کد های دیگری رو هم برا ی ذخیره کردن امتحان کردم همشون همین خطا رو میدن
مگر اینکه از حالت "AutoIncrement" در بیارم id رو
با تشکر
منتظر راهنمایی های دوستان و اساتید هستم
من یه جدول دارم به اسم "pic" که توش عکس ذخیره میکنم
ستون id اونم بصورت "AutoIncrement" انتخاب کردم
مشکل امن اینجاست که وقتی میخوام داده ای در جدول ذخیره کنم (چه بصورت Update ویا به صورت Insert) این پیام خطا رو میده:
Cannot insert explicit value for identity column in table 'pic' when IDENTITY_INSERT is set to OFF.
کدی من نوشتم به صورت زیر
If Me.OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
Me.PicPictureBox.Image = System.Drawing.Image.FromFile(Me.OpenFileDialog1.F ileName.Trim)
If Len(Me.OpenFileDialog1.FileName) > 0 Then
Dim fs As New System.IO.FileStream(Me.OpenFileDialog1.FileName, IO.FileMode.OpenOrCreate, IO.FileAccess.Read)
Dim img_byt(fs.Length) As Byte
fs.Read(img_byt, 0, CInt(fs.Length))
fs.Close()
Dim newrow As _sh_rajayi1DataSet.picRow
newrow = Me._sh_rajayi1DataSet.pic.NewpicRow
newrow.pic = img_byt
newrow.P_Code = CChar(TextBox10.Text)
Me._sh_rajayi1DataSet.pic.Rows.Add(newrow)
Me.PicTableAdapter.Update(Me._sh_rajayi1DataSet.pi c)
MsgBox("success")
End If
End If
البته کد های دیگری رو هم برا ی ذخیره کردن امتحان کردم همشون همین خطا رو میدن
مگر اینکه از حالت "AutoIncrement" در بیارم id رو
با تشکر
منتظر راهنمایی های دوستان و اساتید هستم