Microsoft JET Database Engine (0x80040E10)
No value given for one or more required parameters.
Expand|Select|Wrap|Line Numbers
- '
- get handle on data
- 'Const adOpenKeyset = 3
- 'Const adLockReadOnly = 3
- Dim rsProduct, sSQLa, rsSizes, rsColours
- sSQLa = "select * from products where productID= '" & intProdID & "'"
- set rsProduct = Server.CreateObject("ADODB.RecordSet")
- rsProduct.open sSQLa, ConString,adOpenKeyset,adLockReadOnly
- ' get sizes
- sSQLa = "select * from size1,product_sizes where size1.id = size_id and productID='" & intProdID & "'"
- set rsSizes = Server.CreateObject("ADODB.RecordSet")
- rsSizes.open sSQLa, ConString,adOpenKeyset,adLockReadOnly
any solution ?