Thanks for the article. I found it very interesting and helpful.
I still have this problem:
' Parameter 1
sParmName1 = "@Cusip"
ocommand.Parameters.Append ocommand.CreateParameter(sParmName1, adVarChar, adParamInput)
params(sParmName1).Value = sSymbol
' Parameter 2
sParmName2 = "@Price"...