ADO problemer - forkert type parameter

Jeg har følgende kode:

Function NewCmd( sSQL )
    Set NewCmd = Server.CreateObject("ADODB.Command")
    Set NewCmd.ActiveConnection = Conn
    NewCmd.CommandText = sSQL
End Function

Set cmd = NewCmd("SELECT titel, beskrivelse, tekst, billed FROM sider WHERE ID = ?")

cmd.Parameters.Append cmd.CreateParameter("ID", adInteger, adParamInput, , Request.QueryString("side"))

set rsSide = cmd.Execute(,,adcmdText)

Jeg får følgende fejl på 'Append' delen:
Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.

Jeg har forsøgt at ændre 'Request...' til et tal, men får samme fejl!