loConnection = CREATEOBJECT('ADODB.Connection') WITH loConnection .Provider = 'SQLOLEDB' .Properties("Data Source").Value = 'xxxx' .Properties("Initial Catalog").Value = 'xxxx' .Properties("User ID").Value = 'xxxx' .Properties("Password").Value = 'xxxx' .Open() ENDWITH loCommand = CREATEOBJECT('ADODB.Command') WITH loCommand .ActiveConnection = loConnection .CommandType = 1 && 1 = Text, 4 = Stored Procedure ENDWITH loRecordSet = CREATEOBJECT('ADODB.RecordSet') WITH loRecordSet .CursorType = 2 && ADOPENDYNAMIC .LockType = 4 && ADLOCKBATCHOPTIMISTIC .ActiveConnection = loConnection .CursorLocation = 3 && ADUSECLIENT ENDWITH SET STEP ON loCommand.CommandText = 'SELECT * FROM dbo.vGetSample WHERE sample_id = ?' loCommand.Parameters(0).Value = '00286304SQL' loRecordSet.Open(loCommand)