Usuário com melhor resposta
ASP Com Stored Procedure

Pergunta
-
Respostas
-
-
Uma forma de fazer isso é usando o objeto Command.
Atrás da propriedade CommandText, vc poder invocar a procedure e através do método Execute, executá-la.
Veja:
<%
Set conexao = Server.CreateObject("ADODB.Connection")
Set cmd = Server.CreateObject("ADODB.Command")
Set recordsetX = Server.CreateObject("ADODB.Recordset")
conexao.Open "DSNExemplo", "sa", "senhasa"
cmd.ActiveConnection = conexao
cmd.CommandText = "EXEC NomeProc '1','2'"
Set recordsetX = cmd.Execute
%>Mais detalhes em:
-
Code Block
<HTML>
<HEAD>
<TITLE>Curso de ASP</TITLE><% @ LANGUAGE= VBSCRIPT %>
</HEAD>
<BODY>
<%
Dim DbConn ,RsNome
Dim Sql
on error resume next
Set Dbconn = Server.CreateObject("ADODB.Connection")
Set RsNome =Server.CreateObject("ADODB.Recordset")
Sql ="execute SPR_ASP_SAMPLE"
DbConn.Open "Provider=SQLOLEDB;Data Source=MAQ1\SQL2000;Initial Catalog=baseteste;Integrated Security=SSPI"
set RsNome =Dbconn.Execute(Sql)
%>
Amigo no caso sow você alterar o nome da sua Procedure aé.
Nome da minha procedure é SPR_ASP_SAMPLE
A conexao esta feita no Sql-Server 2000.
Para imprimir os resultados você pode usar um Response.Write..
Se tiver te ajudado favor maracar como resposto ..
Agradecido.
Todas as Respostas
-
-
Uma forma de fazer isso é usando o objeto Command.
Atrás da propriedade CommandText, vc poder invocar a procedure e através do método Execute, executá-la.
Veja:
<%
Set conexao = Server.CreateObject("ADODB.Connection")
Set cmd = Server.CreateObject("ADODB.Command")
Set recordsetX = Server.CreateObject("ADODB.Recordset")
conexao.Open "DSNExemplo", "sa", "senhasa"
cmd.ActiveConnection = conexao
cmd.CommandText = "EXEC NomeProc '1','2'"
Set recordsetX = cmd.Execute
%>Mais detalhes em:
-
Code Block
<HTML>
<HEAD>
<TITLE>Curso de ASP</TITLE><% @ LANGUAGE= VBSCRIPT %>
</HEAD>
<BODY>
<%
Dim DbConn ,RsNome
Dim Sql
on error resume next
Set Dbconn = Server.CreateObject("ADODB.Connection")
Set RsNome =Server.CreateObject("ADODB.Recordset")
Sql ="execute SPR_ASP_SAMPLE"
DbConn.Open "Provider=SQLOLEDB;Data Source=MAQ1\SQL2000;Initial Catalog=baseteste;Integrated Security=SSPI"
set RsNome =Dbconn.Execute(Sql)
%>
Amigo no caso sow você alterar o nome da sua Procedure aé.
Nome da minha procedure é SPR_ASP_SAMPLE
A conexao esta feita no Sql-Server 2000.
Para imprimir os resultados você pode usar um Response.Write..
Se tiver te ajudado favor maracar como resposto ..
Agradecido.