RUMBA Script DB Query?

Hi,
the answer is YES!
You can use Rumba Script to connect to a ODBC DB. See below a working  code snippet.

hope it helps

Option Explicit

'---- CursorTypeEnum Values ----

Const adOpenForwardOnly = 0

' Const adOpenKeyset = 1

' Const adOpenDynamic = 2

' Const adOpenStatic = 3

'---- LockTypeEnum Values ----

Const adLockReadOnly = 1

' Const adLockPessimistic = 2

' Const adLockOptimistic = 3

' Const adLockBatchOptimistic = 4

'---- CursorLocationEnum Values ----

' Const adUseServer = 2

Const adUseClient = 3

'---- ConnectModeEnum Values ----

' Const adModeUnknown = 0

Const adModeRead = 1

' Const adModeWrite = 2

' Const adModeReadWrite = 3

' Const adModeShareDenyRead = 4

' Const adModeShareDenyWrite = 8

' Const adModeShareExclusive = &Hc

' Const adModeShareDenyNone = &H10

' Const adModeRecursive = &H400000

Sub Main

      Dim Conn As Object

      Dim RS As Object

Set Conn = CreateObject("ADODB.Connection")                          ' Set DSN without UserId/PWD

      Conn.open "MySQL-R"                                                            ' DSN-NAME

Set RS = CreateObject("ADODB.Recordset")

      RS.CursorLocation = adUseClient

     RS.Source = "Select * from customers;"

     Set RS.ActiveConnection = Conn

     RS.CursorType = adOpenForwardOnly

     RS.LockType = adLockReadOnly

     RS.Open

      Do While Not RS.EOF

      Print RS.Fields.Item("ContactName").Value   

     RS.MoveNext

      Loop 

     RS.Close

Set RS = Nothing

     Conn.Close

Set Conn = Nothing

End Sub

Works like a charm! Thank you so much!!