Parameterized Query

Here is my asp code that queries against an MS SQL 2000 database.All works good except if the string I query for contains an apostrophe like Dog's. I have tried replacing all single quotes with 2 single quotes, but that doesn't work either. What am i doing wrong

Code:

Set objCmd = Server.CreateObject("ADODB.Command")
objCmd.ActiveConnection = Conn
objCmd.CommandType = adCmdText

objCmd.CommandText = "SELECT ISBN" &_
" FROM Books" &_
" WHERE Title LIKE '%' + ? + '%' "

'Create the parameter and populate it.
Set objParam = objCmd.CreateParameter("", adVarChar, adParamInput, 200, "Dog's")
objCmd.Parameters.Append objParam

response.Write(sQuery)
set rsBooks = objCmd.Execute()