Skip to main content

Posts

Showing posts from August, 2013

ADODB in LotusScript

Remember to use TRIM function when comparing data in two recordsets in LotusScript.


After an ADO Database Connection has been created, create the Recordset.  Proceed to extract, transform and/or load your data. This is an example of appending data to a recordset. In this case from SQL to DB2. ====================================================================
Do While Not SQLRS.EOF And Not Db2RS.EOF And Not Done
        dubugthis = "Inside update"
        record = Trim(Db2RS("YourID").Value) & " - " & Trim(projRS("YourOtherID").Value)
        Print record  
        If Trim(Db2RS("YourID").Value) = Trim(projRS("YourOtherID").Value) Then
            Db2RS.MoveNext
            projRS.MoveNext
                        num1 = num1 + 1
        Else
            Done = True
        End If
        If Not SQLRS.EOF And Db2RS.EOF then
            Done = True
        Else
        End If
    Loop================================================…