Hola amigo del foro.
Le envio el codigo de lo que necisto hacer. Le explico lo que se necesita es ejecutar un procedimiento y pasarle los parametros respectivos, le envio el error ademas.
<html>
<head>
<title> INGRESO</title>
</head>
<body>
<%
r1=Request.Form("rut")
r2=Request.Form("nombre")
r3=Request.Form("apellido")
r4=Request.Form("direccion")
r5=Request.Form("fono")
'Abre la conexion con la base de datos a traves de una conexion ODBC
Set Con = Server.CreateObject("ADODB.Connection")
Set Result = Server.CreateObject("ADODB.Recordset")
Con.open "DSN=sistema;UID=pof03001con11;PWD=arusque"
'Ejecuta un sentencia SQL de consulta
'Execute("execute sp_ingresar_empleado r1,r2,r3,r4,r5" )
slq2 = "ingreso_empleado.sp_ingresar_empleado '" & r1 & "','" & r2 & "','" & r3 & "','" & r4 & "'," & r5 & "
Con.Execute (sql2)
'Set Result = Con.Execute("ingreso_empleado.sp_ingresar_empleado '" & r1 & "','" & r2 & "','" & r3 & "','" & r4 & "'," & r5 & ""
'Response.write(sql2)
'Con.Execute(sql)
'Recorre todas las filas del resultado
'Do While Not result.EOF
'Muestra la fila actual
'Response.Write "<p><b><font face=Verdana size=1><a href=listado.asp?id=" &result.Fields("cod_empleado") & ">"&result.Fields("nom_empleado")&"</a></b><br><font color=""#696969"">• " &result.Fields("apellido_empleado") & "</font></font></p>"
'Pasa a la siguiente fila
'result.MoveNext
'Loop
'Libera memoria
'Result.Close
'Set Result = Nothing
Con.Close
'Set con = Nothing
%>
</body>
</html>
error:
Información técnica (para personal de soporte técnico)
Tipo de error:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E0C)
No se estableció ningún texto de comando para el objeto de comando.
/oracle4/ingresar2.asp, línea 25
Tipo de explorador:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.1.4322; .NET CLR 2.0.50727)
Página:
POST 0 bytes to /oracle4/ingresar2.asp
Datos de POST:
Hora:
martes, 04 de julio de 2006, 11:58:39
Más información:
atte.
apolo