Re: VB Resync

If you're application is designed to run only with PostgreSQL, let PostgreSQL
keep track of the current value of the serial:

dataenvironment.connection.execute "Insert Into Detail (FK, Field1, Field2,
FieldN) select currval('whatever_the_PK\'s_sequence_name'),'" & intData1 &
"','" & intData2 & "','" & intDataN & "');"

HTH

--- MRGonzalez <magotemp(at)hotmail(dot)com> wrote:
> I have an application where I save the information of a bill and its detail.
> The PK of the header its a serial.
>
> I need to save the header and get the number of the serial to save it as a
> FK in the detail.
>
> This is the way I wrote but it raise an error:
>
> header.recordset.update
> header.recordset.resync adAffectCurrent, adResyncAllValues
>
> dataenvironment.connection.execute "Insert Into Detail (FK, Field1, Field2,
> FieldN) Values (" & header.recordset!PK & "," & intData1 & "," & intData2 &
> ," & intDataN & ")"
>
> Any suggestions?
>
> Thank you in advanced,
>
>
> MAGO

__________________________________
Do you Yahoo!?
Yahoo! Calendar - Free online calendar with sync to Outlook(TM).
http://calendar.yahoo.com