Prev Next

ADO Query

ADO enables you to execute SQL queries to interact with databases. Queries can be used to retrieve, insert, update, or delete data, making them an essential feature of ADO.

Key Topics

Select Query

Example

<%
    Dim conn, rs
    Set conn = Server.CreateObject("ADODB.Connection")
    conn.Open "Provider=SQLOLEDB;Data Source=localhost;Initial Catalog=MyDatabase;User ID=myUser;Password=myPassword;"

    Set rs = conn.Execute("SELECT * FROM Employees")

    Do Until rs.EOF
        Response.Write("Name: " & rs("EmployeeName") & "<br>")
        rs.MoveNext
    Loop

    rs.Close
    conn.Close
    Set rs = Nothing
    Set conn = Nothing
%>

Explanation: This example demonstrates using ADO to execute a simple SELECT query and display the results dynamically.

Parameterized Query

Example

<%
    Dim conn, cmd, rs
    Set conn = Server.CreateObject("ADODB.Connection")
    conn.Open "Provider=SQLOLEDB;Data Source=localhost;Initial Catalog=MyDatabase;User ID=myUser;Password=myPassword;"

    Set cmd = Server.CreateObject("ADODB.Command")
    cmd.ActiveConnection = conn
    cmd.CommandText = "SELECT * FROM Employees WHERE Department = ?"
    cmd.Parameters.Append cmd.CreateParameter("Department", 200, 1, 50, "HR")

    Set rs = cmd.Execute

    Do Until rs.EOF
        Response.Write("Name: " & rs("EmployeeName") & "<br>")
        rs.MoveNext
    Loop

    rs.Close
    conn.Close
    Set rs = Nothing
    Set cmd = Nothing
    Set conn = Nothing
%>

Explanation: This example demonstrates how to execute a parameterized query to filter results based on specific criteria, such as department.

Key Takeaways

  • ADO queries allow interaction with databases using SQL commands.
  • Parameterized queries improve security and prevent SQL injection.
  • Queries can retrieve, manipulate, or delete data dynamically.
Prev Next