Show Stored Procedures 1

[astrodestino]

Hi!
I could create and drop stored procedures but to show the sp code I have to use:

sp_helptext urprocedurename

But, how can I use this command to retreive the stored procedure code and response.write it on my website page?

Tnx!!!

 

[DotNetGnat]

here you go:

<%
dim sql, conn
set rsObj= server.createobject("ADODB.recordset")
Set conn= Server.CreateObject("ADODB.Connection")

conn.ConnectionString = "your connection string"

conn.open
rsObj.open "sp_helptext sms", conn

Response.Write "<table border=1>"
    If Not rsObj.EOF Then
        Response.Write "<tr>"
        For x = 0 To rsObj.Fields.Count - 1
            Response.Write "<th>" & rsObj(x).Name & "</th>"
            Response.Flush()
        Next
        Response.Write "</tr>"
        
        Do While Not rsObj.EOF
            Response.Write "<tr>"
            For x = 0 To rsObj.Fields.Count - 1
                Response.Write "<td>" & rsObj(x)& "&nbsp;</td>"
            Next
            Response.Write "</tr>"
            rsObj.MoveNext
        Loop
    End If
    Response.Write "</table>"

'close all objects here

%>

-DNG

 

[DotNetGnat]

if you dont want to see lines...then you just change:

Response.Write "<table border=1>"

to

Response.Write "<table border=0>"


-DNG

 

[DotNetGnat]

astrodestino,

Did this work you. Please let us know.

-DNG

 

[astrodestino]

Yes, I try it today and it worked! thank you very much for the help!!