
Accessing SQL 6.5 Stored procedures thru VB4.0
Basicaly just call it
Dim MyRs as Recordset
Dim Mydb as database
Set Mydb=dbengine.workspaces.OpenDatabase(DSN,False,false,ConnectStr)
Set MyRs=MyDb.OpenRecordset("sp_test",dbSQLPasstrough)
Dim fld1 as field
Dim fld2 as field
Dim fld3 as field
If MyRs.EOF then
Msgbox "The procedure sp_test did not return any lines"
Else
fld1=MyRs(0)
fld2=MyRs(1)
fld3=MyRs(2)
Endif
...