urgente!!! asp procedimientos almacenados

[mveraa]

hola maestros necesito saber si con asp se puede usar procedimientos almacenados que tengo dentro de un sql server y si alguien tiene un codigo que me sirva de orientacion.


un saludo

[mveraa]

por ejemplo este es el procedimiento almacenado


CREATE PROCEDURE IW_psnpStockPro @fecha DATETIME, @Tipo VARCHAR(1), @Producto VARCHAR(20)
AS
IF (@Tipo = 'D')
Exec IW_psnpStockProDisp @fecha, @Producto
IF (@Tipo <> 'D')
Exec IW_psnpStockProRCT @fecha, @Tipo, @Producto


este codigo lo adapte

<%
dim fecha , tipo , bodega , producto
%> <!-- #include file="conecta.asp" --> <%

fecha="29-12-04 "
tipo="D"
bodega=1
producto="997bandeja"

set rs = server.createobject("adodb.recordset")
'open the recordset, passing in the variable
'note that the variable product_id does not have to be name the same as in the stored procedure, it just needs to be the same data type.

rs.Open "Exec IW_psnpStockBodPro" & fecha, Producto ,oconn

%>

pero me marca error en la fecha que no coinciden los tipos
¿como le puede hacer para sulucionar el problema de la fecha?


un saludo

[javopereira]

Para que no me de problemas yo uso las fechas en formato aaaammdd, hacete una pequeña funcion que te arme el string de la fecha

[mveraa]

encontre este codigo que no me marca error no se como recorrerlo


<%
Command1__Tipo = "d"

Command1__Bodega =1

Command1__Producto = "997bandeja"






Set cn = Server.CreateObject("ADODB.Connection")
cn.Open "Provider=SQLOLEDB.1;Password=softland;Persist Security Info=False;User ID=softland;Initial Catalog=imahe;Data Source=FEMANTECH1"

Set cmd = Server.CreateObject("ADODB.Command")
Set cmd.ActiveConnection = cn
cmd.CommandText = "softland.miguel"
cmd.CommandType = 4

// Cmd.Parameters.Append(Cmd.CreateParameter("@RETURN _VALUE", 3, 4))
// Cmd.Parameters.Append(Cmd.CreateParameter("@Tipo", 200, 1,10,Command1__Tipo))
// Cmd.Parameters.Append(Cmd.CreateParameter("@Bodega ", 200, 1,10,Command1__Bodega))
// Cmd.Parameters.Append(Cmd.CreateParameter("@Produc to", 200, 1,10,Command1__Producto))




// cmd.Parameters.Append cmd.CreateParameter("RetVal", adInteger,adParamReturnValue)
// cmd.Parameters.Append cmd.CreateParameter("Param1", adInteger,adParamInput)
' Set value of Param1 of the default collection to 22
cmd("@tipo") = 1
cmd("@bodega") = 1
cmd("@Producto")="997bandeja"
cmd.Execute()

%>
<% Response.Write cmd(0) %> //supuestamente aqui deberia devolver algo pero me devuelve lo que estoy ingresando , y no lo que quiero ver que es resultado

[javopereira]

Iniciado por mveraa

encontre este codigo que no me marca error no se como recorrerlo

Diculpame pero no te entiendo. Si no te da error ¿cual es le problema? ¿no graba?
¿Que hace que se supone nod eberia hacer?
¿que no hace que esperas que haga?