MySQL / ASP cổ điển - Truy vấn được tham số hóa

Mã trong đoạn mã thứ hai của bạn là đúng, nhưng phải được áp dụng cho một ADODB.Command mới đối tượng, không phải với Connection đối tượng:

username = Trim(Request("username"))

'-----Added this-----
Dim cmdContent
Set cmdContent = Server.CreateObject("ADODB.Command")

' Use this line to associate the Command with your previously opened connection
Set cmdContent.ActiveConnection = connContent
'--------------------

cmdContent.Prepared = True

Const ad_nVarChar = 202
Const ad_ParamInput = 1

SQL = " SELECT * FROM users WHERE (username=?) ; "

Set newParameter = cmdContent.CreateParameter("@username", ad_nVarChar, ad_ParamInput, 20, username)
cmdContent.Parameters.Append newParameter

cmdContent.CommandText = SQL
Set rs = cmdContent.Execute

If NOT rs.EOF Then
        ' Do something...
End If

rs.Close

Nhân tiện, có một lỗi đánh máy với chính tả của adParamInput thay vì ad_ParamInput (đã sửa trong ví dụ của tôi).