Results 1 to 4 of 4

Thread: help with code

  1. #1
    Join Date
    Apr 2003
    Location
    Washington DC area
    Posts
    1,770

    Unhappy Unanswered: help with code

    Private Sub cboPartLocation_AfterUpdate()
    Dim val1 As Integer, count As Integer
    count = (0)
    DoCmd
    Select top1 from partinstnceid

    IF count = (0); < txtNumber then count++

    Tblpartinstance where & Me.ordered = Me.OrderID And PartID = Me.PartID And PartLocation = 1
    val1 = rs.getValue(1)
    Update Tblpartinstance
    Set datereceived = txtDatReceived And PartLocation = cboPartLocation
    where partinstnceid = var1
    End Sub

  2. #2
    Join Date
    Aug 2002
    Location
    Charlotte NC
    Posts
    665

    Re: help with code

    Originally posted by garrydawkins
    Private Sub cboPartLocation_AfterUpdate()
    Dim val1 As Integer, count As Integer
    count = (0)
    DoCmd
    Select top1 from partinstnceid

    IF count = (0); < txtNumber then count++

    Tblpartinstance where & Me.ordered = Me.OrderID And PartID = Me.PartID And PartLocation = 1
    val1 = rs.getValue(1)
    Update Tblpartinstance
    Set datereceived = txtDatReceived And PartLocation = cboPartLocation
    where partinstnceid = var1
    End Sub
    um first i dont know the problem and second i dotn know what u are trying to get it to do. Can u explane a bit?
    Jim

  3. #3
    Join Date
    Apr 2003
    Location
    Washington DC area
    Posts
    1,770

    Unhappy Help with code

    This code is for a sub-form that populates some field and allow the user to enter data in others. I'm really lost here. I inherited this database and would of done this without vb doing all the functionallity. A copy of the form is attached. Any help would be appreciated.

  4. #4
    Join Date
    Apr 2003
    Location
    Washington DC area
    Posts
    1,770

    Unhappy Help with code

    The prime fields on the form are driven by a groupby query.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •