Visual Basic.NET - Como llamar a un procedimiento almacenado en vb

Hola chicos,

Estoy (con 9 años de retraso) pasándome del asp al asp.net. El caso es que yo programaba a 3 capas con el vb html/asp - dll - Procedimiento almacenado . El caso es que intento mas o menos hacer lo mismo que hacía con el 6 en el .net, pero me pasa lo siguiente, imaginemos esta fórmula

Public Function PrimeroDelDia(Dia As String) As Integer
On Error GoTo Errores
Set Ado = New Ado
Ado.NuevaCon StrCadenaConexion
Ado.NuevoCom
With objCom
.ActiveConnection = ObjCon
.CommandText = "PRIMERO_DEL_DIA"
.CommandType = 4
Set p = .Parameters
p.Append .CreateParameter("@i_Dia", adVarChar, adParamInput, 10, Dia)
p.Append .CreateParameter("@o_Salida", adInteger, adParamReturnValue, 1)
.Execute
End With
PrimeroDelDia = p(1)
Set p = Nothing
Ado.xCon
Ado.xCom
Ado.xAdo
GetObjectContext.SetComplete
Exit Function
Errores:
Set p = Nothing
Ado.xCon
Ado.xAdo
GetObjectContext.SetAbort
Err.Raise Err.Number, , Err.Description
End Function

El caso es que no se pasarla ¿Podéis ayudarme?

Gracias