Ado Query in ASP
In Classic ASP, an ADO Query typically means executing an SQL query against a database using ADO objects (Connection or Command) and optionally retrieving results.
? Basic ADO Query Execution in ASP
1. Using Connection.Execute (for SELECT, INSERT, UPDATE, DELETE)
<%Dim conn, sql, rs' Open connectionSet conn = Server.CreateObject("ADODB.Connection")conn.Open "Provider=SQLOLEDB;Data Source=SERVER;Initial Catalog=DB;User ID=USER;Password=PASS;"' Define SQL querysql = "SELECT UserID, Name FROM Users"' Execute query and get recordsetSet rs = conn.Execute(sql)' Loop through resultsDo Until rs.EOF Response.Write "ID: " & rs("UserID") & " - Name: " & rs("Name") & "<br>" rs.MoveNextLoop' Cleanuprs.CloseSet rs = Nothingconn.CloseSet conn = Nothing%>? Using ADODB.Command to Execute Queries (Recommended for Parameters)
<%Dim conn, cmd, rsSet conn = Server.CreateObject("ADODB.Connection")conn.Open "Provider=SQLOLEDB;Data Source=SERVER;Initial Catalog=DB;User ID=USER;Password=PASS;"Set cmd = Server.CreateObject("ADODB.Command")Set cmd.ActiveConnection = conncmd.CommandText = "SELECT UserID, Name FROM Users WHERE Age > ?"cmd.CommandType = 1 ' adCmdText' Add parameter for Agecmd.Parameters.Append cmd.CreateParameter("Age", 3, 1, , 25) ' 3=adInteger, 1=adParamInput' Execute querySet rs = cmd.Execute()Do Until rs.EOF Response.Write "ID: " & rs("UserID") & " - Name: " & rs("Name") & "<br>" rs.MoveNextLooprs.CloseSet rs = NothingSet cmd = Nothingconn.CloseSet conn = Nothing%>Notes:
conn.Executereturns a Recordset for SELECT queries.For
INSERT,UPDATE,DELETE,conn.Executereturns the number of affected rows.Use
ADODB.Commandto safely pass parameters and prevent SQL injection.
Want me to help with building a specific query or using stored procedures?