SQL - VB6 Open for editing?

[nomis]

Hi All,

I have a number of Crystal Reports where I use VB6 to pass parameters to them and to create executables. These all work fine.

Now I need to update a field on a table to show that the report has been printed so that it is only printed once.

This is the VB code to access the database - Can anyone show me what I need to do to open the table (oeim) and update the field (oeim_printed) for the parameter that is being passed to VB? (The parameter is an invoice number).

Dim Report As New CrystalReport1

Private Sub Form_Load()
Screen.MousePointer = vbHourglass
Report.Database.LogOnServer "p2sodbc.dll", "server1", "MAX112live", "maxmast", "mcs000"
Report.ParameterFields(1).AddCurrentValue (Command)
CRViewer1.ReportSource = Report
CRViewer1.ViewReport
Screen.MousePointer = vbDefault

End Sub

Many thanks for any help.