Hi, can you please help me to convert this code from ASP to JSP :

<%  @  Language = vbscript  %>
<%
Option Explicit
Response.Buffer = True

Private Sub SQLExec(byVal sql)
        dim c
        set c = server.createobject("adodb.connection")
        c.Open Application("dbConn")
        c.Execute sql
        c.Close
        set c = Nothing
        Response.Write "<h1><big>PROCEDURE ADDED!</big></h1>"
End Sub


dim tmp  :  tmp = Request.Form("SQL")
If  left( ucase( trim( tmp ) ), 16 ) = "CREATE PROCEDURE" OR _
    left( ucase( trim( tmp ) ), 14 ) = "DROP PROCEDURE" Then
        Call SQLExec( trim( tmp ) )
Else
        %>
        <FORM ACTION="./add.asp" METHOD=POST>
        <INPUT TYPE=SUBMIT VALUE="Add Procedure"><BR><BR>
        <TEXTAREA NAME="SQL" COLS=65 ROWS=45></TEXTAREA><BR><BR>
        <INPUT TYPE=SUBMIT VALUE="Add Procedure"></FORM>
        <%
End If
%>

Thanks
_________________________________________________________________________
Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com.

Share information about yourself, create your own public profile at
http://profiles.msn.com.

===========================================================================
To unsubscribe: mailto [EMAIL PROTECTED] with body: "signoff JSP-INTEREST".
Some relevant FAQs on JSP/Servlets can be found at:

 http://java.sun.com/products/jsp/faq.html
 http://www.esperanto.org.nz/jsp/jspfaq.html
 http://www.jguru.com/jguru/faq/faqpage.jsp?name=JSP
 http://www.jguru.com/jguru/faq/faqpage.jsp?name=Servlets

Reply via email to