cannot insert value into fk detail table

Question

0.00/5 (No votes)

See more:

, +

Hello,
I am trying to insert a value in a detail table in the FK from a text box. here is the code, I get no error but I have no record also.

VB

Private Sub Button9_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button9.Click
          Me.SqlDataAdapter3.InsertCommand.Parameters(0).Value = Convert.ToInt32(TextBox22.Text)
        Me.BindingContext(DataSet31, "scan").EndCurrentEdit()
        Me.BindingContext(DataSet31, "scan").AddNew()
       AxVintaSoftTwain2.StartDevice()
        AxVintaSoftTwain2.SelectSource()
        AxVintaSoftTwain2.ShowUI = False
        AxVintaSoftTwain2.DisableAfterAcquire = True
        AxVintaSoftTwain2.OpenDataSource()
        AxVintaSoftTwain2.UnitOfMeasure = 0          ' inches'
        AxVintaSoftTwain2.PixelType = 2              ' RGB image'
        AxVintaSoftTwain2.Resolution = 200           ' 200 dpi'
        AxVintaSoftTwain2.Brightness = AxVintaSoftTwain2.BrightnessMaxValue
        AxVintaSoftTwain2.Contrast = 0
        AxVintaSoftTwain2.SetImageLayout(1, 1, 5, 5) 'image size in inches'
        AxVintaSoftTwain2.Acquire()
    End Sub

    Private Sub VSTwain1_PostScan(ByVal sender As System.Object, ByVal e As AxVSTWAINLib._IVintaSoftTwainEvents_PostScanEvent) Handles AxVintaSoftTwain2.PostScan
        If e.flag <> 0 Then
            If AxVintaSoftTwain2.ErrorCode <> 0 Then
                MsgBox(AxVintaSoftTwain2.ErrorString)
            End If
        Else
            If Not (PictureBox1.Image Is Nothing) Then
                PictureBox1.Image.Dispose()
                PictureBox1.Image = Nothing
            End If
            PictureBox1.Image = AxVintaSoftTwain2.GetCurrentImage
        End If
End Sub

 Private Sub Button11_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button11.Click
        Me.BindingContext.Item(DataSet31,"scan").EndCurrentEdit()
        Me.SqlDataAdapter3.Update(DataSet31)
        Me.DataSet31.AcceptChanges()
        Me.SqlConnection1.Close()
        Me.SqlConnection1.Open()
        Me.DataSet31.Tables("scan").Clear()
        Me.SqlDataAdapter3.Fill(DataSet31, "scan")
    End Sub

Posted 6-Apr-11 22:31pm

Member 3892343

Updated 7-Apr-11 0:28am

Sunasara Imdadhusen

v2

Add a Solution

Comments

thatraja 7-Apr-11 6:05am

what's the error message? include that in your question.

Sandeep Mewara 7-Apr-11 8:19am

OP says no error but no record. (Though I fail to understand his question totally and don't want to put much of my mind here, so I will pass.)

Sunasara Imdadhusen 7-Apr-11 6:28am

Added code formatting!!

Member 4312989 7-Apr-11 8:48am

Are you trying to store the image in the table?
Or its just a insert query with text and number values?

Wendelius 7-Apr-11 15:03pm

Could you include the statements used by the data adapter into the post. The ones that are defined by SqlCommand objects in UpdateCOmmand and InsertCommand properties.

Member 3892343 15-Apr-11 2:58am

No solution, Yes mem, I am trying to insert an image to the blob field, basically the table has 3 columns PK, FK and a blob field. I am using vintasot Twian activex for scanners.
Kyriakos

Member 3892343 15-Apr-11 2:59am

here is the insert statment :

Collapse | Copy Code
INSERT INTO [scan] ([id_2], [photo]) VALUES (@id_2, @photo);SELECT id, id_2, photo FROM scan WHERE (id = SCOPE_IDENTITY())

and the update :

Collapse | Copy Code
UPDATE [scan] SET [id_2] = @id_2, [photo] = @photo WHERE (([id] = @Original_id) AND ([id_2] = @Original_id_2));SELECT id, id_2, photo FROM scan WHERE (id = @id)

I thing there is an update problem because no @id_2 seems to get a value.
And the insert had to be a @ parameter (?)

Collapse | Copy Code
Me.SqlDataAdapter3.InsertCommand.Parameters(0).Value = Convert.ToInt32(TextBox22.Text)

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)